json-rpc-client 0.2.2.0 → 0.2.3.0
raw patch · 3 files changed
+9/−9 lines, 3 filesdep ~aesondep ~processnew-uploaderPVP: major bump suggested
API removals or changes: PVP suggests a major version bump
Dependency ranges changed: aeson, process
API changes (from Hackage documentation)
- Network.JsonRpc.Client: errCode :: RpcError -> Int
- Network.JsonRpc.Client: errData :: RpcError -> Maybe Value
- Network.JsonRpc.Client: errMsg :: RpcError -> Text
- Network.JsonRpc.Client: instance (ClientFunction ps r f, ToJSON a) => ClientFunction (a ::: ps) r (a -> f)
- Network.JsonRpc.Client: instance Alternative Batch
- Network.JsonRpc.Client: instance Applicative Batch
- Network.JsonRpc.Client: instance ComposeMultiParam (Batch a -> b) (Batch a) b
- Network.JsonRpc.Client: instance ComposeMultiParam f g h => ComposeMultiParam f (a -> g) (a -> h)
- Network.JsonRpc.Client: instance FromJSON Response
- Network.JsonRpc.Client: instance FromJSON r => ClientFunction () r (Batch r)
- Network.JsonRpc.Client: instance Functor Batch
- Network.JsonRpc.Client: instance Show ps => Show (Signature ps r)
- Network.JsonRpc.Client: instance Show ps => Show (p ::: ps)
- Network.JsonRpc.Client: instance ToJSON IdRequest
- Network.JsonRpc.ServerAdapter: instance ConvertParams () ()
- Network.JsonRpc.ServerAdapter: instance ConvertParams ps1 ps2 => ConvertParams (p ::: ps1) (p :+: ps2)
+ Network.JsonRpc.Client: [errCode] :: RpcError -> Int
+ Network.JsonRpc.Client: [errData] :: RpcError -> Maybe Value
+ Network.JsonRpc.Client: [errMsg] :: RpcError -> Text
+ Network.JsonRpc.Client: instance (Network.JsonRpc.Client.ClientFunction ps r f, Data.Aeson.Types.Class.ToJSON a) => Network.JsonRpc.Client.ClientFunction (a Network.JsonRpc.Client.::: ps) r (a -> f)
+ Network.JsonRpc.Client: instance Data.Aeson.Types.Class.FromJSON Network.JsonRpc.Client.Response
+ Network.JsonRpc.Client: instance Data.Aeson.Types.Class.FromJSON r => Network.JsonRpc.Client.ClientFunction () r (Network.JsonRpc.Client.Batch r)
+ Network.JsonRpc.Client: instance Data.Aeson.Types.Class.ToJSON Network.JsonRpc.Client.IdRequest
+ Network.JsonRpc.Client: instance GHC.Base.Alternative Network.JsonRpc.Client.Batch
+ Network.JsonRpc.Client: instance GHC.Base.Applicative Network.JsonRpc.Client.Batch
+ Network.JsonRpc.Client: instance GHC.Base.Functor Network.JsonRpc.Client.Batch
+ Network.JsonRpc.Client: instance GHC.Show.Show ps => GHC.Show.Show (Network.JsonRpc.Client.Signature ps r)
+ Network.JsonRpc.Client: instance GHC.Show.Show ps => GHC.Show.Show (p Network.JsonRpc.Client.::: ps)
+ Network.JsonRpc.Client: instance Network.JsonRpc.Client.ComposeMultiParam (Network.JsonRpc.Client.Batch a -> b) (Network.JsonRpc.Client.Batch a) b
+ Network.JsonRpc.Client: instance Network.JsonRpc.Client.ComposeMultiParam f g h => Network.JsonRpc.Client.ComposeMultiParam f (a -> g) (a -> h)
+ Network.JsonRpc.ServerAdapter: instance Network.JsonRpc.ServerAdapter.ConvertParams () ()
+ Network.JsonRpc.ServerAdapter: instance Network.JsonRpc.ServerAdapter.ConvertParams ps1 ps2 => Network.JsonRpc.ServerAdapter.ConvertParams (p Network.JsonRpc.Client.::: ps1) (p Network.JsonRpc.Types.:+: ps2)
Files
- json-rpc-client.cabal +6/−6
- tests/Properties.hs +2/−2
- tests/Tests.hs +1/−1
json-rpc-client.cabal view
@@ -1,5 +1,5 @@ name: json-rpc-client-version: 0.2.2.0+version: 0.2.3.0 license: MIT license-file: LICENSE category: Network, JSON@@ -39,7 +39,7 @@ Network.JsonRpc.ServerAdapter build-depends: base >=4.3.1 && <4.9, json-rpc-server >=0.2 && <0.3,- aeson >=0.7 && <0.11,+ aeson >=0.7 && <0.12, bytestring >=0.9.1 && <0.11, mtl >=2.2.1 && <2.3, text >=0.11.2 && <1.3,@@ -58,7 +58,7 @@ build-depends: base >=4.3.1 && <4.9, json-rpc-client, json-rpc-server >=0.2 && <0.3,- aeson >=0.7 && <0.11,+ aeson >=0.7 && <0.12, bytestring >=0.9.2 && <0.11, mtl >=2.2.1 && <2.3, text >=0.11.2 && <1.3@@ -74,8 +74,8 @@ build-depends: base >=4.3.1 && <4.9, json-rpc-client, json-rpc-server >=0.2 && <0.3,- process >=1.1.0 && <1.3,- aeson >=0.7 && <0.11,+ process >=1.1.0 && <1.5,+ aeson >=0.7 && <0.12, bytestring >=0.9.2 && <0.11, mtl >=2.2.1 && <2.3, text >=0.11.2 && <1.3@@ -91,7 +91,7 @@ build-depends: base >=4.3.1 && <4.9, json-rpc-client, json-rpc-server >=0.2 && <0.3,- aeson >=0.7 && <0.11,+ aeson >=0.7 && <0.12, bytestring >=0.9.1 && <0.11, mtl >=2.2.1 && <2.3, scientific >=0.2 && <0.4,
tests/Properties.hs view
@@ -175,7 +175,7 @@ toServerMethods :: ss -> Gen [Method (State S)] instance (TestClientFunction ps r f1, Params ps,- MethodParams f2 ps2 (State S) r, ConvertParams ps ps2, Arbitrary f2, Arbitrary r, CoArbitrary r)+ MethodParams f2 ps2 (State S) r, ConvertParams ps ps2, Arbitrary f2, CoArbitrary r) => SignatureSet (Signature ps r) where methodNames (Signature name _) = [name] allParamNames (Signature _ ps) = [paramNames ps]@@ -183,7 +183,7 @@ toServerMethods sig = (\f -> [toServerMethod sig f]) <$> arbitrary instance (SignatureSet ss, TestClientFunction ps r f1, Params ps,- MethodParams f2 ps2 (State S) r, ConvertParams ps ps2, Arbitrary f2, Arbitrary r, CoArbitrary r)+ MethodParams f2 ps2 (State S) r, ConvertParams ps ps2, Arbitrary f2, CoArbitrary r) => SignatureSet (Signature ps r :*: ss) where methodNames (Signature name _ :*: sigs) = name : methodNames sigs allParamNames (Signature _ ps :*: sigs) = paramNames ps : allParamNames sigs
tests/Tests.hs view
@@ -184,7 +184,7 @@ where mapLeft f (Left x) = Left $ f x mapLeft _ (Right x) = Right x -myRunBatch :: A.FromJSON a => Batch a -> (Either Int a, Int)+myRunBatch :: Batch a -> (Either Int a, Int) myRunBatch = runResult . runBatch myServer myServer :: B.ByteString -> RequestCount (Maybe B.ByteString)