From 1b8b924ef24063e81c282387193d3a5e8dfada3e Mon Sep 17 00:00:00 2001
From: Yann Herklotz <git@ymhg.org>
Date: Sat, 30 Mar 2019 23:02:13 +0000
Subject: Add if statement type

---
 src/VeriFuzz/AST.hs | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'src/VeriFuzz/AST.hs')

diff --git a/src/VeriFuzz/AST.hs b/src/VeriFuzz/AST.hs
index 4ec966b..15e8d0b 100644
--- a/src/VeriFuzz/AST.hs
+++ b/src/VeriFuzz/AST.hs
@@ -488,6 +488,10 @@ data Statement = TimeCtrl { _statDelay :: {-# UNPACK #-} !Delay
            | StatCA { _stmntCA      :: !ContAssign } -- ^ Statement continuous assignment. May not be correct.
            | TaskEnable { _stmntTask    :: !Task }
            | SysTaskEnable { _stmntSysTask :: !Task }
+           | CondStmnt { _stmntCondExpr  :: Expr
+                       , _stmntCondTrue  :: Maybe Statement
+                       , _stmntCondFalse :: Maybe Statement
+                       }
            deriving (Eq, Show, Ord, Data)
 
 makeLenses ''Statement
-- 
cgit