diff --git a/racket/collects/syntax/parse/private/parse.rkt b/racket/collects/syntax/parse/private/parse.rkt index 69ee34c8ea..ce376937f3 100644 --- a/racket/collects/syntax/parse/private/parse.rkt +++ b/racket/collects/syntax/parse/private/parse.rkt @@ -945,7 +945,7 @@ Conventions: [(a ...) attrs] [(attr-repc ...) attr-repcs] [tail-pattern-is-null? - (equal? (syntax->datum #'tail) '#s(pat:datum () ()))]) + (equal? (syntax->datum #'tail) '#s(pat:datum ()))]) (define/with-syntax alt-map #'((id . alt-id) ...)) (define/with-syntax loop-k #'(dots-loop dx* dcx* loop-pr* fail-handler rel-rep ... alt-id ...))