Deriving Eq Show from EnableNewTxSubmissionProtocol

IntersectMBO · Sep 25, 2024 · 1070ab4 · 1070ab4
1 parent d900a38
commit 1070ab4
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/ouroboros-network/src/Ouroboros/Network/TxSubmission/Inbound/Server.hs b/ouroboros-network/src/Ouroboros/Network/TxSubmission/Inbound/Server.hs
@@ -30,6 +30,7 @@ import Ouroboros.Network.TxSubmission.Inbound.Types
 data EnableNewTxSubmissionProtocol =
       EnableNewTxSubmissionProtocol
     | DisableNewTxSubmissionProtocol
+    deriving (Eq, Show)
 
 -- | A tx-submission outbound side (server, sic!).
 --