From 7fa2aa75ab0e1d6fa0845c6de4c1b7648a39bafc Mon Sep 17 00:00:00 2001
From: Abdulaziz Ghuloum <aghuloum@cs.indiana.edu>
Date: Sun, 26 Oct 2008 12:35:07 -0400
Subject: [PATCH] fixed gensym read syntax problem.

---
 scheme/ikarus.reader.ss | 1 +
 scheme/last-revision    | 2 +-
 2 files changed, 2 insertions(+), 1 deletion(-)

diff --git a/scheme/ikarus.reader.ss b/scheme/ikarus.reader.ss
index 34c2c0d..e47be29 100644
--- a/scheme/ikarus.reader.ss
+++ b/scheme/ikarus.reader.ss
@@ -119,6 +119,7 @@
          [(char=? c #\\)
           (read-char p)
           (tokenize-backslash ls p)]
+         [(char=? c #\}) ls]
          [else
           (die/p p 'tokenize "invalid identifier syntax" 
             (list->string (reverse (cons c ls))))]))))
diff --git a/scheme/last-revision b/scheme/last-revision
index 27c71ca..8f8453a 100644
--- a/scheme/last-revision
+++ b/scheme/last-revision
@@ -1 +1 @@
-1647
+1648