diff options
Diffstat (limited to 'app/Store.hs')
-rw-r--r-- | app/Store.hs | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/app/Store.hs b/app/Store.hs index 956359d..495f190 100644 --- a/app/Store.hs +++ b/app/Store.hs @@ -1,3 +1,4 @@ +{-# LANGUAGE CPP #-} {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE TypeApplications #-} {-# LANGUAGE TypeFamilyDependencies #-} @@ -41,9 +42,13 @@ data Location = Location } deriving (Show, Eq, Ord, Generic, NFData) instance Serialize Location + +#if MIN_VERSION_cereal(0,5,8) +#else instance Serialize BSS.ShortByteString where put = put . BSS.fromShort get = BSS.toShort <$> get +#endif class StoreItem item where toByteString :: item -> BS.ByteString |