git.iko.soy/elk
on master help sign in
Do not move row or column when \r is seen in multi-line string
1308e3dEvan Czaplicki
compiler/src/Parse/Primitives/Utf8.hs+1−1
compare with master
unifiedsplit
@@ -217,7 +217,7 @@ multiString fp offset terminal row col initialOffset revChunks =
217
217
218 else if word == 0x0D {- \r -} then
218 else if word == 0x0D {- \r -} then
219 let !offset1 = offset + 1 in
219 let !offset1 = offset + 1 in
220− multiString fp offset1 terminal (row + 1) 1 offset1 $
220+ multiString fp offset1 terminal row col offset1 $
221 addEscape carriageReturn initialOffset offset revChunks
221 addEscape carriageReturn initialOffset offset revChunks
222
222
223 else if word == 0x5C {- \ -} then
223 else if word == 0x5C {- \ -} then