[MLton-commit] r5520

[Vesa Karvonen]

Fixed to count column numbers consistently after a continued string
literal.

----------------------------------------------------------------------

U   mlton/trunk/mlton/front-end/ml.lex

----------------------------------------------------------------------

Modified: mlton/trunk/mlton/front-end/ml.lex
===================================================================
--- mlton/trunk/mlton/front-end/ml.lex	2007-04-13 02:14:36 UTC (rev 5519)
+++ mlton/trunk/mlton/front-end/ml.lex	2007-04-13 12:43:40 UTC (rev 5520)
@@ -335,7 +335,7 @@
 <S>\\\"         => (addString "\""; continue ());
 <S>\\\\         => (addString "\\"; continue ());
 <S>\\{nrws}     => (YYBEGIN F; continue ());
-<S>\\{eol}      => (Source.newline (source, yypos) ; YYBEGIN F ; continue ());   
+<S>\\{eol}      => (Source.newline (source, yypos + 1) ; YYBEGIN F ; continue ());
 <S>\\           => (stringError (source, yypos, "illegal string escape")
                     ; continue ());
 <S>{eol}        => (Source.newline (source, yypos)