From ffab94c003b2f5c1f8de0f48464ebb9950c7fb80 Mon Sep 17 00:00:00 2001
From: jjgarcia <jjgarcia>
Date: Mon, 21 Mar 2005 14:00:42 +0000
Subject: [PATCH] The double quote reader allows the delimiter character to
 change.

---
 src/c/read.d | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/c/read.d b/src/c/read.d
index b2aba22a3..2ec0ff537 100644
--- a/src/c/read.d
+++ b/src/c/read.d
@@ -566,7 +566,7 @@ read_constituent(cl_object in)
 static cl_object
 double_quote_reader(cl_object in, cl_object c)
 {
-	read_string('"', in);
+	read_string(CHAR_CODE(c), in);
 	@(return copy_simple_string(cl_env.token))
 }