type outfiles = {
  1. objfile : string;
  2. cmxfile : string;
  3. cmifile : string option;
}
val delete_temps : outfiles -> unit
type options = [ `Verbose | `Shared ] list
val compile_module : ?options:options -> filename:string -> Malfunction_parser.moduleexp -> outfiles
val compile_cmx : ?options:options -> string -> outfiles
val compile_and_load : ?options:options -> Malfunction.t -> Obj.t