test-compatibility1.rkt (242B)
1 #lang racket 2 (require syntax/parse 3 syntax/parse/experimental/template) 4 (provide mf original-template) 5 (define-template-metafunction (mf stx) 6 #'ok-metafunction-official-1) 7 (define-syntax-rule (original-template t) 8 (template t)) 9