hydra-node
Safe HaskellSafe-Inferred
LanguageGHC2021

Hydra.Chain.ScriptRegistrySpec

Synopsis

Documentation

spec :: Spec Source #

newtype ATestBackend a Source #

A test backend that will throw NoUTxOFound on queryUTxOFor call.

Constructors

ATestBackend (ReaderT (VerificationKey PaymentKey) IO a) 

Instances

Instances details
MonadIO ATestBackend Source # 
Instance details

Defined in Hydra.Chain.ScriptRegistrySpec

Methods

liftIO :: IO a -> ATestBackend a Source #

Applicative ATestBackend Source # 
Instance details

Defined in Hydra.Chain.ScriptRegistrySpec

Functor ATestBackend Source # 
Instance details

Defined in Hydra.Chain.ScriptRegistrySpec

Methods

fmap :: (a -> b) -> ATestBackend a -> ATestBackend b Source #

(<$) :: a -> ATestBackend b -> ATestBackend a Source #

Monad ATestBackend Source # 
Instance details

Defined in Hydra.Chain.ScriptRegistrySpec

ChainBackend ATestBackend Source # 
Instance details

Defined in Hydra.Chain.ScriptRegistrySpec

Methods

queryGenesisParameters :: ATestBackend (GenesisParameters ShelleyEra)

queryScriptRegistry :: [TxId] -> ATestBackend ScriptRegistry

queryNetworkId :: ATestBackend NetworkId

queryTip :: ATestBackend ChainPoint

queryUTxO :: [Address ShelleyAddr] -> ATestBackend UTxO

queryUTxOByTxIn :: [TxIn] -> ATestBackend UTxO

queryEraHistory :: QueryPoint -> ATestBackend EraHistory

querySystemStart :: QueryPoint -> ATestBackend SystemStart

queryProtocolParameters :: QueryPoint -> ATestBackend (PParams LedgerEra)

queryStakePools :: QueryPoint -> ATestBackend (Set PoolId)

queryUTxOFor :: QueryPoint -> VerificationKey PaymentKey -> ATestBackend UTxO

submitTransaction :: Tx -> ATestBackend ()

awaitTransaction :: Tx -> VerificationKey PaymentKey -> ATestBackend UTxO

getBlockTime :: ATestBackend NominalDiffTime

MonadCatch ATestBackend Source # 
Instance details

Defined in Hydra.Chain.ScriptRegistrySpec

Methods

catch :: Exception e => ATestBackend a -> (e -> ATestBackend a) -> ATestBackend a

catchJust :: Exception e => (e -> Maybe b) -> ATestBackend a -> (b -> ATestBackend a) -> ATestBackend a

try :: Exception e => ATestBackend a -> ATestBackend (Either e a)

tryJust :: Exception e => (e -> Maybe b) -> ATestBackend a -> ATestBackend (Either b a)

handle :: Exception e => (e -> ATestBackend a) -> ATestBackend a -> ATestBackend a

handleJust :: Exception e => (e -> Maybe b) -> (b -> ATestBackend a) -> ATestBackend a -> ATestBackend a

onException :: ATestBackend a -> ATestBackend b -> ATestBackend a

bracketOnError :: ATestBackend a -> (a -> ATestBackend b) -> (a -> ATestBackend c) -> ATestBackend c

generalBracket :: ATestBackend a -> (a -> ExitCase b -> ATestBackend c) -> (a -> ATestBackend b) -> ATestBackend (b, c)

MonadThrow ATestBackend Source # 
Instance details

Defined in Hydra.Chain.ScriptRegistrySpec

runATestBackend :: VerificationKey PaymentKey -> ATestBackend a -> IO a Source #

newtype SuccessfulBackend a Source #

A test backend that simulates a successful script publishing.

Constructors

SuccessfulBackend (ReaderT (VerificationKey PaymentKey, UTxO) IO a) 

Instances

Instances details
MonadIO SuccessfulBackend Source # 
Instance details

Defined in Hydra.Chain.ScriptRegistrySpec

Applicative SuccessfulBackend Source # 
Instance details

Defined in Hydra.Chain.ScriptRegistrySpec

Functor SuccessfulBackend Source # 
Instance details

Defined in Hydra.Chain.ScriptRegistrySpec

Monad SuccessfulBackend Source # 
Instance details

Defined in Hydra.Chain.ScriptRegistrySpec

ChainBackend SuccessfulBackend Source # 
Instance details

Defined in Hydra.Chain.ScriptRegistrySpec

Methods

queryGenesisParameters :: SuccessfulBackend (GenesisParameters ShelleyEra)

queryScriptRegistry :: [TxId] -> SuccessfulBackend ScriptRegistry

queryNetworkId :: SuccessfulBackend NetworkId

queryTip :: SuccessfulBackend ChainPoint

queryUTxO :: [Address ShelleyAddr] -> SuccessfulBackend UTxO

queryUTxOByTxIn :: [TxIn] -> SuccessfulBackend UTxO

queryEraHistory :: QueryPoint -> SuccessfulBackend EraHistory

querySystemStart :: QueryPoint -> SuccessfulBackend SystemStart

queryProtocolParameters :: QueryPoint -> SuccessfulBackend (PParams LedgerEra)

queryStakePools :: QueryPoint -> SuccessfulBackend (Set PoolId)

queryUTxOFor :: QueryPoint -> VerificationKey PaymentKey -> SuccessfulBackend UTxO

submitTransaction :: Tx -> SuccessfulBackend ()

awaitTransaction :: Tx -> VerificationKey PaymentKey -> SuccessfulBackend UTxO

getBlockTime :: SuccessfulBackend NominalDiffTime

MonadCatch SuccessfulBackend Source # 
Instance details

Defined in Hydra.Chain.ScriptRegistrySpec

MonadThrow SuccessfulBackend Source # 
Instance details

Defined in Hydra.Chain.ScriptRegistrySpec

runSuccessfulBackend :: (VerificationKey PaymentKey, UTxO) -> SuccessfulBackend a -> IO a Source #

toAddress :: VerificationKey PaymentKey -> Address ShelleyAddr Source #