mirror of
https://github.com/ashinn/chibi-scheme.git
synced 2025-05-19 21:59:17 +02:00
c52873e8b9
a SRFI 60 installed which imports (scheme base). This can still break in theory if a user installs a third-party SRFI 33 in the search path in front of the Chibi SRFI 33, but we can't always be safe against such behavior. Fixes issue #267.
17 lines
595 B
Scheme
17 lines
595 B
Scheme
|
|
(define-library (chibi iset constructors)
|
|
(cond-expand
|
|
(chibi (import (chibi)))
|
|
(else (import (scheme base))))
|
|
(import (chibi iset base) (chibi iset iterators))
|
|
(cond-expand
|
|
((library (srfi 33)) (import (srfi 33)))
|
|
(else (import (srfi 60))))
|
|
(include "constructors.scm")
|
|
(export
|
|
iset iset-copy list->iset list->iset! iset-map
|
|
iset-adjoin iset-adjoin! iset-delete iset-delete!
|
|
iset-union iset-union! iset-intersection iset-intersection!
|
|
iset-difference iset-difference!
|
|
;; low-level
|
|
iset-copy-node iset-squash-bits! iset-insert-left! iset-insert-right!))
|