fix problem with the mandatory-keywords change
Repairs a problem with 7bcc9afd4c
as exposed by the contract test
suite.
This commit is contained in:
parent
ad230d2ca0
commit
bf53f02bb1
|
@ -656,7 +656,8 @@
|
|||
[no-kws (mk-no-kws #t)]
|
||||
[with-kws (mk-with-kws)]
|
||||
[(_ mk-id . _) (with-syntax ([n (or local-name
|
||||
(syntax-local-infer-name stx))]
|
||||
(syntax-local-infer-name stx)
|
||||
'unknown)]
|
||||
[call-fail (mk-kw-arity-stub)])
|
||||
(syntax-local-lift-values-expression
|
||||
5
|
||||
|
|
Loading…
Reference in New Issue
Block a user