* auto-invoke is gone. top-level must explicitly invoke a library.

This commit is contained in:
Abdulaziz Ghuloum 2007-05-03 01:49:16 -04:00
parent cc17420db8
commit 4eca8e3915
3 changed files with 2 additions and 1 deletions

Binary file not shown.

View File

@ -2029,7 +2029,7 @@
imp* vis* inv* exp-subst exp-env
void ;;; FIXME
(lambda () (eval-core invoke-code)))
(invoke-library (find-library-by-name name))))))
#;(invoke-library (find-library-by-name name))))))
(define boot-library-expander
(lambda (x)
(let-values ([(name imp* run* invoke-code exp*)

View File

@ -123,6 +123,7 @@
(printf "Happy Happy Joy Joy\n"))
(invoke (ikarus makefile))
;;; ;;; NEW ARCHITECTURE
;;;