test-8-0.rkt (283B)
1 #lang racket/base 2 3 (require (only-in syntax/parse/experimental/template ?? template) 4 (only-in syntax/parse #;syntax-parse #;attribute) 5 (only-in "../parse.rkt" syntax-parse ~optional nat)) 6 7 (syntax-parse #'(#:kw) 8 [({~optional z:nat} _) 9 (template (x (?? z) y))])