Object.VersionsPagination helpers for ListObjectVersions.
type 'acc fold_step = | Continue of 'acc| Stop of 'accDecision returned by fold_pages_until. Stop returns the accumulator without fetching another page.
val fold_pages :
connection ->
bucket:Bucket_name.t ->
?options:Object.Versions.options ->
?max_pages:int ->
init:'acc ->
f:('acc -> Object.Versions.page -> ('acc, Awskit.Error.t) Stdlib.result io) ->
unit ->
('acc, Awskit.Error.t) Stdlib.result ioFollow key/version markers and fold pages until S3 stops returning next markers or max_pages is reached.
val fold_pages_until :
connection ->
bucket:Bucket_name.t ->
?options:Object.Versions.options ->
?max_pages:int ->
init:'acc ->
f:
('acc ->
Object.Versions.page ->
('acc fold_step, Awskit.Error.t) Stdlib.result io) ->
unit ->
('acc, Awskit.Error.t) Stdlib.result ioFollow key/version markers and fold pages until S3 stops returning next markers, max_pages is reached, or f returns Stop.
val pages :
connection ->
bucket:Bucket_name.t ->
?options:Object.Versions.options ->
max_pages:int ->
unit ->
(Object.Versions.page list, Awskit.Error.t) Stdlib.result ioCollect version listing pages up to the explicit max_pages bound.
Returns an error if S3 reports more pages than the bound allows.
val object_versions :
connection ->
bucket:Bucket_name.t ->
?options:Object.Versions.options ->
max_pages:int ->
unit ->
(Object.Versions.object_version list, Awskit.Error.t) Stdlib.result ioCollect object-version entries across pages up to max_pages.
val delete_markers :
connection ->
bucket:Bucket_name.t ->
?options:Object.Versions.options ->
max_pages:int ->
unit ->
(Object.Versions.delete_marker list, Awskit.Error.t) Stdlib.result ioCollect delete-marker entries across pages up to max_pages.