fix enter!

svn: r8757
This commit is contained in:
Matthew Flatt 2008-02-21 18:45:23 +00:00
parent a8e07cded2
commit 5427d8c546

View File

@ -68,9 +68,8 @@
;; Record module timestamp and dependencies:
(let ([mod (make-mod name
(get-timestamp path)
(call-with-values
(lambda () (module-compiled-imports code))
append))])
(apply append
(map cdr (module-compiled-imports code))))])
(hash-table-put! loaded path mod))
;; Evaluate the module:
(eval code))