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

fix else binding after its destroyed

Browse Source 
svn: r7953
This commit is contained in:
Eli Barzilay 2007-12-11 11:54:58 +00:00
parent a0db104f00
commit 41133f5341
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/tests/mzscheme/macrolib.ss
View File

@ -92,6 +92,8 @@
(let ([=> 12]) (evcase 3 [3 => 17]))
(let ([=> 17]) (evcase 3 [3 =>]))))
(require (only-in scheme/base else)) ; fix `else'
(define (opt-lam-test exp expected)
(let ([got (eval exp)])
(unless (equal? got expected)