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.
11 lines
449 B
Scheme
11 lines
449 B
Scheme
|
|
(define-library (chibi pathname)
|
|
(export path-strip-directory path-directory
|
|
path-extension path-strip-extension path-replace-extension
|
|
path-absolute? path-relative? path-strip-leading-parents
|
|
path-relative-to path-resolve path-normalize make-path)
|
|
(cond-expand
|
|
(chibi (import (chibi)))
|
|
(else (import (except (scheme base) string-map string-for-each))))
|
|
(import (chibi string))
|
|
(include "pathname.scm"))
|