val
make_creator : headers:((
t, (string
* string) list)
Fieldslib.Field.t -> 'acc__0 -> ('input__ -> (string
* string) list)
* 'acc__1) -> md5:((
t, string option)
Fieldslib.Field.t -> 'acc__1 -> ('input__ -> string option)
* 'acc__2) -> parts:((
t,
t list)
Fieldslib.Field.t -> 'acc__2 -> ('input__ ->
t list)
* 'acc__3) -> 'acc__0 -> ('input__ ->
t)
* 'acc__3