Fixing only/except/rename modified importing from (chibi repl).

This commit is contained in:
Alex Shinn 2011-12-04 13:25:29 +09:00
parent a991cedec4
commit cd708b9f90

View file

@ -138,7 +138,7 @@
env)) env))
(imp-env (imp-env
(vector-ref (vector-ref
(eval `(load-module ',mod-name) meta-env) (eval `(load-module ',(car mod+imps)) meta-env)
1))) 1)))
(%import env imp-env (cdr mod+imps) #f) (%import env imp-env (cdr mod+imps) #f)
(continue module env meta-env)) (continue module env meta-env))