12 lines
341 B
Scheme
12 lines
341 B
Scheme
|
(define-library (foo)
|
||
|
|
(import (except (rename (prefix (only (scheme base) car cdr cons) my-)
|
||
|
|
(my-car my-kar)
|
||
|
|
(my-cdr my-kdr))
|
||
|
|
my-kar))
|
||
|
|
|
||
|
|
;; (import (rename (scheme base)
|
||
|
|
;; (car my-kar)
|
||
|
|
;; (cdr my-cdr)))
|
||
|
|
|
||
|
|
(export my-kdr my-cons))
|