val blob :
([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_permval file :
([< `Read | `Set_and_create ], t, Sihl__.Storage_model.File.t)
Fieldslib.Field.t_with_permval make_creator :
file:
(([< `Read | `Set_and_create ], t, Sihl__.Storage_model.File.t)
Fieldslib.Field.t_with_perm ->
'a ->
('b -> Sihl__.Storage_model.File.t) * 'c) ->
blob:
(([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
'c ->
('b -> string) * 'd) ->
'a ->
('b -> t) * 'dval create : file:Sihl__.Storage_model.File.t -> blob:string -> tval map :
file:
(([< `Read | `Set_and_create ], t, Sihl__.Storage_model.File.t)
Fieldslib.Field.t_with_perm ->
Sihl__.Storage_model.File.t) ->
blob:
(([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
string) ->
tval iter :
file:
(([< `Read | `Set_and_create ], t, Sihl__.Storage_model.File.t)
Fieldslib.Field.t_with_perm ->
unit) ->
blob:
(([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
unit) ->
unitval fold :
init:'a ->
file:
('a ->
([< `Read | `Set_and_create ], t, Sihl__.Storage_model.File.t)
Fieldslib.Field.t_with_perm ->
'b) ->
blob:
('b ->
([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
'c) ->
'cval map_poly :
([< `Read | `Set_and_create ], t, 'a) Fieldslib.Field.user ->
'a listval for_all :
file:
(([< `Read | `Set_and_create ], t, Sihl__.Storage_model.File.t)
Fieldslib.Field.t_with_perm ->
bool) ->
blob:
(([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
bool) ->
boolval exists :
file:
(([< `Read | `Set_and_create ], t, Sihl__.Storage_model.File.t)
Fieldslib.Field.t_with_perm ->
bool) ->
blob:
(([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
bool) ->
boolval to_list :
file:
(([< `Read | `Set_and_create ], t, Sihl__.Storage_model.File.t)
Fieldslib.Field.t_with_perm ->
'a) ->
blob:
(([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
'a) ->
'a listmodule Direct : sig ... end