prefix and drop-prefix imports will look up exported identifiers if missing

This commit is contained in:
Alex Shinn 2012-07-09 20:08:08 +09:00
parent e54f400c57
commit d622036eb5

View file

@ -101,7 +101,8 @@
(car (cddr x))
(to-id i))
(from-id i)))
(cdr mod-name+imports)))))
(or (cdr mod-name+imports)
(module-exports (find-module (car mod-name+imports))))))))
((and (pair? (cdr x)) (pair? (cadr x)))
(if (memq (car x) '(only except rename))
(let* ((mod-name+imports (resolve-import (cadr x)))