type profile
val f : ?standalone:bool -> ?global:[ `Auto | `Function | `Bind_to of string | `Custom of string ] -> ?profile:profile -> ?dynlink:bool -> ?linkall:bool -> ?source_map:(string option * Js_of_ocaml_compiler.Source_map.t) -> ?custom_header:string -> Js_of_ocaml_compiler.Pretty_print.t -> Js_of_ocaml_compiler.Parse_bytecode.Debug.t -> Js_of_ocaml_compiler.Code.program -> unit
val from_string : string array -> string -> Js_of_ocaml_compiler.Pretty_print.t -> unit
val profiles : (int * profile) list
val profile : int -> profile option