fix reg parsing

anoma · Dec 5, 2024 · 1266f7a · 1266f7a
1 parent 1a76df9
commit 1266f7a
Show file tree

Hide file tree

Showing 2 changed files with 7 additions and 1 deletion.
diff --git a/src/Juvix/Compiler/Reg/Keywords.hs b/src/Juvix/Compiler/Reg/Keywords.hs
@@ -32,7 +32,9 @@ import Juvix.Data.Keyword.All
     kwFieldDiv,
     kwFieldMul,
     kwFieldSub,
+    kwFieldToInt,
     kwIf,
+    kwIntToField,
     kwLe_,
     kwLive,
     kwLt_,
@@ -93,5 +95,7 @@ allKeywords =
          kwFail,
          kwArgsNum,
          kwPoseidon,
-         kwRandomEcPoint
+         kwRandomEcPoint,
+         kwIntToField,
+         kwFieldToInt
        ]
diff --git a/src/Juvix/Compiler/Reg/Translation/FromSource.hs b/src/Juvix/Compiler/Reg/Translation/FromSource.hs
@@ -130,6 +130,8 @@ instrUnop ::
 instrUnop vref =
   parseUnaryOp kwShow OpShow vref
     <|> parseUnaryOp kwAtoi OpStrToInt vref
+    <|> parseUnaryOp kwIntToField OpIntToField vref
+    <|> parseUnaryOp kwFieldToInt OpFieldToInt vref
     <|> parseUnaryOp kwArgsNum OpArgsNum vref
 
 parseUnaryOp ::