aboutsummaryrefslogtreecommitdiffstats
path: root/src/VeriFuzz/CodeGen.hs
diff options
context:
space:
mode:
authorYann Herklotz <git@ymhg.org>2019-04-02 18:16:21 +0100
committerYann Herklotz <git@ymhg.org>2019-04-02 18:16:21 +0100
commitc0c799ab3f79c370e4c33b8f824489ce8b1c96ec (patch)
tree042f235cdf458e6bf5330a477435d4b34bee7859 /src/VeriFuzz/CodeGen.hs
parent1ef0455ddad821c2ddf64d451e99b8b5508c39c5 (diff)
downloadverismith-c0c799ab3f79c370e4c33b8f824489ce8b1c96ec.tar.gz
verismith-c0c799ab3f79c370e4c33b8f824489ce8b1c96ec.zip
Rename to Verilog
Diffstat (limited to 'src/VeriFuzz/CodeGen.hs')
-rw-r--r--src/VeriFuzz/CodeGen.hs8
1 files changed, 4 insertions, 4 deletions
diff --git a/src/VeriFuzz/CodeGen.hs b/src/VeriFuzz/CodeGen.hs
index 5b27fea..b54d89d 100644
--- a/src/VeriFuzz/CodeGen.hs
+++ b/src/VeriFuzz/CodeGen.hs
@@ -41,9 +41,9 @@ class Source a where
defMap :: Maybe Statement -> Text
defMap = maybe ";\n" statement
--- | Convert the 'VerilogSrc' type to 'Text' so that it can be rendered.
-verilogSrc :: VerilogSrc -> Text
-verilogSrc source = fold $ description <$> source ^. getVerilogSrc
+-- | Convert the 'Verilog' type to 'Text' so that it can be rendered.
+verilogSrc :: Verilog -> Text
+verilogSrc source = fold $ description <$> source ^. getVerilog
-- | Generate the 'Description' to 'Text'.
description :: Description -> Text
@@ -277,7 +277,7 @@ instance Source ModDecl where
instance Source Description where
genSource = description
-instance Source VerilogSrc where
+instance Source Verilog where
genSource = verilogSrc
newtype GenVerilog a = GenVerilog { unGenVerilog :: a }