aboutsummaryrefslogtreecommitdiff
path: root/AST.hs
diff options
context:
space:
mode:
Diffstat (limited to 'AST.hs')
-rw-r--r--AST.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/AST.hs b/AST.hs
index 0b98618..b9dd3df 100644
--- a/AST.hs
+++ b/AST.hs
@@ -40,7 +40,7 @@ data Expr t
= ELit t Literal
| EList t [Expr t]
| ETup t [Expr t]
- | EApp t (Expr t) (Expr t)
+ | EApp t (Expr t) [Expr t]
| EOp t (Expr t) Operator (Expr t)
| EIf t (Expr t) (Expr t) (Expr t)
| ECase t (Expr t) [(Pattern t, RHS t)]
@@ -50,5 +50,5 @@ data Expr t
data Literal = LInt Int | LFloat Double | LChar Char | LString String
deriving (Show)
-data Operator = OAdd | OSub | OMul | ODiv | OMod
+data Operator = OAdd | OSub | OMul | ODiv | OMod | OEqu | OPow
deriving (Show)