summaryrefslogtreecommitdiff
path: root/lib/Language/Elna/Frontend/NameAnalysis.hs
diff options
context:
space:
mode:
authorEugen Wissner <belka@caraus.de>2024-12-02 13:57:03 +0100
committerEugen Wissner <belka@caraus.de>2024-12-02 13:57:03 +0100
commit0c40bca60b343bb289f0a567ec9ec9e9382bad2a (patch)
treebd0906d21a34afcd571e1b1489f3982c2c98151e /lib/Language/Elna/Frontend/NameAnalysis.hs
parent147967c04b0efeec4246b8ba0ff9b6961c9fe6cd (diff)
downloadelna-0c40bca60b343bb289f0a567ec9ec9e9382bad2a.tar.gz
Add array assignment to the IR
Diffstat (limited to 'lib/Language/Elna/Frontend/NameAnalysis.hs')
-rw-r--r--lib/Language/Elna/Frontend/NameAnalysis.hs14
1 files changed, 1 insertions, 13 deletions
diff --git a/lib/Language/Elna/Frontend/NameAnalysis.hs b/lib/Language/Elna/Frontend/NameAnalysis.hs
index fbf5d51..596ffb2 100644
--- a/lib/Language/Elna/Frontend/NameAnalysis.hs
+++ b/lib/Language/Elna/Frontend/NameAnalysis.hs
@@ -202,18 +202,6 @@ condition globalTable (AST.GreaterOrEqualCondition lhs rhs)
variableAccess :: SymbolTable -> AST.VariableAccess -> NameAnalysis ()
variableAccess globalTable (AST.VariableAccess identifier) =
checkSymbol globalTable identifier
-{- variableAccess globalTable (AST.ArrayAccess arrayExpression indexExpression)
+variableAccess globalTable (AST.ArrayAccess arrayExpression indexExpression)
= variableAccess globalTable arrayExpression
>> expression globalTable indexExpression
-
-enter :: Identifier -> Info -> SymbolTable -> NameAnalysis SymbolTable
-enter identifier info table
- = maybe (identifierAlreadyDefinedError identifier) pure
- $ SymbolTable.enter identifier info table
-
-identifierAlreadyDefinedError :: Identifier -> NameAnalysis a
-identifierAlreadyDefinedError = NameAnalysis
- . lift
- . throwE
- . IdentifierAlreadyDefinedError
--}