From 809d342084e39432615945edac7662e6f9968b7f Mon Sep 17 00:00:00 2001 From: Yann Herklotz Date: Thu, 14 Nov 2019 14:52:11 +0000 Subject: Add delay to finish --- src/Verismith/Tool/Icarus.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/Verismith/Tool') diff --git a/src/Verismith/Tool/Icarus.hs b/src/Verismith/Tool/Icarus.hs index 68273a2..4ced505 100644 --- a/src/Verismith/Tool/Icarus.hs +++ b/src/Verismith/Tool/Icarus.hs @@ -144,7 +144,7 @@ tbModule bss top = <> fold ((\r -> TimeCtrl 10 (Just $ BlockAssign (Assign inConcat Nothing r))) . fromInteger . fromBytes <$> bss) - <> (SysTaskEnable $ Task "finish" []) + <> (TimeCtrl 10 . Just . SysTaskEnable $ Task "finish" []) , Always . TimeCtrl 5 . Just $ BlockAssign (Assign "clk" Nothing (UnOp UnNot (Id "clk"))) , Always . EventCtrl (EPosEdge "clk") . Just . SysTaskEnable -- cgit