Fix failing test in subtemplate

2021-04-04 05:21:17 +01:00 · 2021-04-04 05:21:17 +01:00 · 9993855ab5
commit 9993855ab5
parent 5ea3b5388f
1 changed files with 9 additions and 0 deletions
--- a/test/test-8-0.rkt
+++ b/test/test-8-0.rkt
@ -0,0 +1,9 @@
+#lang racket/base
+
+(require (only-in syntax/parse/experimental/template ?? template)
+         (only-in syntax/parse #;syntax-parse #;attribute)
+         (only-in "../parse.rkt" syntax-parse ~optional nat))
+
+(syntax-parse #'(#:kw)
+  [({~optional z:nat} _)
+   (template (x (?? z) y))])