Database.Persist.GenericSql

This is a helper module for creating SQL backends. Regular users do not need to use this module.

Documentation

data GenericSql m

Constructors

GenericSql

Fields

gsWithStmt :: forall a. String -> [PersistValue] -> (RowPopper m -> m a) -> m a

gsExecute :: String -> [PersistValue] -> m ()

gsInsert :: String -> [String] -> [PersistValue] -> m Int64

gsEntityDefExists :: String -> m Bool

gsKeyType :: String

gsShowSqlType :: SqlType -> String

type RowPopper m = m (Maybe [PersistValue])

initialize :: (Monad m, PersistEntity v) => GenericSql m -> v -> m ()

insert :: (Monad m, PersistEntity val) => GenericSql m -> val -> m (Key val)

get :: (PersistEntity v, Monad m) => GenericSql m -> Key v -> m (Maybe v)

replace :: (PersistEntity v, Monad m) => GenericSql m -> Key v -> v -> m ()

select :: (PersistEntity val, Monad m) => GenericSql m -> [Filter val] -> [Order val] -> m [(Key val, val)]

deleteWhere :: (PersistEntity v, Monad m) => GenericSql m -> [Filter v] -> m ()

update :: (PersistEntity v, Monad m) => GenericSql m -> Key v -> [Update v] -> m ()

updateWhere :: (PersistEntity v, Monad m) => GenericSql m -> [Filter v] -> [Update v] -> m ()

getBy :: (PersistEntity v, Monad m) => GenericSql m -> Unique v -> m (Maybe (Key v, v))

delete :: (PersistEntity v, Monad m) => GenericSql m -> Key v -> m ()

deleteBy :: (PersistEntity v, Monad m) => GenericSql m -> Unique v -> m ()