marlowe-runtime-0.0.5: Runtime system for running Marlowe financial contracts on the Cardano Computation Layer
Safe HaskellSafe-Inferred
LanguageHaskell2010

Language.Marlowe.Protocol.HeaderSync.Client

Documentation

data ClientStIdle m a where Source #

Constructors

SendMsgRequestNext :: ClientStNext m a -> ClientStIdle m a 
SendMsgIntersect :: [BlockHeader] -> ClientStIntersect m a -> ClientStIdle m a 
SendMsgDone :: a -> ClientStIdle m a 

Instances

Instances details
Functor m => Functor (ClientStIdle m) Source # 
Instance details

Defined in Language.Marlowe.Protocol.HeaderSync.Client

Methods

fmap :: (a -> b) -> ClientStIdle m a -> ClientStIdle m b Source #

(<$) :: a -> ClientStIdle m b -> ClientStIdle m a Source #

data ClientStIntersect m a Source #

Constructors

ClientStIntersect 

Fields

Instances

Instances details
Functor m => Functor (ClientStIntersect m) Source # 
Instance details

Defined in Language.Marlowe.Protocol.HeaderSync.Client

Methods

fmap :: (a -> b) -> ClientStIntersect m a -> ClientStIntersect m b Source #

(<$) :: a -> ClientStIntersect m b -> ClientStIntersect m a Source #

data ClientStNext m a Source #

Constructors

ClientStNext 

Fields

Instances

Instances details
Functor m => Functor (ClientStNext m) Source # 
Instance details

Defined in Language.Marlowe.Protocol.HeaderSync.Client

Methods

fmap :: (a -> b) -> ClientStNext m a -> ClientStNext m b Source #

(<$) :: a -> ClientStNext m b -> ClientStNext m a Source #

data ClientStWait m a where Source #

Constructors

SendMsgPoll :: ClientStNext m a -> ClientStWait m a 
SendMsgCancel :: ClientStIdle m a -> ClientStWait m a 

Instances

Instances details
Functor m => Functor (ClientStWait m) Source # 
Instance details

Defined in Language.Marlowe.Protocol.HeaderSync.Client

Methods

fmap :: (a -> b) -> ClientStWait m a -> ClientStWait m b Source #

(<$) :: a -> ClientStWait m b -> ClientStWait m a Source #

hoistMarloweHeaderSyncClient :: forall m n a. Functor m => (forall x. m x -> n x) -> MarloweHeaderSyncClient m a -> MarloweHeaderSyncClient n a Source #

marloweHeaderSyncClientPeer :: forall m a. Functor m => MarloweHeaderSyncClient m a -> PeerTraced MarloweHeaderSync 'AsClient 'StIdle m a Source #