Make.Trashpool
val unsafe_read :
unit ->
((Mavryk_base.TzPervasives.Operation.shell_header * E.Protocol.operation_data)
list,
Mavryk_error_monad.Error_monad.tztrace)
Stdlib.result
Lwt.t
val read :
unit ->
((Mavryk_base.TzPervasives.Operation.shell_header * E.Protocol.operation_data)
list,
Mavryk_error_monad.Error_monad.tztrace)
Stdlib.result
Lwt.t
val write :
mode:write_mode ->
(Mavryk_base.TzPervasives.Operation.shell_header * E.Protocol.operation_data)
list ->
(unit, Mavryk_error_monad.Error_monad.tztrace) Stdlib.result Lwt.t
val append :
(Mavryk_base.TzPervasives.Operation.shell_header * E.Protocol.operation_data)
list ->
(unit, Mavryk_error_monad.Error_monad.tztrace) Stdlib.result Lwt.t