From cb75d04970c73721c3e044eceaa90d8e4ab1142c Mon Sep 17 00:00:00 2001
From: chrism <chrism@example.org>
Date: Tue, 26 Sep 2006 12:51:40 +0000
Subject: [PATCH] Drop CR in string tokens in the Lisp parser

SVN-Revision: 4279
---
 src/lisp/lexer.cpp | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/src/lisp/lexer.cpp b/src/lisp/lexer.cpp
index de3243e52..9b4220b08 100644
--- a/src/lisp/lexer.cpp
+++ b/src/lisp/lexer.cpp
@@ -109,6 +109,8 @@ Lexer::getNextToken()
             nextChar();
             if(*c == '"')
               break;
+            else if (*c == '\r') // XXX this breaks with pure \r EOL
+              continue;
             else if(*c == '\n')
               linenumber++;
             else if(*c == '\\') {
-- 
2.11.0