cassandra-cql 0.2.0.3 → 0.3.0.0
raw patch · 2 files changed
+27/−4 lines, 2 filesdep +MonadCatchIO-transformersdep −MonadCatchIO-mtlPVP ok
version bump matches the API change (PVP)
Dependencies added: MonadCatchIO-transformers
Dependencies removed: MonadCatchIO-mtl
API changes (from Hackage documentation)
+ Database.Cassandra.CQL: PreparedQueryID :: ByteString -> PreparedQueryID
+ Database.Cassandra.CQL: instance [overlap ok] (MonadCassandra m, Error e) => MonadCassandra (ErrorT e m)
+ Database.Cassandra.CQL: instance [overlap ok] (MonadCassandra m, Monoid a) => MonadCassandra (WriterT a m)
+ Database.Cassandra.CQL: instance [overlap ok] (MonadCassandra m, Monoid w) => MonadCassandra (RWST r w s m)
+ Database.Cassandra.CQL: instance [overlap ok] MonadCassandra m => MonadCassandra (ReaderT a m)
+ Database.Cassandra.CQL: instance [overlap ok] MonadCassandra m => MonadCassandra (StateT a m)
+ Database.Cassandra.CQL: newtype PreparedQueryID
Files
- Database/Cassandra/CQL.hs +24/−1
- cassandra-cql.cabal +3/−3
Database/Cassandra/CQL.hs view
@@ -140,7 +140,8 @@ ColumnSpec(..), Metadata(..), CType(..),- Table(..)+ Table(..),+ PreparedQueryID(..) ) where import Control.Applicative@@ -151,6 +152,12 @@ import Control.Monad.Reader import Control.Monad.State hiding (get, put) import qualified Control.Monad.State as State+import qualified Control.Monad.Reader+import qualified Control.Monad.RWS+import qualified Control.Monad.State+import qualified Control.Monad.State.Strict+import qualified Control.Monad.Error+import qualified Control.Monad.Writer import Control.Monad.Trans import Crypto.Hash (hash, Digest, SHA1) import Data.Bits@@ -165,6 +172,7 @@ import Data.Map (Map) import qualified Data.Map as M import Data.Maybe+import Data.Monoid (Monoid) import Data.Sequence (Seq, (|>)) import qualified Data.Sequence as Seq import Data.Serialize hiding (Result)@@ -209,6 +217,21 @@ class MonadCatchIO m => MonadCassandra m where getCassandraPool :: m Pool++instance MonadCassandra m => MonadCassandra (Control.Monad.Reader.ReaderT a m) where+ getCassandraPool = lift getCassandraPool++instance MonadCassandra m => MonadCassandra (Control.Monad.State.StateT a m) where+ getCassandraPool = lift getCassandraPool++instance (MonadCassandra m, Control.Monad.Error.Error e) => MonadCassandra (Control.Monad.Error.ErrorT e m) where+ getCassandraPool = lift getCassandraPool++instance (MonadCassandra m, Monoid a) => MonadCassandra (Control.Monad.Writer.WriterT a m) where+ getCassandraPool = lift getCassandraPool++instance (MonadCassandra m, Monoid w) => MonadCassandra (Control.Monad.RWS.RWST r w s m) where+ getCassandraPool = lift getCassandraPool -- | Construct a pool of Cassandra connections. newPool :: [Server] -> Keyspace -> IO Pool
cassandra-cql.cabal view
@@ -1,7 +1,7 @@ name: cassandra-cql-version: 0.2.0.3+version: 0.3.0.0 synopsis: Haskell client for Cassandra's CQL protocol-description: +description: Haskell client for Cassandra's CQL protocol license: BSD3 license-file: LICENSE@@ -33,7 +33,7 @@ build-depends: base >= 4.5.0.0 && < 4.7.0.0, containers >= 0.4.0.0, mtl >= 2.1.0,- MonadCatchIO-mtl >= 0.3.0.0,+ MonadCatchIO-transformers >= 0.3.0.0, network >= 2.4.0.0, text >= 0.11.0.0, cereal >= 0.3.0.0,