Make IR for array access

2024-12-04 16:11:06 +01:00
parent 0c40bca60b
commit 1c996b3c8b
10 changed files with 138 additions and 77 deletions
--- a/lib/Language/Elna/Backend/Intermediate.hs
+++ b/lib/Language/Elna/Backend/Intermediate.hs
@@ -50,7 +50,7 @@ data Quadruple v
    | DivisionQuadruple (Operand v) (Operand v) v
    | GoToQuadruple Label
    | AssignQuadruple (Operand v) v
-    {-| ArrayQuadruple Variable Operand Variable -}
+    | ArrayQuadruple v (Operand v) v
    | ArrayAssignQuadruple (Operand v) (Operand v) v
    | LessOrEqualQuadruple (Operand v) (Operand v) Label
    | GreaterOrEqualQuadruple (Operand v) (Operand v) Label