[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[bug-idutils] Bug in lisp scanner (infinite loop)
From: |
Walter Sosa |
Subject: |
[bug-idutils] Bug in lisp scanner (infinite loop) |
Date: |
Wed, 18 Oct 2006 11:27:06 -0700 |
User-agent: |
Thunderbird 1.5.0.7 (Windows/20060909) |
Greetings,
The following test case gets mkid into infinite loop:
$ cat junk.el
(defun foo ()
"\"^//[A"
)
$ src/mkid --version
src/mkid - 4.2
$ src/mkid -v -m libidu/id-lang.map junk.el
files=1, largest=26, slots=2048
0: lisp: junk.el ## sits here forever
Here is the fix:
$ diff -u libidu/scanners.c.orig libidu/scanners.c
--- libidu/scanners.c.orig Fri Jul 21 19:27:00 2006
+++ libidu/scanners.c Wed Oct 18 10:58:18 2006
@@ -1639,7 +1639,7 @@
if (c == '\\')
{
c = getc (in_FILE);
- continue;
+ goto string;
}
} while ( (c != EOF) && (c != '"'));
goto top;
Latest CVS version still has that bug.
Regards,
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [bug-idutils] Bug in lisp scanner (infinite loop),
Walter Sosa <=