diff options
author | Yann Herklotz <ymherklotz@gmail.com> | 2019-01-01 15:04:06 +0100 |
---|---|---|
committer | Yann Herklotz <ymherklotz@gmail.com> | 2019-01-01 15:04:06 +0100 |
commit | a6ccd5a6b0d6206cc2798631b139f9fc27c311ac (patch) | |
tree | 18d24ca39af942cd009bb545f56622b8a19b86d6 /src | |
parent | 239f70f5f160a0ff222c12a63cb5c2541d555f9c (diff) | |
download | verismith-a6ccd5a6b0d6206cc2798631b139f9fc27c311ac.tar.gz verismith-a6ccd5a6b0d6206cc2798631b139f9fc27c311ac.zip |
Fix Monoid instance for Expr
Diffstat (limited to 'src')
-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 |