git.iko.soy/elk
on master help sign in
Fix an infinite loop
8c63b57Evan Czaplicki
src/Parse/Primitives/Whitespace.hs+1−1
compare with master
unifiedsplit
@@ -68,7 +68,7 @@ eatSpaces fp offset terminal row col =
68 eatMultiComment fp offset terminal row col
68 eatMultiComment fp offset terminal row col
69
69
70 0x2D {- - -} ->
70 0x2D {- - -} ->
71− let !offset1 = offset1 + 1 in
71+ let !offset1 = offset + 1 in
72 if offset1 < terminal && I.unsafeIndex fp offset1 == 0x2D {- - -} then
72 if offset1 < terminal && I.unsafeIndex fp offset1 == 0x2D {- - -} then
73 eatLineComment fp (offset + 2) terminal row (col + 2)
73 eatLineComment fp (offset + 2) terminal row (col + 2)
74 else
74 else