mirror of
https://github.com/ashinn/chibi-scheme.git
synced 2025-05-19 05:39:18 +02:00
00691b64f1
Many still import (chibi), and as (scheme base) is somewhat more expensive to load at present these are changed to cond-expand. Many libraries also rely on (srfi 33), and these have been changed to a cond-expand first trying (srfi 60) where available. Also fixing a few portability concerns (duplicate imports of the same binding), and adding a few libraries missing from lib-tests.scm.
13 lines
435 B
Scheme
13 lines
435 B
Scheme
|
|
(define-library (chibi iset base)
|
|
(cond-expand
|
|
(chibi (import (chibi) (srfi 9)))
|
|
(else (import (scheme base))))
|
|
(cond-expand
|
|
((library (srfi 60)) (import (srfi 60)))
|
|
(else (import (srfi 33))))
|
|
(include "base.scm")
|
|
(export
|
|
%make-iset make-iset iset? iset-contains? Integer-Set
|
|
iset-start iset-end iset-bits iset-left iset-right
|
|
iset-start-set! iset-end-set! iset-bits-set! iset-left-set! iset-right-set!))
|