diff options
Diffstat (limited to 'DSL/Types.hs')
| -rw-r--r-- | DSL/Types.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/DSL/Types.hs b/DSL/Types.hs index dbed203..431a361 100644 --- a/DSL/Types.hs +++ b/DSL/Types.hs @@ -59,8 +59,7 @@ data StackModifier = StackModifier { smName :: String data Block = BLinear [Operation] - | BIf [Block] [Block] - | BIfElse [Block] [Block] [Block] + | BIf [Block] [Block] [Block] | BWhile [Block] [Block] deriving (Show) @@ -78,6 +77,7 @@ data TokenTag | T_COMMENT | T_PROC | T_IF + | T_ELIF | T_ELSE | T_WHILE | T_DO |