git.iko.soy/typeable/id
on master help sign in
bug in flags
290276fVille Tirronen
src/Data/Id.hs+8−2
compare with master
unifiedsplit
@@ -144,9 +144,12 @@ newtype IntId t = IntId { unIntId :: Integer }
144#ifdef USE_CASSAVA
144#ifdef USE_CASSAVA
145 , Csv.ToField, Csv.FromField
145 , Csv.ToField, Csv.FromField
146#endif
146#endif
147+#ifdef USE_FLAT
148+ , Flat
149+#endif
147#endif
150#endif
148 , FromJSON, ToJSON, NFData, Hashable, FromJSONKey, ToJSONKey, ToSchema
151 , FromJSON, ToJSON, NFData, Hashable, FromJSONKey, ToJSONKey, ToSchema
149− , ToParamSchema, FromHttpApiData, ToHttpApiData, PathPiece, Flat, Arbitrary
152+ , ToParamSchema, FromHttpApiData, ToHttpApiData, PathPiece, Arbitrary
150 , Num, Integral, Real, Enum )
153 , Num, Integral, Real, Enum )
151
154
152type role IntId nominal
155type role IntId nominal
@@ -187,9 +190,12 @@ newtype Name t = Name { unName :: Text }
187#ifdef USE_CASSAVA
190#ifdef USE_CASSAVA
188 , Csv.ToField, Csv.FromField
191 , Csv.ToField, Csv.FromField
189#endif
192#endif
193+#ifdef USE_FLAT
194+ , Flat
195+#endif
190#endif
196#endif
191 , FromJSON, ToJSON, NFData, Hashable, FromJSONKey, ToJSONKey, ToSchema
197 , FromJSON, ToJSON, NFData, Hashable, FromJSONKey, ToJSONKey, ToSchema
192− , ToParamSchema, FromHttpApiData, ToHttpApiData, PathPiece, Flat
198+ , ToParamSchema, FromHttpApiData, ToHttpApiData, PathPiece
193 , IsString, Semigroup, Monoid )
199 , IsString, Semigroup, Monoid )
194
200
195type role Name nominal
201type role Name nominal