servant-streaming-client 0.2.0.0 → 0.3.0.0
raw patch · 2 files changed
+18/−23 lines, 2 filesdep ~QuickCheckdep ~basedep ~servant
Dependency ranges changed: QuickCheck, base, servant, servant-client-core, servant-streaming
Files
servant-streaming-client.cabal view
@@ -1,11 +1,11 @@--- This file has been generated from package.yaml by hpack version 0.20.0.+-- This file has been generated from package.yaml by hpack version 0.21.2. -- -- see: https://github.com/sol/hpack ----- hash: b71d6f6ded7bd45e1d8a989dd9f3daf9f47ad37ac900c89e408f13b55770fa3b+-- hash: 4ab6a4720e9fee8a5e4120675e3d151a7d7eae111194baa6e3f1a6a9c4bb5513 name: servant-streaming-client-version: 0.2.0.0+version: 0.3.0.0 synopsis: Client instances for the 'servant-streaming' package. description: This package defines instances that allow using the 'StreamBody' and 'StreamResponse' combinators in 'servant' clients. homepage: http://github.com/plow-technologies/servant-streaming#readme@@ -24,51 +24,51 @@ location: https://github.com/plow-technologies/servant-streaming library+ exposed-modules:+ Servant.Streaming.Client+ Servant.Streaming.Client.Internal hs-source-dirs: src default-extensions: AutoDeriveTypeable ConstraintKinds DataKinds DefaultSignatures DeriveFoldable DeriveFunctor DeriveGeneric DeriveTraversable FlexibleContexts FlexibleInstances FunctionalDependencies GADTs KindSignatures MultiParamTypeClasses OverloadedStrings RankNTypes ScopedTypeVariables TypeFamilies TypeOperators ghc-options: -Wall build-depends:- base >=4.7 && <4.11+ base >=4.7 && <4.12 , bytestring , http-media >=0.6 && <0.8 , http-types >=0.9 && <0.13 , resourcet >=1.1 && <1.3- , servant >=0.10 && <0.15- , servant-client-core >=0.10 && <0.15- , servant-streaming >=0.2 && <0.3+ , servant >=0.14 && <0.15+ , servant-client-core >=0.14 && <0.15+ , servant-streaming >=0.2 && <0.4 , streaming >=0.1 && <0.3- exposed-modules:- Servant.Streaming.Client- Servant.Streaming.Client.Internal default-language: Haskell2010 test-suite spec type: exitcode-stdio-1.0 main-is: Spec.hs+ other-modules:+ Servant.Streaming.ClientSpec+ Paths_servant_streaming_client hs-source-dirs: test default-extensions: AutoDeriveTypeable ConstraintKinds DataKinds DefaultSignatures DeriveFoldable DeriveFunctor DeriveGeneric DeriveTraversable FlexibleContexts FlexibleInstances FunctionalDependencies GADTs KindSignatures MultiParamTypeClasses OverloadedStrings RankNTypes ScopedTypeVariables TypeFamilies TypeOperators ghc-options: -Wall -Wall -with-rtsopts=-T build-depends:- QuickCheck >=2.8 && <2.11- , base >=4.7 && <4.11+ QuickCheck >=2.8 && <2.12+ , base >=4.7 && <4.12 , bytestring , hspec >2 && <3 , http-client , http-media >=0.6 && <0.8 , http-types >=0.9 && <0.13 , resourcet >=1.1 && <1.3- , servant >=0.10 && <0.15+ , servant >=0.14 && <0.15 , servant-client- , servant-client-core >=0.10 && <0.15+ , servant-client-core >=0.14 && <0.15 , servant-server- , servant-streaming >=0.2 && <0.3+ , servant-streaming >=0.2 && <0.4 , servant-streaming-client , servant-streaming-server , streaming >=0.1 && <0.3 , warp- other-modules:- Servant.Streaming.ClientSpec- Paths_servant_streaming_client default-language: Haskell2010
src/Servant/Streaming/Client/Internal.hs view
@@ -1,5 +1,4 @@ {-# OPTIONS_GHC -fno-warn-orphans #-}-{-# LANGUAGE CPP #-} module Servant.Streaming.Client.Internal where import Control.Monad@@ -40,10 +39,8 @@ | BS.null bs -> writeIORef ref str >> popper | otherwise -> writeIORef ref str >> return bs liftIO $ write popper-#if MIN_VERSION_servant_client_core(0,13,0) hoistClientMonad pm _ f cl = \a -> hoistClientMonad pm (Proxy :: Proxy subapi) f (cl a)-#endif instance (RunClient m ) => HasClient m (StreamResponse verb status contentTypes) where@@ -61,6 +58,4 @@ unless (BS.null bs) $ do S.yield bs toStream read'-#if MIN_VERSION_servant_client_core(0,13,0) hoistClientMonad _m _ f cl = f cl-#endif