diff options
Diffstat (limited to 'src/VeriFuzz.hs')
| -rw-r--r-- | src/VeriFuzz.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/VeriFuzz.hs b/src/VeriFuzz.hs index e008d62..b6b134b 100644 --- a/src/VeriFuzz.hs +++ b/src/VeriFuzz.hs @@ -113,10 +113,10 @@ checkEquivalence src dir = shellyFailDir $ do -- | Run a fuzz run and check if all of the simulators passed by checking if the -- generated Verilog files are equivalent. -runEquivalence :: Gen ModDecl -> Text -> Int -> IO () +runEquivalence :: Gen Verilog -> Text -> Int -> IO () runEquivalence gm t i = do m <- Hog.sample gm - let srcInfo = makeSrcInfo m + let srcInfo = SourceInfo "top" m rand <- generateByteString 20 shellyFailDir $ do mkdir_p (fromText "output" </> fromText n) |