This commit is contained in:
Matthew Flatt 2012-03-10 10:54:29 -07:00
parent 64f21122be
commit 2811af1e59

View File

@ -55,7 +55,7 @@
(test so? file-exists? so) (test so? file-exists? so)
#f))) #f)))
(check-name (check-name
'inner '(file inner)
(get-module-code file.sfx (get-module-code file.sfx
#:submodule-path '(inner) #:submodule-path '(inner)
#:choose (lambda (src zo so) #:choose (lambda (src zo so)