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 : response_files:bool -> 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