json-rpc-generic 0.2.1.1 → 0.2.1.2
raw patch · 2 files changed
+5/−3 lines, 2 filesdep +aeson-generic-compatdep ~aesonPVP: major bump suggested
API removals or changes: PVP suggests a major version bump
Dependencies added: aeson-generic-compat
Dependency ranges changed: aeson
API changes (from Hackage documentation)
- Data.JsonRpc.Generic: instance Data.Aeson.Types.Class.FromJSON a => Data.JsonRpc.Generic.GFromArrayJSON (GHC.Generics.K1 i a)
- Data.JsonRpc.Generic: instance Data.Aeson.Types.Class.ToJSON a => Data.JsonRpc.Generic.GToArrayJSON (GHC.Generics.K1 i a)
- Data.JsonRpc.Instances: instance (Data.Aeson.Types.Class.FromJSON e, Data.Aeson.Types.Class.FromJSON a) => Data.Aeson.Types.Class.FromJSON (Data.JsonRpc.Response.Response e a)
- Data.JsonRpc.Instances: instance (Data.Aeson.Types.Class.ToJSON e, Data.Aeson.Types.Class.ToJSON a) => Data.Aeson.Types.Class.ToJSON (Data.JsonRpc.Response.Response e a)
- Data.JsonRpc.Instances: instance Data.Aeson.Types.Class.FromJSON Data.JsonRpc.Failure.ErrorStatus
- Data.JsonRpc.Instances: instance Data.Aeson.Types.Class.FromJSON Data.JsonRpc.Id.Id
- Data.JsonRpc.Instances: instance Data.Aeson.Types.Class.FromJSON a => Data.Aeson.Types.Class.FromJSON (Data.JsonRpc.Request.Request a)
- Data.JsonRpc.Instances: instance Data.Aeson.Types.Class.FromJSON a => Data.Aeson.Types.Class.FromJSON (Data.JsonRpc.Success.Success a)
- Data.JsonRpc.Instances: instance Data.Aeson.Types.Class.FromJSON e => Data.Aeson.Types.Class.FromJSON (Data.JsonRpc.Failure.Error e)
- Data.JsonRpc.Instances: instance Data.Aeson.Types.Class.FromJSON e => Data.Aeson.Types.Class.FromJSON (Data.JsonRpc.Failure.Failure e)
- Data.JsonRpc.Instances: instance Data.Aeson.Types.Class.ToJSON Data.JsonRpc.Failure.ErrorStatus
- Data.JsonRpc.Instances: instance Data.Aeson.Types.Class.ToJSON Data.JsonRpc.Id.Id
- Data.JsonRpc.Instances: instance Data.Aeson.Types.Class.ToJSON a => Data.Aeson.Types.Class.ToJSON (Data.JsonRpc.Request.Request a)
- Data.JsonRpc.Instances: instance Data.Aeson.Types.Class.ToJSON a => Data.Aeson.Types.Class.ToJSON (Data.JsonRpc.Success.Success a)
- Data.JsonRpc.Instances: instance Data.Aeson.Types.Class.ToJSON e => Data.Aeson.Types.Class.ToJSON (Data.JsonRpc.Failure.Error e)
- Data.JsonRpc.Instances: instance Data.Aeson.Types.Class.ToJSON e => Data.Aeson.Types.Class.ToJSON (Data.JsonRpc.Failure.Failure e)
+ Data.JsonRpc.Generic: instance Data.Aeson.Types.FromJSON.FromJSON a => Data.JsonRpc.Generic.GFromArrayJSON (GHC.Generics.K1 i a)
+ Data.JsonRpc.Generic: instance Data.Aeson.Types.ToJSON.ToJSON a => Data.JsonRpc.Generic.GToArrayJSON (GHC.Generics.K1 i a)
+ Data.JsonRpc.Instances: instance (Data.Aeson.Types.FromJSON.FromJSON e, Data.Aeson.Types.FromJSON.FromJSON a) => Data.Aeson.Types.FromJSON.FromJSON (Data.JsonRpc.Response.Response e a)
+ Data.JsonRpc.Instances: instance (Data.Aeson.Types.ToJSON.ToJSON e, Data.Aeson.Types.ToJSON.ToJSON a) => Data.Aeson.Types.ToJSON.ToJSON (Data.JsonRpc.Response.Response e a)
+ Data.JsonRpc.Instances: instance Data.Aeson.Types.FromJSON.FromJSON Data.JsonRpc.Failure.ErrorStatus
+ Data.JsonRpc.Instances: instance Data.Aeson.Types.FromJSON.FromJSON Data.JsonRpc.Id.Id
+ Data.JsonRpc.Instances: instance Data.Aeson.Types.FromJSON.FromJSON a => Data.Aeson.Types.FromJSON.FromJSON (Data.JsonRpc.Request.Request a)
+ Data.JsonRpc.Instances: instance Data.Aeson.Types.FromJSON.FromJSON a => Data.Aeson.Types.FromJSON.FromJSON (Data.JsonRpc.Success.Success a)
+ Data.JsonRpc.Instances: instance Data.Aeson.Types.FromJSON.FromJSON e => Data.Aeson.Types.FromJSON.FromJSON (Data.JsonRpc.Failure.Error e)
+ Data.JsonRpc.Instances: instance Data.Aeson.Types.FromJSON.FromJSON e => Data.Aeson.Types.FromJSON.FromJSON (Data.JsonRpc.Failure.Failure e)
+ Data.JsonRpc.Instances: instance Data.Aeson.Types.ToJSON.ToJSON Data.JsonRpc.Failure.ErrorStatus
+ Data.JsonRpc.Instances: instance Data.Aeson.Types.ToJSON.ToJSON Data.JsonRpc.Id.Id
+ Data.JsonRpc.Instances: instance Data.Aeson.Types.ToJSON.ToJSON a => Data.Aeson.Types.ToJSON.ToJSON (Data.JsonRpc.Request.Request a)
+ Data.JsonRpc.Instances: instance Data.Aeson.Types.ToJSON.ToJSON a => Data.Aeson.Types.ToJSON.ToJSON (Data.JsonRpc.Success.Success a)
+ Data.JsonRpc.Instances: instance Data.Aeson.Types.ToJSON.ToJSON e => Data.Aeson.Types.ToJSON.ToJSON (Data.JsonRpc.Failure.Error e)
+ Data.JsonRpc.Instances: instance Data.Aeson.Types.ToJSON.ToJSON e => Data.Aeson.Types.ToJSON.ToJSON (Data.JsonRpc.Failure.Failure e)
- Data.JsonRpc.Generic: genericFieldSetParseJSON :: (Generic a, GFromJSON (Rep a), GFieldSetJSON (Rep a)) => JsonRpcOptions -> Options -> Value -> Parser a
+ Data.JsonRpc.Generic: genericFieldSetParseJSON :: (Generic a, GFromJSON0 (Rep a), GFieldSetJSON (Rep a)) => JsonRpcOptions -> Options -> Value -> Parser a
- Data.JsonRpc.Generic: genericParseJSONRPC :: (Generic a, GFromJSON (Rep a), GFromArrayJSON (Rep a), GFieldSetJSON (Rep a)) => JsonRpcOptions -> Options -> Value -> Parser a
+ Data.JsonRpc.Generic: genericParseJSONRPC :: (Generic a, GFromJSON0 (Rep a), GFromArrayJSON (Rep a), GFieldSetJSON (Rep a)) => JsonRpcOptions -> Options -> Value -> Parser a
Files
json-rpc-generic.cabal view
@@ -1,5 +1,5 @@ name: json-rpc-generic-version: 0.2.1.1+version: 0.2.1.2 synopsis: Generic encoder and decode for JSON-RPC description: This package contains generic encoder and decode for JSON-RPC homepage: http://github.com/khibino/haskell-json-rpc-generic@@ -51,6 +51,7 @@ , scientific , vector >=0.10 , aeson >=0.7+ , aeson-generic-compat hs-source-dirs: src default-language: Haskell2010
src/Data/JsonRpc/Generic.hs view
@@ -25,6 +25,7 @@ import qualified Data.Text as T import Data.Aeson.Types (FromJSON (..), ToJSON (..), GFromJSON, genericParseJSON, Parser, Options (..), Value (..))+import Data.Aeson.Generic.Compat (GFromJSON0) import Data.Vector (Vector) import qualified Data.Vector as Vector @@ -89,7 +90,7 @@ instance GFieldSetJSON (K1 i a) where gFieldSet = return $ K1 undefined -genericFieldSetParseJSON :: (Generic a, GFromJSON (Rep a), GFieldSetJSON (Rep a))+genericFieldSetParseJSON :: (Generic a, GFromJSON0 (Rep a), GFieldSetJSON (Rep a)) => JsonRpcOptions -> Options -> Value@@ -108,7 +109,7 @@ genericParseJSON opts v -genericParseJSONRPC :: (Generic a, GFromJSON (Rep a), GFromArrayJSON (Rep a), GFieldSetJSON (Rep a))+genericParseJSONRPC :: (Generic a, GFromJSON0 (Rep a), GFromArrayJSON (Rep a), GFieldSetJSON (Rep a)) => JsonRpcOptions -> Options -> Value -> Parser a genericParseJSONRPC rpcOpt opt = d where d (Array vs) = do (a, s) <- runStateT gFromArrayJSON $ Vector.toList vs