diff options
Diffstat (limited to 'src')
-rw-r--r-- | src/Test/VeriFuzz/Verilog/AST.hs | 9 |
1 files changed, 0 insertions, 9 deletions
diff --git a/src/Test/VeriFuzz/Verilog/AST.hs b/src/Test/VeriFuzz/Verilog/AST.hs index b643db5..4f2c52d 100644 --- a/src/Test/VeriFuzz/Verilog/AST.hs +++ b/src/Test/VeriFuzz/Verilog/AST.hs @@ -71,15 +71,6 @@ data LVal = RegId Identifier | RegConcat { _regConc :: [Expr] } deriving (Eq) -instance Semigroup LVal where - (RegConcat a) <> (RegConcat b) = RegConcat $ a <> b - (RegConcat a) <> b = RegConcat $ a <> [b] - a <> (RegConcat b) = RegConcat $ a : b - a <> b = RegConcat [a, b] - -instance Monoid LVal where - mempty = RegConcat [] - -- | Binary operators that are currently supported in the verilog generation. data BinaryOperator = BinPlus -- ^ @+@ | BinMinus -- ^ @-@ |