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

added test for no collisions between srfi/1/list and scheme/base

Browse Source 
svn: r9419
This commit is contained in:
Eli Barzilay 2008-04-23 11:41:59 +00:00
parent bea035d04c
commit e2c4500e41
1 changed files with 5 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
collects/tests/mzscheme/list.ss
View File

@ -216,4 +216,9 @@
(test long rd (append long (reverse long))) ; keeps first (test long rd (append long (reverse long))) ; keeps first
(test long rd (append* (map (lambda (x) (list x x)) long))))) (test long rd (append* (map (lambda (x) (list x x)) long)))))
;; ---------- check no collisions with srfi/1 ----------
(test (void)
eval '(module foo scheme/base (require scheme/base srfi/1/list))
(make-base-namespace))
(report-errs) (report-errs)