Rakarake/churf
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Updated some more changes.

Browse source
This commit is contained in:
Samuel Hammersberg 2023-03-24 17:00:31 +01:00
parent 481667f2d8
commit f404acdbad
3 changed files with 23 additions and 17 deletions
Download patch file Download diff file Expand all files Collapse all files

7
src/Monomorphizer/MonomorphizerIr.hs
View file

@ -24,10 +24,13 @@ data Exp
| ELet Bind ExpT
| EApp ExpT ExpT
| EAdd ExpT ExpT
| ECase ExpT [Injection]
| ECase ExpT [Branch]
deriving (Show, Ord, Eq)
data Injection = Injection (Init, Type) ExpT
data Pattern = PVar Id | PLit (Lit, Type) | PInj Ident [Pattern] | PCatch
deriving (Eq, Ord, Show)
data Branch = Branch (Pattern, Type) ExpT
deriving (Eq, Ord, Show)
type ExpT = (Exp, Type)