Fcalva/chibi-scheme
1
0
Fork 0
mirror of https://github.com/ashinn/chibi-scheme.git synced 2025-07-09 22:17:34 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

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

Browse source
This commit is contained in:
Alex Shinn 2012-07-09 20:08:08 +09:00
parent e54f400c57
commit d622036eb5
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lib/meta.scm
View file

@ -101,7 +101,8 @@
(car (cddr x)) (car (cddr x))
(to-id i)) (to-id i))
(from-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))) ((and (pair? (cdr x)) (pair? (cadr x)))
(if (memq (car x) '(only except rename)) (if (memq (car x) '(only except rename))
(let* ((mod-name+imports (resolve-import (cadr x))) (let* ((mod-name+imports (resolve-import (cadr x)))