Legacy_monad_globals (tezos-base.Tezos_base.TzPervasives.Legacy_monad

val return : 'a -> ( 'a, 'e ) Stdlib.result Lwt.t

val return_unit : ( unit, 'e ) Stdlib.result Lwt.t

val return_none : ( 'a option, 'e ) Stdlib.result Lwt.t

val return_some : 'a -> ( 'a option, 'e ) Stdlib.result Lwt.t

val return_nil : ( 'a list, 'e ) Stdlib.result Lwt.t

val return_true : ( bool, 'e ) Stdlib.result Lwt.t

val return_false : ( bool, 'e ) Stdlib.result Lwt.t

val (>>=) : 'a Lwt.t -> ( 'a -> 'b Lwt.t ) -> 'b Lwt.t

more globals

val (>|=) : 'a Lwt.t -> ( 'a -> 'b ) -> 'b Lwt.t

val ok : 'a -> ( 'a, 'e ) Stdlib.result

val error : 'e -> ( 'a, 'e TzTrace.trace ) Stdlib.result

val (>>?) : 
  ( 'a, 'e ) Stdlib.result ->
  ( 'a -> ( 'b, 'e ) Stdlib.result ) ->
  ( 'b, 'e ) Stdlib.result

val (>|?) : 
  ( 'a, 'e ) Stdlib.result ->
  ( 'a -> 'b ) ->
  ( 'b, 'e ) Stdlib.result

val fail : 'e -> ( 'a, 'e TzTrace.trace ) Stdlib.result Lwt.t

val (>>=?) : 
  ( 'a, 'e ) Stdlib.result Lwt.t ->
  ( 'a -> ( 'b, 'e ) Stdlib.result Lwt.t ) ->
  ( 'b, 'e ) Stdlib.result Lwt.t

val (>|=?) : 
  ( 'a, 'e ) Stdlib.result Lwt.t ->
  ( 'a -> 'b ) ->
  ( 'b, 'e ) Stdlib.result Lwt.t

val (>>?=) : 
  ( 'a, 'e ) Stdlib.result ->
  ( 'a -> ( 'b, 'e ) Stdlib.result Lwt.t ) ->
  ( 'b, 'e ) Stdlib.result Lwt.t

val (>|?=) : 
  ( 'a, 'e ) Stdlib.result ->
  ( 'a -> 'b Lwt.t ) ->
  ( 'b, 'e ) Stdlib.result Lwt.t