This is the mail archive of the
kawa@sources.redhat.com
mailing list for the Kawa project.
Re: kawa lexer: error reading symbols in bars
- From: Per Bothner <per at bothner dot com>
- To: wowa1 at online dot ru
- Cc: kawa at sources dot redhat dot com
- Date: Sat, 05 Apr 2003 14:59:21 -0800
- Subject: Re: kawa lexer: error reading symbols in bars
- References: <3E8F1728.8060404@online.ru>
Vladimir Tsichevski wrote:
Hi,
kawa failed to read symbols beginning from ( if they are enclosed in bars:
wowa at src$ kawa
#|kawa:1|# '|()|
(
#|kawa:2|#
Oops. thanks. I checked in the attached patch.
--
--Per Bothner
per at bothner dot com http://per.bothner.com/
Index: LispReader.java
===================================================================
RCS file: /cvs/kawa/kawa/gnu/kawa/lispexpr/LispReader.java,v
retrieving revision 1.9
diff -u -r1.9 LispReader.java
--- LispReader.java 14 Feb 2002 07:42:51 -0000 1.9
+++ LispReader.java 5 Apr 2003 22:56:35 -0000
@@ -181,6 +181,12 @@
ReadTableEntry entry = getReadTable().lookup(ch);
if (entry == null)
{
+ if (inEscapes)
+ {
+ tokenBufferAppend(TOKEN_ESCAPE_CHAR);
+ tokenBufferAppend(ch);
+ continue;
+ }
unread(ch);
break;
}