src/libcafe.ss => src/ikarus.cafe.ss
This commit is contained in:
Abdulaziz Ghuloum 2007-05-05 22:09:41 -04:00
parent 7931512241
commit 2a1713ef81
3 changed files with 4 additions and 4 deletions

Binary file not shown.

View File

@ -23,8 +23,8 @@ description:
Be specific about what the error-port is |# Be specific about what the error-port is |#
(library (ikarus cafe) (library (ikarus cafe)
(export) (export new-cafe)
(import (scheme)) (import (except (ikarus) new-cafe))
(define with-error-handler (define with-error-handler
(lambda (p thunk) (lambda (p thunk)
@ -101,7 +101,7 @@ description:
(lambda (x) (lambda (x)
(eval-top-level x))) (eval-top-level x)))
(primitive-set! 'new-cafe (define new-cafe
(case-lambda (case-lambda
[() (do-new-cafe default-cafe-eval)] [() (do-new-cafe default-cafe-eval)]
[(p) [(p)

View File

@ -56,7 +56,7 @@
"ikarus.compiler.ss" "ikarus.compiler.ss"
"ikarus.syntax.ss" "ikarus.syntax.ss"
"ikarus.pretty-print.ss" "ikarus.pretty-print.ss"
"libcafe.ss" "ikarus.cafe.ss"
"libposix.ss" "libposix.ss"
"libtimers.ss" "libtimers.ss"
"library-manager.ss" "library-manager.ss"