aboutsummaryrefslogtreecommitdiffstats
path: root/src/Test/VeriFuzz/VerilogAST.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Test/VeriFuzz/VerilogAST.hs')
-rw-r--r--src/Test/VeriFuzz/VerilogAST.hs3
1 files changed, 3 insertions, 0 deletions
diff --git a/src/Test/VeriFuzz/VerilogAST.hs b/src/Test/VeriFuzz/VerilogAST.hs
index 109f024..5fdb900 100644
--- a/src/Test/VeriFuzz/VerilogAST.hs
+++ b/src/Test/VeriFuzz/VerilogAST.hs
@@ -90,3 +90,6 @@ emptyMod = ModuleDecl (Identifier "") [] []
setModName :: Text -> ModuleDecl -> ModuleDecl
setModName str = moduleId .~ Identifier str
+
+addModPort :: Port -> ModuleDecl -> ModuleDecl
+addModPort port = modPorts %~ ((:) port)