From: chrism <chrism@example.org>
Date: Tue, 26 Sep 2006 12:51:40 +0000 (+0000)
Subject: Drop CR in string tokens in the Lisp parser
X-Git-Url: https://git.verplant.org/?a=commitdiff_plain;h=cb75d04970c73721c3e044eceaa90d8e4ab1142c;p=supertux.git

Drop CR in string tokens in the Lisp parser

SVN-Revision: 4279
---

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 == '\\') {