From bf53f02bb13480e466f4975b92248a44e58bb72f Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Mon, 8 Aug 2016 07:45:35 -0600 Subject: [PATCH] fix problem with the mandatory-keywords change Repairs a problem with 7bcc9afd4c as exposed by the contract test suite. --- racket/collects/racket/private/kw.rkt | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/racket/collects/racket/private/kw.rkt b/racket/collects/racket/private/kw.rkt index 692ff5e46e..4697f3d3b8 100644 --- a/racket/collects/racket/private/kw.rkt +++ b/racket/collects/racket/private/kw.rkt @@ -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