From 9b95e9b2d57a4ad1e52eaa3f0545a445cf834901 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Mon, 15 Sep 2008 19:08:50 +0000
Subject: [PATCH] msvs9-friendly patches; preliminary splicing let-syntax
 library; export and doc GC_resolve and GC_fixup_self

svn: r11758

original commit: 186bf676306ed59f9892d7bf58ab7d833b5c3f29
---
 collects/mzlib/pretty.ss | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/collects/mzlib/pretty.ss b/collects/mzlib/pretty.ss
index 91e7aea..6849cb1 100644
--- a/collects/mzlib/pretty.ss
+++ b/collects/mzlib/pretty.ss
@@ -1173,7 +1173,7 @@
      (and (pretty-print-abbreviate-read-macros)
           (let ((head (car l)) (tail (cdr l)))
             (case head
-              ((quote quasiquote unquote unquote-splicing syntax)
+              ((quote quasiquote unquote unquote-splicing syntax unsyntax unsyntax-splicing)
                (length1? tail))
               (else #f)))))