prelude move

2023-11-22 15:59:05 -07:00
parent 8a051085c2
commit 06ad439e62
5 changed files with 25 additions and 24 deletions
--- a/src/Core/Parse.y
+++ b/src/Core/Parse.y
@@ -138,9 +138,9 @@ Con             : '(' consym ')'                    { $2 }

 {
 parseError :: [Located CoreToken] -> RLPC ParseError a
-parseError (Located x y l _ : _) = addFatal err
+parseError (Located y x l _ : _) = addFatal err
    where err = SrcError
-            { _errSpan       = (x, y, l)
+            { _errSpan       = (y,x,l)
            , _errSeverity   = Error
            , _errDiagnostic = ParErrParse
            }