git.iko.soy/squeal
on dev help sign in
more consistent naming
0472429Mike Ledger
squeal-postgresql/src/Squeal/PostgreSQL/Expression.hs+6−6
compare with dev
unifiedsplit
@@ -902,8 +902,8 @@ json and jsonb operators
902see https://www.postgresql.org/docs/10/static/functions-json.html
902see https://www.postgresql.org/docs/10/static/functions-json.html
903-----------------------------------------}
903-----------------------------------------}
904
904
905−type IsJSONKey key = key `In` '[ 'PGint2, 'PGint4, 'PGtext ]
905+type PGjsonKey key = key `In` '[ 'PGint2, 'PGint4, 'PGtext ]
906−type IsJSON json = json `In` '[ 'PGjson, 'PGjsonb ]
906+type PGjson_ json = json `In` '[ 'PGjson, 'PGjsonb ]
907
907
908type Placeholder k
908type Placeholder k
909 = 'Text "(_"
909 = 'Text "(_"
@@ -937,7 +937,7 @@ type IsPGtextArray arr = PGarrayOf arr 'PGtext
937
937
938-- | Get JSON value (object field or array element) at a key.
938-- | Get JSON value (object field or array element) at a key.
939(.->)
939(.->)
940− :: (IsJSON json, IsJSONKey key)
940+ :: (PGjson_ json, PGjsonKey key)
941 => Expression schema relations grouping params (jnull json)
941 => Expression schema relations grouping params (jnull json)
942 -> Expression schema relations grouping params (knull key)
942 -> Expression schema relations grouping params (knull key)
943 -> Expression schema relations grouping params ('Null json)
943 -> Expression schema relations grouping params ('Null json)
@@ -945,7 +945,7 @@ type IsPGtextArray arr = PGarrayOf arr 'PGtext
945
945
946-- | Get JSON value (object field or array element) at a key, as text.
946-- | Get JSON value (object field or array element) at a key, as text.
947(.->>)
947(.->>)
948− :: (IsJSON json, IsJSONKey key)
948+ :: (PGjson_ json, PGjsonKey key)
949 => Expression schema relations grouping params (jnull json)
949 => Expression schema relations grouping params (jnull json)
950 -> Expression schema relations grouping params (knull key)
950 -> Expression schema relations grouping params (knull key)
951 -> Expression schema relations grouping params ('Null 'PGtext)
951 -> Expression schema relations grouping params ('Null 'PGtext)
@@ -953,7 +953,7 @@ type IsPGtextArray arr = PGarrayOf arr 'PGtext
953
953
954-- | Get JSON value at a specified path.
954-- | Get JSON value at a specified path.
955(.#>)
955(.#>)
956− :: (IsJSON json, IsPGtextArray path)
956+ :: (PGjson_ json, IsPGtextArray path)
957 => Expression schema relations grouping params (jnull json)
957 => Expression schema relations grouping params (jnull json)
958 -> Expression schema relations grouping params (knull path)
958 -> Expression schema relations grouping params (knull path)
959 -> Expression schema relations grouping params ('Null json)
959 -> Expression schema relations grouping params ('Null json)
@@ -961,7 +961,7 @@ type IsPGtextArray arr = PGarrayOf arr 'PGtext
961
961
962-- | Get JSON value at a specified path as text.
962-- | Get JSON value at a specified path as text.
963(.#>>)
963(.#>>)
964− :: (IsJSON json, IsPGtextArray path)
964+ :: (PGjson_ json, IsPGtextArray path)
965 => Expression schema relations grouping params (jnull json)
965 => Expression schema relations grouping params (jnull json)
966 -> Expression schema relations grouping params (knull path)
966 -> Expression schema relations grouping params (knull path)
967 -> Expression schema relations grouping params ('Null 'PGtext)
967 -> Expression schema relations grouping params ('Null 'PGtext)