diff options
| -rw-r--r-- | src/Test/VeriFuzz/Verilog/AST.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Test/VeriFuzz/Verilog/AST.hs b/src/Test/VeriFuzz/Verilog/AST.hs index 0ed2a95..965f6e3 100644 --- a/src/Test/VeriFuzz/Verilog/AST.hs +++ b/src/Test/VeriFuzz/Verilog/AST.hs @@ -149,7 +149,7 @@ instance Semigroup Expr where a <> b = Concat [a, b] instance Monoid Expr where - mempty = 0 + mempty = Concat [] instance IsString Expr where fromString = Str . fromString |