git.iko.soy/typeable/id
on master help sign in
Add DBEq instances.
52b42d1Nick
src/Data/Id.hs+4−4
compare with master
unifiedsplit
@@ -53,7 +53,7 @@ import Flat as F
53import qualified Data.Store
53import qualified Data.Store
54#endif
54#endif
55#ifdef USE_REL8
55#ifdef USE_REL8
56−import Rel8 (DBType(..))
56+import Rel8 (DBType(..), DBEq(..))
57#endif
57#endif
58
58
59newtype Id t = Id { unId :: UUID }
59newtype Id t = Id { unId :: UUID }
@@ -65,7 +65,7 @@ newtype Id t = Id { unId :: UUID }
65 , PG.ToField, PG.FromField
65 , PG.ToField, PG.FromField
66#endif
66#endif
67#ifdef USE_REL8
67#ifdef USE_REL8
68− , DBType
68+ , DBType, DBEq
69#endif
69#endif
70#endif
70#endif
71 , FromJSON, ToJSON, NFData, Hashable, FromJSONKey, ToJSONKey
71 , FromJSON, ToJSON, NFData, Hashable, FromJSONKey, ToJSONKey
@@ -166,7 +166,7 @@ newtype IntId t = IntId Int64
166 , Data.Store.Store
166 , Data.Store.Store
167#endif
167#endif
168#ifdef USE_REL8
168#ifdef USE_REL8
169− , DBType
169+ , DBType, DBEq
170#endif
170#endif
171#endif
171#endif
172 , FromJSON, ToJSON, NFData, Hashable, FromJSONKey, ToJSONKey
172 , FromJSON, ToJSON, NFData, Hashable, FromJSONKey, ToJSONKey
@@ -223,7 +223,7 @@ newtype Name t = Name { unName :: Text }
223 , Data.Store.Store
223 , Data.Store.Store
224#endif
224#endif
225#ifdef USE_REL8
225#ifdef USE_REL8
226− , DBType
226+ , DBType, DBEq
227#endif
227#endif
228#endif
228#endif
229 , FromJSON, ToJSON, NFData, Hashable, FromJSONKey, ToJSONKey
229 , FromJSON, ToJSON, NFData, Hashable, FromJSONKey, ToJSONKey
stack.yaml+1−1
@@ -8,7 +8,7 @@ nix:
8
8
9flags:
9flags:
10 id:
10 id:
11− rel8: false
11+ rel8: true
12 openapi: false
12 openapi: false
13 lens: false
13 lens: false
14 cassava: false
14 cassava: false