From 0c40227dac237bc7b837de4993f4deeeddc62a1e Mon Sep 17 00:00:00 2001
From: Robby Findler <robby@racket-lang.org>
Date: Thu, 30 Oct 2008 21:49:59 +0000
Subject: [PATCH] added syntax-rules to the magic square-bracket opening list

svn: r12185
---
 collects/framework/private/main.ss | 1 +
 1 file changed, 1 insertion(+)

diff --git a/collects/framework/private/main.ss b/collects/framework/private/main.ss
index 27584a689f..d6494a6334 100644
--- a/collects/framework/private/main.ss
+++ b/collects/framework/private/main.ss
@@ -58,6 +58,7 @@
                            ("provide/contract" 0)
                            ("new" 1)
                            ("case" 1)
+                           ("syntax-rules" 1)
                            ("syntax-case" 2)
                            ("syntax-case*" 3))
                          (λ (x) (and (list? x) (andmap (λ (x) (and (pair? x)