diff options
author | Yann Herklotz Grave <git@yannherklotzgrave.com> | 2019-03-06 18:31:21 +0000 |
---|---|---|
committer | Yann Herklotz Grave <git@yannherklotzgrave.com> | 2019-03-06 18:31:21 +0000 |
commit | 97693128e2d09cce93fb284a0ae56d094ca75e92 (patch) | |
tree | aa9ca625b9fc6f169b2da4e655ae75b22ad05e64 /src/VeriFuzz/CodeGen.hs | |
parent | ffa56ca8daa4da6b8f35172769479c56a903572e (diff) | |
download | verismith-97693128e2d09cce93fb284a0ae56d094ca75e92.tar.gz verismith-97693128e2d09cce93fb284a0ae56d094ca75e92.zip |
Add more probabilities to config
Diffstat (limited to 'src/VeriFuzz/CodeGen.hs')
-rw-r--r-- | src/VeriFuzz/CodeGen.hs | 2 |
1 files changed, 1 insertions, 1 deletions
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 |