I don't see how this isn't a bug.

This commit is contained in:
Stevie Strickland 2008-06-15 15:56:44 -04:00
parent 52ed6fe0ca
commit 14da71b5c2

View File

@ -41,7 +41,7 @@
[(_ dom ... rng) [(_ dom ... rng)
(->* (list dom ...) rng)] (->* (list dom ...) rng)]
[(_ dom ... rng : eff1 eff2) [(_ dom ... rng : eff1 eff2)
(->* (list dom ...) : eff1 eff2)])) (->* (list dom ...) rng : eff1 eff2)]))
(define-syntax ->* (define-syntax ->*
(syntax-rules (:) (syntax-rules (:)
[(_ dom rng) [(_ dom rng)