include 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 ... endval file_to_sexp : file -> Sexplib0.Sexp.tval pp_file : Stdlib.Format.formatter -> file -> unitval set_mime : string -> file -> fileval set_filesize : int -> file -> fileval set_filename : string -> file -> fileval set_mime_stored : string -> stored -> storedval set_filesize_stored : int -> stored -> storedval set_filename_stored : string -> stored -> storedval stored_to_sexp : stored -> Sexplib0.Sexp.tval pp_stored : Stdlib.Format.formatter -> stored -> unit
val log_src : Logs.src