diff options
Diffstat (limited to 'src/HSVIS/AST.hs')
| -rw-r--r-- | src/HSVIS/AST.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/HSVIS/AST.hs b/src/HSVIS/AST.hs index e25657b..058f5ac 100644 --- a/src/HSVIS/AST.hs +++ b/src/HSVIS/AST.hs @@ -126,6 +126,7 @@ data Expr s | EOp (X Expr s) (Expr s) Operator (Expr s) | EIf (X Expr s) (Expr s) (Expr s) (Expr s) | ECase (X Expr s) (Expr s) [(Pattern s, RHS s)] + -- TODO: pattern bindings? | ELet (X Expr s) [FunDef s] (Expr s) | EError (X Expr s) deriving instance (Show (X Expr s), Show (Pattern s), Show (RHS s), Show (FunDef s)) => Show (Expr s) |