sig
  val command : string -> int
  val run_command : string -> unit
  val compile_file : string -> int
  val create_archive : string -> string list -> int
  val expand_libname : string -> string
  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 -> bool
end