svn: r5919

original commit: 4a010a722c10a9aef70f00f1cf11da3139e27a70
This commit is contained in:
Eli Barzilay 2007-04-10 22:56:24 +00:00
parent 6223d05ed3
commit 8758e066c1

View File

@ -245,8 +245,8 @@
(cons language requires)]
[(eq? (car language) 'begin)
(append (find-requires (cdr language)) requires)]
[else 'require-perms
"bad language spec: ~e" language])])
[else (error 'require-perms
"bad language spec: ~e" language)])])
(module-specs->path-permissions requires)))
(define (input->port inp)