Fixed codegen bug, added prelude option, created lambda calc
This commit is contained in:
parent
c98166392b
commit
762a6aef9b
3 changed files with 76 additions and 1 deletions
|
|
@ -320,7 +320,7 @@ emitECased t e cases = do
|
|||
emit $ Label lbl_failPos
|
||||
emitCases rt ty label stackPtr vs (Branch (PEnum (Ident "True$Bool"), t) exp) = do
|
||||
emitCases rt ty label stackPtr vs (Branch (PLit $ LInt 1, t) exp)
|
||||
emitCases rt ty label stackPtr vs (Branch (PEnum (Ident "False$Bool"), _) exp) = do
|
||||
emitCases rt ty label stackPtr vs (Branch (PEnum (Ident "False$Bool"), t) exp) = do
|
||||
emitCases rt ty label stackPtr vs (Branch (PLit (LInt 0), t) exp)
|
||||
emitCases rt ty label stackPtr vs br@(Branch (PEnum consId, _) exp) = do
|
||||
emit $ Comment "Penum"
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue