From b9e50633254a8c45159a6088309969872b8aae50 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Roman=20Smr=C5=BE?= <roman.smrz@seznam.cz>
Date: Tue, 22 Mar 2022 22:52:39 +0100
Subject: Use Data.Kind.Type instead of deprecated star symbol

---
 src/Pairing.hs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'src/Pairing.hs')

diff --git a/src/Pairing.hs b/src/Pairing.hs
index 7c4b7e6..6545376 100644
--- a/src/Pairing.hs
+++ b/src/Pairing.hs
@@ -18,6 +18,7 @@ import Data.Bits
 import Data.ByteArray (Bytes, convert)
 import qualified Data.ByteArray as BA
 import qualified Data.ByteString.Char8 as BC
+import Data.Kind
 import Data.Maybe
 import qualified Data.Text as T
 import Data.Typeable
@@ -58,7 +59,7 @@ data PairingAttributes a = PairingAttributes
     }
 
 class (Typeable a, Storable a) => PairingResult a where
-    type PairingVerifiedResult a :: *
+    type PairingVerifiedResult a :: Type
     type PairingVerifiedResult a = a
 
     pairingServiceID :: proxy a -> ServiceID
-- 
cgit v1.2.3