diff options
Diffstat (limited to 'src/Verismith/Generate.hs')
| -rw-r--r-- | src/Verismith/Generate.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Verismith/Generate.hs b/src/Verismith/Generate.hs index 51bd066..ecf96e3 100644 --- a/src/Verismith/Generate.hs +++ b/src/Verismith/Generate.hs @@ -542,8 +542,8 @@ instantiate (ModDecl i outP inP _ _) = do $ inpFixed ^.. traverse . portSize ident <- makeIdentifier "modinst" Hog.choice - [ return . ModInst i ident $ ModConn <$> (toE (outs <> clkPort <> ins) <> insLit), - ModInst i ident + [ return . ModInst i [] ident $ ModConn <$> (toE (outs <> clkPort <> ins) <> insLit), + ModInst i [] ident <$> Hog.shuffle ( zipWith ModConnNamed |