suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

svn: r5912

Browse Source
This commit is contained in:
Eli Barzilay 2007-04-10 18:14:59 +00:00
parent 8ecd7a93c9
commit 0b386c6301
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/mzlib/sandbox.ss
View File

@ -241,7 +241,7 @@
requires)] requires)]
[requires (cond [(string? language) (cons language requires)] [requires (cond [(string? language) (cons language requires)]
[(not (pair? language)) requires] [(not (pair? language)) requires]
[(memq (car language) '(file planet)) [(memq (car language) '(lib file planet))
(cons language requires)] (cons language requires)]
[(eq? (car language) 'begin) [(eq? (car language) 'begin)
(append (find-requires (cdr language)) requires)] (append (find-requires (cdr language)) requires)]