git.iko.soy/elk
on master help sign in
use Row/Col type aliases when parsing Elm strings
004889bEvan Czaplicki
compiler/src/Parse/String.hs+2−2
compare with master
unifiedsplit
@@ -165,7 +165,7 @@ addEscape chunk start end revChunks =
165-- SINGLE STRINGS
165-- SINGLE STRINGS
166
166
167
167
168−singleString :: Ptr Word8 -> Ptr Word8 -> Word16 -> Word16 -> Ptr Word8 -> [ES.Chunk] -> StringResult
168+singleString :: Ptr Word8 -> Ptr Word8 -> Row -> Col -> Ptr Word8 -> [ES.Chunk] -> StringResult
169singleString pos end row col initialPos revChunks =
169singleString pos end row col initialPos revChunks =
170 if pos >= end then
170 if pos >= end then
171 Err row col E.StringEndless_Single
171 Err row col E.StringEndless_Single
@@ -211,7 +211,7 @@ singleString pos end row col initialPos revChunks =
211-- MULTI STRINGS
211-- MULTI STRINGS
212
212
213
213
214−multiString :: Ptr Word8 -> Ptr Word8 -> Word16 -> Word16 -> Ptr Word8 -> Word16 -> Word16 -> [ES.Chunk] -> StringResult
214+multiString :: Ptr Word8 -> Ptr Word8 -> Row -> Col -> Ptr Word8 -> Row -> Col -> [ES.Chunk] -> StringResult
215multiString pos end row col initialPos sr sc revChunks =
215multiString pos end row col initialPos sr sc revChunks =
216 if pos >= end then
216 if pos >= end then
217 Err sr sc E.StringEndless_Multi
217 Err sr sc E.StringEndless_Multi