From 97693128e2d09cce93fb284a0ae56d094ca75e92 Mon Sep 17 00:00:00 2001 From: Yann Herklotz Grave Date: Wed, 6 Mar 2019 18:31:21 +0000 Subject: Add more probabilities to config --- src/VeriFuzz/CodeGen.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/VeriFuzz/CodeGen.hs') diff --git a/src/VeriFuzz/CodeGen.hs b/src/VeriFuzz/CodeGen.hs index fa0530b..3a2f9b0 100644 --- a/src/VeriFuzz/CodeGen.hs +++ b/src/VeriFuzz/CodeGen.hs @@ -220,7 +220,7 @@ genAssign op (Assign r d e) = genStatement :: Statement -> Text genStatement (TimeCtrl d stat ) = genDelay d <> " " <> defMap stat genStatement (EventCtrl e stat ) = genEvent e <> " " <> defMap stat -genStatement (SeqBlock s ) = "begin\n" <> fold (genStatement <$> s) <> "end\n" +genStatement (SeqBlock s) = "begin\n" <> fold (genStatement <$> s) <> "end\n" genStatement (BlockAssign a ) = genAssign " = " a <> ";\n" genStatement (NonBlockAssign a ) = genAssign " <= " a <> ";\n" genStatement (StatCA a ) = genContAssign a -- cgit