higher-leveldb 0.5.0.1 → 0.5.0.2
raw patch · 2 files changed
+14/−13 lines, 2 filesPVP: major bump suggested
API removals or changes: PVP suggests a major version bump
API changes (from Hackage documentation)
- Database.LevelDB.Higher: Options :: !Int -> !Int -> !Int -> !Maybe Comparator -> !Compression -> !Bool -> !Bool -> !Int -> !Bool -> !Int -> !Maybe Either BloomFilter FilterPolicy -> Options
+ Database.LevelDB.Higher: Options :: !Int -> !Int -> !Int -> !Maybe Comparator -> !Compression -> !Bool -> !Bool -> !Int -> !Bool -> !Int -> !Maybe (Either BloomFilter FilterPolicy) -> Options
- Database.LevelDB.Higher: [filterPolicy] :: Options -> !Maybe Either BloomFilter FilterPolicy
+ Database.LevelDB.Higher: [filterPolicy] :: Options -> !Maybe (Either BloomFilter FilterPolicy)
- Database.LevelDB.Higher: class Monad m => MonadThrow (m :: * -> *)
+ Database.LevelDB.Higher: class Monad m => MonadThrow (m :: Type -> Type)
- Database.LevelDB.Higher: class MonadIO m => MonadUnliftIO (m :: * -> *)
+ Database.LevelDB.Higher: class MonadIO m => MonadUnliftIO (m :: Type -> Type)
- Database.LevelDB.Higher: data Options :: *
+ Database.LevelDB.Higher: data Options
- Database.LevelDB.Higher: data ReadOptions :: *
+ Database.LevelDB.Higher: data ReadOptions
- Database.LevelDB.Higher: data WriteOptions :: *
+ Database.LevelDB.Higher: data WriteOptions
- Database.LevelDB.Higher: delete :: (MonadLevelDB m) => Key -> m ()
+ Database.LevelDB.Higher: delete :: MonadLevelDB m => Key -> m ()
- Database.LevelDB.Higher: deleteB :: (MonadLevelDB m) => Key -> WriterT WriteBatch m ()
+ Database.LevelDB.Higher: deleteB :: MonadLevelDB m => Key -> WriterT WriteBatch m ()
- Database.LevelDB.Higher: forkLevelDB :: (MonadLevelDB m) => LevelDB () -> m ThreadId
+ Database.LevelDB.Higher: forkLevelDB :: MonadLevelDB m => LevelDB () -> m ThreadId
- Database.LevelDB.Higher: get :: (MonadLevelDB m) => Key -> m (Maybe Value)
+ Database.LevelDB.Higher: get :: MonadLevelDB m => Key -> m (Maybe Value)
- Database.LevelDB.Higher: put :: (MonadLevelDB m) => Key -> Value -> m ()
+ Database.LevelDB.Higher: put :: MonadLevelDB m => Key -> Value -> m ()
- Database.LevelDB.Higher: putB :: (MonadLevelDB m) => Key -> Value -> WriterT WriteBatch m ()
+ Database.LevelDB.Higher: putB :: MonadLevelDB m => Key -> Value -> WriterT WriteBatch m ()
- Database.LevelDB.Higher: queryCount :: (Num a) => ScanQuery a a
+ Database.LevelDB.Higher: queryCount :: Num a => ScanQuery a a
- Database.LevelDB.Higher: runBatch :: (MonadLevelDB m) => WriterT WriteBatch m () -> m ()
+ Database.LevelDB.Higher: runBatch :: MonadLevelDB m => WriterT WriteBatch m () -> m ()
- Database.LevelDB.Higher: scan :: (MonadLevelDB m) => Key -> ScanQuery a b -> m b
+ Database.LevelDB.Higher: scan :: MonadLevelDB m => Key -> ScanQuery a b -> m b
- Database.LevelDB.Higher: withKeySpace :: (MonadLevelDB m) => KeySpace -> m a -> m a
+ Database.LevelDB.Higher: withKeySpace :: MonadLevelDB m => KeySpace -> m a -> m a
- Database.LevelDB.Higher: withOptions :: (MonadLevelDB m) => RWOptions -> m a -> m a
+ Database.LevelDB.Higher: withOptions :: MonadLevelDB m => RWOptions -> m a -> m a
- Database.LevelDB.Higher: withSnapshot :: (MonadLevelDB m) => m a -> m a
+ Database.LevelDB.Higher: withSnapshot :: MonadLevelDB m => m a -> m a
Files
- higher-leveldb.cabal +1/−1
- test/Database/LevelDB/HigherSpec.hs +13/−12
higher-leveldb.cabal view
@@ -2,7 +2,7 @@ -- documentation, see http://haskell.org/cabal/users-guide/ name: higher-leveldb-version: 0.5.0.1+version: 0.5.0.2 synopsis: A rich monadic API for working with leveldb databases. description: A rich monadic API for working with leveldb databases. homepage: https://github.com/jeremyjh/higher-leveldb
test/Database/LevelDB/HigherSpec.hs view
@@ -1,21 +1,22 @@-{-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE GeneralizedNewtypeDeriving #-}+{-# LANGUAGE OverloadedStrings #-} module Database.LevelDB.HigherSpec (main, spec) where -import qualified Data.ByteString as BS-import Data.Serialize (encode)+import Control.Applicative (Applicative)+import Control.Monad.Base (MonadBase (..))+import Control.Monad.Reader+import Control.Monad.Trans.Resource+import Control.Monad.Writer+import qualified Data.ByteString as BS+import Data.Maybe (fromJust) import Data.Monoid-import Test.Hspec-import System.Process(system)+import Data.Serialize (encode) import Database.LevelDB.Higher-import UnliftIO.Concurrent (ThreadId, threadDelay)+import System.Process (system)+import Test.Hspec+import UnliftIO.Concurrent (ThreadId, threadDelay) import UnliftIO.MVar-import Control.Monad.Trans.Resource-import Control.Monad.Reader-import Control.Monad.Writer-import Control.Applicative (Applicative)-import Control.Monad.Base (MonadBase(..)) --debug import Debug.Trace@@ -149,7 +150,7 @@ put "somekey" "somedata" return (v + 1) mvalue <- readMVar mv- Just ldbvalue <- get "somekey"+ ldbvalue <- fromJust <$> get "somekey" return (mvalue, ldbvalue) `shouldReturn` (1, "somedata")