diff --git a/src/PureScript/CST/Lexer.purs b/src/PureScript/CST/Lexer.purs index aa63638..2d84305 100644 --- a/src/PureScript/CST/Lexer.purs +++ b/src/PureScript/CST/Lexer.purs @@ -293,9 +293,9 @@ bumpToken pos@{ line, column } = case _ of TokOperator qual sym -> { line, column: column + qualLength qual + String.length sym } TokSymbolName qual sym -> - { line, column: column + qualLength qual + String.length sym } + { line, column: column + qualLength qual + String.length sym + 2 } TokSymbolArrow Unicode -> - { line, column: column + 1 } + { line, column: column + 3 } TokSymbolArrow ASCII -> { line, column: column + 4 } TokHole hole ->