diff options
| author | Roman Smrž <roman.smrz@seznam.cz> | 2022-03-22 22:52:39 +0100 |
|---|---|---|
| committer | Roman Smrž <roman.smrz@seznam.cz> | 2022-03-22 22:52:39 +0100 |
| commit | b9e50633254a8c45159a6088309969872b8aae50 (patch) | |
| tree | bca7eb3e6f049fda54f17b168e711be4cfae5169 /src/Storage/Internal.hs | |
| parent | 8d33ba4d499391c2aba98cefef61afb5290c7d15 (diff) | |
Use Data.Kind.Type instead of deprecated star symbol
Diffstat (limited to 'src/Storage/Internal.hs')
| -rw-r--r-- | src/Storage/Internal.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Storage/Internal.hs b/src/Storage/Internal.hs index 3a05029..3a53567 100644 --- a/src/Storage/Internal.hs +++ b/src/Storage/Internal.hs @@ -22,6 +22,7 @@ import Data.Char import Data.Function import Data.Hashable import qualified Data.HashTable.IO as HT +import Data.Kind import Data.List import Data.Map (Map) import qualified Data.Map as M @@ -176,7 +177,7 @@ type Complete = Identity type Partial = Either RefDigest class (Traversable compl, Monad compl) => StorageCompleteness compl where - type LoadResult compl a :: * + type LoadResult compl a :: Type returnLoadResult :: compl a -> LoadResult compl a ioLoadBytes :: Ref' compl -> IO (compl BL.ByteString) |