val delete_file :
?must_exist:bool ->
Fpath.t ->
(unit, [> `Msg of string ]) resultval delete_dir :
?must_exist:bool ->
?recurse:bool ->
Fpath.t ->
(unit, [> `Msg of string ]) resultval delete :
?must_exist:bool ->
?recurse:bool ->
Fpath.t ->
(unit, [> `Msg of string ]) resultmodule Mode : sig ... endval err_realpath_path : Fpath.t -> string -> ('a, [> `Msg of string ]) resulttype 'a res = ('a, [ `Msg of string ]) resulttype traverse = [ | `Any| `None| `Sat of Fpath.t -> bool res
]type elements = [ | `Any| `Files| `Dirs| `Sat of Fpath.t -> bool res
]exception Fold_stop of [ `Msg of string ]val err_fun :
('a -> ('b, 'c) result -> (unit, [ `Msg of string ]) result) ->
('a -> ('d, 'c) result) ->
backup_value:'d ->
'a ->
'dval err_predicate_fun :
('a -> ('b, 'c) result -> (unit, [ `Msg of string ]) result) ->
('a -> (bool, 'c) result) ->
'a ->
boolval do_traverse_fun :
('a -> ('b, 'c) result -> (unit, [ `Msg of string ]) result) ->
[< `Any | `None | `Sat of 'a -> (bool, 'c) result ] ->
'a ->
boolval is_element_fun :
(Fpath.t ->
('a, [> `Msg of string ] as 'b) result ->
(unit, [ `Msg of string ]) result) ->
[< `Any | `Dirs | `Files | `Sat of Fpath.t -> (bool, 'b) result ] ->
Fpath.t ->
boolval fold :
?err:
(Fpath.t ->
('a, [ `Msg of string ]) result ->
(unit, [ `Msg of string ]) result) ->
?dotfiles:bool ->
?elements:
[< `Any
| `Dirs
| `Files
| `Sat of Fpath.t -> (bool, [ `Msg of string ]) result Any ] ->
?traverse:
[< `Any
| `None
| `Sat of Fpath.t -> (bool, [ `Msg of string ]) result Any ] ->
(Fpath.t -> 'b -> 'b) ->
'b ->
Fpath.t list ->
('b, [> `Msg of string ]) result