More fixes

This commit is contained in:
Ville Tirronen 2022-07-28 13:45:10 +03:00
parent 290276fa58
commit c1248c2f81

View File

@ -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