]>
ruin.nu Git - proglang.git/blobdiff - Abssyntax.hs
deriving (Eq,Ord,Show)
data Exp =
- BExp Exp BOp Exp
+ EAss Ident Exp
| EVar Ident
- | EAss Ident Exp
| EInt Integer
| ENeg Exp
+ | ENot Exp
| EBool Bool
| EReadI
| EReadB
| ExpT Type Exp
| EDefault
- | OpExp Exp Op Exp
+ | BiOpExp Exp Op Exp
| EPost Ident Op
deriving (Eq,Ord,Show)
Program [Stm]
deriving (Eq,Ord,Show)
-data BOp =
+data Op =
Lt
| ELt
| Gt
| EGt
| Eq
| NEq
- deriving (Eq,Ord,Show)
-
-data Op =
- Plus
+ | Plus
| Minus
| Times
| Div