belka/elna
1
0
Fork 0
Code Issues 5 Pull Requests Releases Activity

Add IR quadruple definitions

Browse Source
This commit is contained in:
Eugen Wissner
2024-08-12 21:00:52 +02:00
parent 38a8d6811c
commit f78592378a
3 changed files with 47 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
tests/Language/Elna/NameAnalysisSpec.hs
View File

@ -57,7 +57,7 @@ spec = describe "nameAnalysis" $ do
it "puts parameters into the local symbol table" $ do
let given = "proc main(ref param: int) {}"
expected = SymbolTable.enter "param" (VariableInfo intType True) SymbolTable.empty
expected = SymbolTable.enter "param" (VariableInfo True intType) SymbolTable.empty
actual <- nameAnalysisOnText given
case SymbolTable.lookup "main" <$> actual of
@ -68,7 +68,7 @@ spec = describe "nameAnalysis" $ do
it "puts variables into the local symbol table" $ do
let given = "proc main() { var var1: int; }"
expected = SymbolTable.enter "var1" (VariableInfo intType False) SymbolTable.empty
expected = SymbolTable.enter "var1" (VariableInfo False intType) SymbolTable.empty
actual <- nameAnalysisOnText given
case SymbolTable.lookup "main" <$> actual of