Compatibility with Racket 7: template-metafunction? → metafunction?

private/unsyntax-preparse.rkt

@@ -15,6 +15,7 @@
          stxparse-info/case
          syntax/stx
          racket/list
+         version-case
          (for-syntax racket/base
                      racket/list
                      racket/syntax
@@ -22,6 +23,13 @@
                      (only-in racket/base [... …])
                      phc-toolkit/untyped))
 
+(version-case
+ [(version< (version) "6.90.0.24")
+  (begin)]
+ [else
+  (require (only-in racket/private/template
+                    [metafunction? template-metafunction?]))])
+
 (define-for-syntax lifted (make-parameter #f))
 
 (begin-for-syntax