guard expressions now re-raise unhandled conditions using
raise-continuable (as per the R6RS errata page, part 7.1)
This commit is contained in:
parent
78d9fa1f42
commit
59b9d28001
|
@ -1 +1 @@
|
|||
1544
|
||||
1545
|
||||
|
|
|
@ -1328,7 +1328,7 @@
|
|||
(syntax-match x* (else)
|
||||
[()
|
||||
(let ([g (gensym)])
|
||||
(values `(,g (lambda () (raise ,con))) g))]
|
||||
(values `(,g (lambda () (raise-continuable ,con))) g))]
|
||||
[([else e e* ...])
|
||||
(values `(begin ,e ,@e*) #f)]
|
||||
[(cls . cls*)
|
||||
|
|
Loading…
Reference in New Issue