1 files changed, 1 insertions, 0 deletions
diff --git a/src/Network/KRPC/Message.hs b/src/Network/KRPC/Message.hs
index 0bd34400..1e1dc065 100644
--- a/src/Network/KRPC/Message.hs
+++ b/src/Network/KRPC/Message.hs
@@ -227,6 +227,7 @@ data KMessage
  = Q KQuery
  | R KResponse
  | E KError
+    deriving (Show, Eq)
 instance BEncode KMessage where
  toBEncode (Q q) = toBEncode q

diff --git a/src/Network/KRPC/Message.hs b/src/Network/KRPC/Message.hs index 0bd34400..1e1dc065 100644 --- a/src/Network/KRPC/Message.hs +++ b/src/Network/KRPC/Message.hs
@@ -227,6 +227,7 @@ data KMessage
227	= Q KQuery	227	= Q KQuery
228	\| R KResponse	228	\| R KResponse
229	\| E KError	229	\| E KError
		230	deriving (Show, Eq)
230		231
231	instance BEncode KMessage where	232	instance BEncode KMessage where
232	toBEncode (Q q) = toBEncode q	233	toBEncode (Q q) = toBEncode q