From 31e6ac64efe3a58e9cc6f03b5028c79e259868bb Mon Sep 17 00:00:00 2001
From: Jens Nolte <git@queezle.net>
Date: Wed, 15 Dec 2021 09:27:38 +0100
Subject: [PATCH] Remove explicit Typeable instances
---
src/Quasar/Wayland/Protocol/Core.hs | 3 +--
1 file changed, 1 insertion(+), 2 deletions(-)
diff --git a/src/Quasar/Wayland/Protocol/Core.hs b/src/Quasar/Wayland/Protocol/Core.hs
index 0205a20..cb1a2ad 100644
--- a/src/Quasar/Wayland/Protocol/Core.hs
+++ b/src/Quasar/Wayland/Protocol/Core.hs
@@ -248,7 +248,7 @@ class IsInterfaceSide s i => IsInterfaceHandler s i a where
-- | Data kind
data Side = Client | Server
- deriving stock (Eq, Show, Typeable)
+ deriving stock (Eq, Show)
-- | An object belonging to a wayland connection.
@@ -257,7 +257,6 @@ data Object s i = IsInterfaceSide s i => Object {
objectId :: ObjectId (InterfaceName i),
messageHandler :: TVar (Maybe (MessageHandler s i))
}
- deriving stock Typeable
getMessageHandler :: Object s i -> STM (MessageHandler s i)
--
GitLab