From c1248c2f818cdc2413aaf6bc61100239dcc14f76 Mon Sep 17 00:00:00 2001 From: Ville Tirronen Date: Thu, 28 Jul 2022 13:45:10 +0300 Subject: [PATCH] More fixes --- src/Data/Id.hs | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/src/Data/Id.hs b/src/Data/Id.hs index 1ff8097..6085c5b 100644 --- a/src/Data/Id.hs +++ b/src/Data/Id.hs @@ -147,6 +147,9 @@ newtype IntId t = IntId { unIntId :: Integer } #ifdef USE_FLAT , Flat #endif +#ifdef USE_STORE + , Data.Store.Store +#endif #endif , FromJSON, ToJSON, NFData, Hashable, FromJSONKey, ToJSONKey, ToSchema , ToParamSchema, FromHttpApiData, ToHttpApiData, PathPiece, Arbitrary @@ -193,6 +196,9 @@ newtype Name t = Name { unName :: Text } #ifdef USE_FLAT , Flat #endif +#ifdef USE_STORE + , Data.Store.Store +#endif #endif , FromJSON, ToJSON, NFData, Hashable, FromJSONKey, ToJSONKey, ToSchema , ToParamSchema, FromHttpApiData, ToHttpApiData, PathPiece