[armedbear-cvs] r11612 - trunk/abcl/src/org/armedbear/lisp

[Erik Huelsmann]

Author: ehuelsmann
Date: Sat Jan 31 21:14:24 2009
New Revision: 11612

Log:
Count linenumbers correctly again (they were double counted before this commit).

Modified:
   trunk/abcl/src/org/armedbear/lisp/Stream.java

Modified: trunk/abcl/src/org/armedbear/lisp/Stream.java
==============================================================================
--- trunk/abcl/src/org/armedbear/lisp/Stream.java	(original)
+++ trunk/abcl/src/org/armedbear/lisp/Stream.java	Sat Jan 31 21:14:24 2009
@@ -1806,6 +1806,8 @@
                 _unreadChar(n);
                 return '\r';
             }
+            else
+              return '\n';
         }
 
         if (n == eolChar) {