package octez-protocol-020-PsParisC-libs
Install
dune-project
Dependency
Authors
Maintainers
Sources
sha256=ddfb5076eeb0b32ac21c1eed44e8fc86a6743ef18ab23fff02d36e365bb73d61
sha512=d22a827df5146e0aa274df48bc2150b098177ff7e5eab52c6109e867eb0a1f0ec63e6bfbb0e3645a6c2112de3877c91a17df32ccbff301891ce4ba630c997a65
doc/octez-protocol-020-PsParisC-libs.test-helpers/Tezos_020_PsParisC_test_helpers/Lwt_result_wrap_syntax/index.html
Module Tezos_020_PsParisC_test_helpers.Lwt_result_wrap_syntaxSource
Extends the Lwt_result_syntax with additional utilities for wrapping results produced by the protocol, i.e. Environment.Error_monad.tzresult, to tzresult Lwt.t values used in the tests.
The added utilities are binding operators. They use the same symbols as the ones from Lwt_result_syntax with an added @ character. This character symbolizes the ewrapping of the internal error monad type in a shell error.
include module type of Tezos_base.TzPervasives.Lwt_result_syntax
include module type of Tezos_error_monad.TzLwtreslib.Monad.Lwt_result_syntax
val tzfail :
'error ->
('a, 'error Tezos_base.TzPervasives.TzTrace.trace) result Lwt.tval (and*) :
('a, 'error Tezos_base.TzPervasives.TzTrace.trace) result Lwt.t ->
('b, 'error Tezos_base.TzPervasives.TzTrace.trace) result Lwt.t ->
('a * 'b, 'error Tezos_base.TzPervasives.TzTrace.trace) result Lwt.tval (and+) :
('a, 'error Tezos_base.TzPervasives.TzTrace.trace) result Lwt.t ->
('b, 'error Tezos_base.TzPervasives.TzTrace.trace) result Lwt.t ->
('a * 'b, 'error Tezos_base.TzPervasives.TzTrace.trace) result Lwt.tval tzjoin :
(unit, 'error Tezos_base.TzPervasives.TzTrace.trace) result Lwt.t list ->
(unit, 'error Tezos_base.TzPervasives.TzTrace.trace) result Lwt.tval tzall :
('a, 'error Tezos_base.TzPervasives.TzTrace.trace) result Lwt.t list ->
('a list, 'error Tezos_base.TzPervasives.TzTrace.trace) result Lwt.tval tzboth :
('a, 'error Tezos_base.TzPervasives.TzTrace.trace) result Lwt.t ->
('b, 'error Tezos_base.TzPervasives.TzTrace.trace) result Lwt.t ->
('a * 'b, 'error Tezos_base.TzPervasives.TzTrace.trace) result Lwt.tval wrap :
'a Tezos_protocol_020_PsParisC.Environment.Error_monad.tzresult Lwt.t ->
'a Tezos_base.TzPervasives.tzresult Lwt.twrap res maps the result type contained in res to a tzresult value.
val (let@) :
'a Tezos_protocol_020_PsParisC.Environment.Error_monad.tzresult ->
('a Tezos_base.TzPervasives.tzresult -> 'b) ->
'blet@ x = m in f x is equivalent to let x = Environment.wrap_tzresult m in f x
val (let*@) :
'a Tezos_protocol_020_PsParisC.Environment.Error_monad.tzresult Lwt.t ->
('a -> 'b Tezos_base.TzPervasives.tzresult Lwt.t) ->
'b Tezos_base.TzPervasives.tzresult Lwt.tlet*@ x = m in f x is equivalent to let* x = wrap m in f x.
Mnemonic: @ "wraps" a protocol error in a shell error.
val (let*?@) :
'a Tezos_protocol_020_PsParisC.Environment.Error_monad.tzresult ->
('a -> 'b Tezos_base.TzPervasives.tzresult Lwt.t) ->
'b Tezos_base.TzPervasives.tzresult Lwt.tlet*?@ x = m in f x is equivalent to let*? x = Environment.wrap_tzresult m in f x.
Mnemonic: @ "wraps" a protocol error in a shell error.
val (let*!@) :
'a Tezos_protocol_020_PsParisC.Environment.Error_monad.tzresult Lwt.t ->
('a Tezos_base.TzPervasives.tzresult -> 'b Lwt.t) ->
'b Lwt.tlet*!@ x = m in f x is equivalent to let*! x = wrap m in f x.
Mnemonic: @ "wraps" a protocol error in a shell error.
val (let+@) :
'a Tezos_protocol_020_PsParisC.Environment.Error_monad.tzresult Lwt.t ->
('a -> 'b) ->
'b Tezos_base.TzPervasives.tzresult Lwt.tlet+@ x = m in f x is equivalent to let+ x = wrap m in f x.
Mnemonic: @ "wraps" a protocol error in a shell error.