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

release

Browse Source 
original commit: 85350de3669c7fc941c58f29d95e650462c6a719
This commit is contained in:
Matthew Flatt 1997-05-07 17:35:59 +00:00
parent 0b51c4515e
commit 908ad34300
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/match.ss
View File

@ -1053,7 +1053,7 @@ eta)))
,fail-sym ,fail-sym
,@(map val ,@(map val
bv)))) bv))))
`(call-with-current-continuation `(call/ec
(lambda (,fail-sym) (lambda (,fail-sym)
(let ((,fail-sym (lambda () (let ((,fail-sym (lambda ()
;; Changed CF 9.24.96 for multiple value returns ;; Changed CF 9.24.96 for multiple value returns