aboutsummaryrefslogtreecommitdiffstats
path: root/src/Test/VeriFuzz/Verilog/AST.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Test/VeriFuzz/Verilog/AST.hs')
-rw-r--r--src/Test/VeriFuzz/Verilog/AST.hs4
1 files changed, 0 insertions, 4 deletions
diff --git a/src/Test/VeriFuzz/Verilog/AST.hs b/src/Test/VeriFuzz/Verilog/AST.hs
index 5fa2d51..288fb2e 100644
--- a/src/Test/VeriFuzz/Verilog/AST.hs
+++ b/src/Test/VeriFuzz/Verilog/AST.hs
@@ -222,7 +222,6 @@ data Stmnt = TimeCtrl { _statDelay :: Delay
| StatCA ContAssign -- ^ Stmnt continuous assignment. May not be correct.
| TaskEnable Task
| SysTaskEnable Task
- | EmptyStat
deriving (Eq)
instance Semigroup Stmnt where
@@ -231,9 +230,6 @@ instance Semigroup Stmnt where
a <> (SeqBlock b) = SeqBlock $ a : b
a <> b = SeqBlock [a, b]
-instance Monoid Stmnt where
- mempty = EmptyStat
-
data Task = Task { _taskName :: Identifier
, _taskExpr :: [Expr]
} deriving (Eq)