`sig
val command : string -> int
val run_command : string -> unit
val compile_file :
?output:string -> ?opt:string -> ?stable_name:string -> string -> int
val create_archive : string -> string list -> int
val quote_files : string list -> string
val quote_optfile : string option -> string
type link_mode = Exe | Dll | MainDll | Partial
val call_linker : Ccomp.link_mode -> string -> string list -> string -> int
val linker_is_flexlink : bool
end`