diff options
Diffstat (limited to 'src/Verismith.hs')
-rw-r--r-- | src/Verismith.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Verismith.hs b/src/Verismith.hs index 85deca3..a3d3d03 100644 --- a/src/Verismith.hs +++ b/src/Verismith.hs @@ -363,12 +363,12 @@ randomise config@(Config a _ c d e) = do ce = config ^. configProbability . probExpr handleOpts :: Opts -> IO () -handleOpts (Fuzz o configF _ _ n) = do +handleOpts (Fuzz o configF _ k n) = do config <- getConfig configF _ <- runFuzz config defaultYosys - (fuzzMultiple n (Just $ fromText o) (proceduralSrc "top" config)) + (fuzzMultiple n k (Just $ fromText o) (proceduralSrc "top" config)) return () handleOpts (Generate f c) = do config <- getConfig c |