aboutsummaryrefslogtreecommitdiffstats
path: root/src/VeriFuzz/ASTGen.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/VeriFuzz/ASTGen.hs')
-rw-r--r--src/VeriFuzz/ASTGen.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/VeriFuzz/ASTGen.hs b/src/VeriFuzz/ASTGen.hs
index 5d4d8bc..d113bbb 100644
--- a/src/VeriFuzz/ASTGen.hs
+++ b/src/VeriFuzz/ASTGen.hs
@@ -75,7 +75,7 @@ genModuleDeclAST c = ModDecl i output ports items
output = [Port Wire 90 "y"]
a = genAssignAST c
items = a ++ [ModCA . ContAssign "y" . fold $ Id <$> assigns]
- assigns = a ^.. traverse . _ModCA . contAssignNetLVal
+ assigns = a ^.. traverse . modContAssign . contAssignNetLVal
generateAST :: Circuit -> VerilogSrc
generateAST c = VerilogSrc [Description $ genModuleDeclAST c]