Data.Acid.Memory.Pure

AcidState container without a transaction log. Mostly used for testing.

Documentation

class SafeCopy st => IsAcidic st where

Minimal complete definition

acidEvents

Methods

acidEvents :: [Event st]

data AcidState st

State container offering full ACID (Atomicity, Consistency, Isolation and Durability) guarantees.

Atomicity

State changes are all-or-nothing. This is what you'd expect of any state variable in Haskell and AcidState doesn't change that.

Consistency

No event or set of events will break your data invariants.

Isolation

Transactions cannot interfere with each other even when issued in parallel.

Durability

Successful transaction are guaranteed to survive system failure (both hardware and software).

data Event st where

We distinguish between events that modify the state and those that do not.

UpdateEvents are executed in a MonadState context and have to be serialized to disk before they are considered durable.

QueryEvents are executed in a MonadReader context and obviously do not have to be serialized to disk.

Constructors

UpdateEvent :: UpdateEvent ev => (ev -> Update (EventState ev) (EventResult ev)) -> Event (EventState ev)

QueryEvent :: QueryEvent ev => (ev -> Query (EventState ev) (EventResult ev)) -> Event (EventState ev)

type EventResult ev = MethodResult ev

Events return the same thing as Methods. The exact type of EventResult depends on the event.

type EventState ev = MethodState ev

class Method ev => UpdateEvent ev

All UpdateEvents are also Methods.

class Method ev => QueryEvent ev

All QueryEvents are also Methods.

data Update st a

Context monad for Update events.

Instances

MonadState st (Update st)

Methods

get :: Update st st

put :: st -> Update st ()

state :: (st -> (a, st)) -> Update st a

Monad (Update st)

Methods

(>>=) :: Update st a -> (a -> Update st b) -> Update st b

(>>) :: Update st a -> Update st b -> Update st b

return :: a -> Update st a

fail :: String -> Update st a

Functor (Update st)

Methods

fmap :: (a -> b) -> Update st a -> Update st b

(<$) :: a -> Update st b -> Update st a

Applicative (Update st)

Methods

pure :: a -> Update st a

(<*>) :: Update st (a -> b) -> Update st a -> Update st b

(*>) :: Update st a -> Update st b -> Update st b

(<*) :: Update st a -> Update st b -> Update st a

data Query st a

Context monad for Query events.

Instances

MonadReader st (Query st)

Methods

ask :: Query st st

local :: (st -> st) -> Query st a -> Query st a

reader :: (st -> a) -> Query st a

Monad (Query st)

Methods

(>>=) :: Query st a -> (a -> Query st b) -> Query st b

(>>) :: Query st a -> Query st b -> Query st b

return :: a -> Query st a

fail :: String -> Query st a

Functor (Query st)

Methods

fmap :: (a -> b) -> Query st a -> Query st b

(<$) :: a -> Query st b -> Query st a

Applicative (Query st)

Methods

pure :: a -> Query st a

(<*>) :: Query st (a -> b) -> Query st a -> Query st b

(*>) :: Query st a -> Query st b -> Query st b

(<*) :: Query st a -> Query st b -> Query st a

openAcidState

Arguments

:: IsAcidic st

=> st

Initial state value.

-> AcidState st

Create an AcidState given an initial value.

update :: UpdateEvent event => AcidState (EventState event) -> event -> (AcidState (EventState event), EventResult event)

Issue an Update event and wait for its result. Once this call returns, you are guaranteed that the changes to the state are durable. Events may be issued in parallel.

It's a run-time error to issue events that aren't supported by the AcidState.

update_ :: UpdateEvent event => AcidState (EventState event) -> event -> AcidState (EventState event)

Same as update but ignoring the event result.

query :: QueryEvent event => AcidState (EventState event) -> event -> EventResult event

Issue a Query event and wait for its result.

liftQuery :: Query st a -> Update st a

Run a query in the Update Monad.

runUpdate :: Update s r -> s -> (r, s)

Execute the Update monad in a pure environment.

runQuery :: Query s r -> s -> r

Execute the Query monad in a pure environment.