summaryrefslogtreecommitdiff
path: root/src/Pairing.hs
diff options
context:
space:
mode:
authorRoman Smrž <roman.smrz@seznam.cz>2022-03-22 22:52:39 +0100
committerRoman Smrž <roman.smrz@seznam.cz>2022-03-22 22:52:39 +0100
commitb9e50633254a8c45159a6088309969872b8aae50 (patch)
treebca7eb3e6f049fda54f17b168e711be4cfae5169 /src/Pairing.hs
parent8d33ba4d499391c2aba98cefef61afb5290c7d15 (diff)
Use Data.Kind.Type instead of deprecated star symbol
Diffstat (limited to 'src/Pairing.hs')
-rw-r--r--src/Pairing.hs3
1 files changed, 2 insertions, 1 deletions
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