mirror of
https://github.com/idris-lang/Idris2.git
synced 2024-11-24 15:07:37 +03:00
Fix for lexer colums
This commit is contained in:
parent
ece1198074
commit
93b0f9c7b8
@ -147,7 +147,7 @@ tokenise pred line col acc tmap str
|
||||
|
||||
getCols : List Char -> Int -> Int
|
||||
getCols x c
|
||||
= case span (/= '\n') (reverse x) of
|
||||
= case span (/= '\n') x of
|
||||
(incol, []) => c + cast (length incol)
|
||||
(incol, _) => cast (length incol)
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user