From 1f886a6a06dae154f8686b5cc00e84e1ff555af0 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Georges=20Dup=C3=A9ron?= <georges.duperon@gmail.com>
Date: Sun, 3 Jun 2018 01:43:12 +0200
Subject: [PATCH] =?UTF-8?q?Compatibility=20with=20Racket=207:=20template-m?=
 =?UTF-8?q?etafunction=3F=20=E2=86=92=20metafunction=3F?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 private/unsyntax-preparse.rkt | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/private/unsyntax-preparse.rkt b/private/unsyntax-preparse.rkt
index 97cddb0..beac29b 100644
--- a/private/unsyntax-preparse.rkt
+++ b/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