Module Sihl__.Contract_storage

type file = {
id : string;
filename : string;
filesize : int;
mime : string;
}
type stored = {
file : file;
blob : string;
}
val name : string
exception Exception of string
module type Sig = sig ... end
val file_to_sexp : file -> Sexplib0.Sexp.t
val pp_file : Stdlib.Format.formatter -> file -> unit
val set_mime : string -> file -> file
val set_filesize : int -> file -> file
val set_filename : string -> file -> file
val set_mime_stored : string -> stored -> stored
val set_filesize_stored : int -> stored -> stored
val set_filename_stored : string -> stored -> stored
val stored_to_sexp : stored -> Sexplib0.Sexp.t
val pp_stored : Stdlib.Format.formatter -> stored -> unit