fix phase of no-old-match-form
svn: r8972
This commit is contained in:
parent
b1009e7e5a
commit
ae75de476f
|
@ -6,7 +6,7 @@
|
|||
define-match-expander)
|
||||
(rename-out [define-match-expander* define-match-expander]))
|
||||
|
||||
(define-syntax (no-old-match-form stx)
|
||||
(define-for-syntax (no-old-match-form stx)
|
||||
(raise-syntax-error
|
||||
#f
|
||||
"works only for constructor-based `match' form"
|
||||
|
|
Loading…
Reference in New Issue
Block a user