fix(lexer): handle crlf in newline

Do we support windows 🤔
2025-09-24 18:35:15 +08:00 · 2025-09-24 18:35:15 +08:00 · fdb9070e99
commit fdb9070e99
parent 39cfe2035d
2 changed files with 6 additions and 2 deletions
--- a/test/Spec.hs
+++ b/test/Spec.hs
@ -107,11 +107,15 @@ maths = do
                      ]

 escaping :: Expectation
-escaping =
+escaping = do
    "\\("
        `shouldLexTo` [ (1, 1, Escape)
                      , (1, 2, Token "(")
                      ]
+    "\\(\r\n"
+        `shouldLexTo` [ (1, 1, Escape)
+                      , (1, 2, Token "(")
+                      ]

 unicode :: Expectation
 unicode =