Database.Seakale.Tests.Store

Documentation

data StoreMock backend

Instances

Show (StoreMock backend)

Methods

showsPrec :: Int -> StoreMock backend -> ShowS

show :: StoreMock backend -> String

showList :: [StoreMock backend] -> ShowS

Mocking the database

mockSelect :: Storable backend k l a => Condition backend a -> SelectClauses backend a -> [Entity a] -> Mock (StoreMock backend) ()

mockSelect_ :: Storable backend k l a => Condition backend a -> [Entity a] -> Mock (StoreMock backend) ()

mockFailingSelect :: Storable backend k l a => Condition backend a -> SelectClauses backend a -> SeakaleError -> Mock (StoreMock backend) ()

mockCount :: Storable backend k l a => Condition backend a -> Integer -> Mock (StoreMock backend) ()

mockFailingCount :: Storable backend k l a => Condition backend a -> SeakaleError -> Mock (StoreMock backend) ()

mockGetMany :: (Storable backend k l a, ToRow backend k (EntityID a)) => [EntityID a] -> [Entity a] -> Mock (StoreMock backend) ()

mockGet :: (Storable backend k l a, ToRow backend k (EntityID a)) => EntityID a -> a -> Mock (StoreMock backend) ()

mockFailingGetMany :: (Storable backend k l a, ToRow backend k (EntityID a)) => [EntityID a] -> SeakaleError -> Mock (StoreMock backend) ()

mockFailingGet :: (Storable backend k l a, ToRow backend k (EntityID a)) => EntityID a -> SeakaleError -> Mock (StoreMock backend) ()

mockSelectJoin :: Storable backend k l a => JoinRelation backend k l a -> Condition backend a -> SelectClauses backend a -> [Entity a] -> Mock (StoreMock backend) ()

mockFailingSelectJoin :: Storable backend k l a => JoinRelation backend k l a -> Condition backend a -> SelectClauses backend a -> SeakaleError -> Mock (StoreMock backend) ()

mockCountJoin :: Storable backend k l a => JoinRelation backend k l a -> Condition backend a -> Integer -> Mock (StoreMock backend) ()

mockFailingCountJoin :: Storable backend k l a => JoinRelation backend k l a -> Condition backend a -> SeakaleError -> Mock (StoreMock backend) ()

mockInsertMany :: (Storable backend k l a, Eq a) => [a] -> [EntityID a] -> Mock (StoreMock backend) ()

mockInsert :: (Storable backend k l a, Eq a) => a -> EntityID a -> Mock (StoreMock backend) ()

mockFailingInsertMany :: (Storable backend k l a, Eq a) => [a] -> SeakaleError -> Mock (StoreMock backend) ()

mockFailingInsert :: (Storable backend k l a, Eq a) => a -> SeakaleError -> Mock (StoreMock backend) ()

mockUpdateMany :: Storable backend k l a => UpdateSetter backend a -> Condition backend a -> Integer -> Mock (StoreMock backend) ()

mockUpdate :: (Storable backend k l a, ToRow backend k (EntityID a)) => EntityID a -> UpdateSetter backend a -> Mock (StoreMock backend) ()

mockFailingUpdateMany :: Storable backend k l a => UpdateSetter backend a -> Condition backend a -> SeakaleError -> Mock (StoreMock backend) ()

mockFailingUpdate :: (Storable backend k l a, ToRow backend k (EntityID a)) => EntityID a -> UpdateSetter backend a -> SeakaleError -> Mock (StoreMock backend) ()

mockSave :: (Storable backend k l a, ToRow backend k (EntityID a), ToRow backend l a) => EntityID a -> a -> Mock (StoreMock backend) ()

mockFailingSave :: (Storable backend k l a, ToRow backend k (EntityID a), ToRow backend l a) => EntityID a -> a -> SeakaleError -> Mock (StoreMock backend) ()

mockDeleteMany :: Storable backend k l a => Condition backend a -> Integer -> Mock (StoreMock backend) ()

mockDelete :: (Storable backend k l a, ToRow backend k (EntityID a)) => EntityID a -> Mock (StoreMock backend) ()

mockFailingDeleteMany :: Storable backend k l a => Condition backend a -> SeakaleError -> Mock (StoreMock backend) ()

mockFailingDelete :: (Storable backend k l a, ToRow backend k (EntityID a)) => EntityID a -> SeakaleError -> Mock (StoreMock backend) ()

Running in a fake environment

runSelect :: Typeable backend => backend -> Mock (StoreMock backend) b -> Select backend a -> Either SeakaleError a

runSelectT :: (Monad m, Typeable backend) => backend -> Mock (StoreMock backend) b -> SelectT backend m a -> m (Either SeakaleError a)

runStore :: Typeable backend => backend -> Mock (StoreMock backend) b -> Store backend a -> Either SeakaleError a

runStoreT :: (Monad m, Typeable backend) => backend -> Mock (StoreMock backend) b -> StoreT backend m a -> m (Either SeakaleError a)

runSelect' :: Typeable backend => backend -> Mock (StoreMock backend) b -> Select backend a -> (Either SeakaleError a, Mock (StoreMock backend) b)

runSelectT' :: (Monad m, Typeable backend) => backend -> Mock (StoreMock backend) b -> SelectT backend m a -> m (Either SeakaleError a, Mock (StoreMock backend) b)

runStore' :: Typeable backend => backend -> Mock (StoreMock backend) b -> Store backend a -> (Either SeakaleError a, Mock (StoreMock backend) b)

runStoreT' :: (Monad m, Typeable backend) => backend -> Mock (StoreMock backend) b -> StoreT backend m a -> m (Either SeakaleError a, Mock (StoreMock backend) b)

module Database.Seakale.Tests.Mock