Compenv (ocaml.Compenv)

exception Exit_with_status of int

val output_prefix : string -> string

val extract_output : string option -> string

val default_output : string option -> string

val print_version_and_library : string -> 'a

val print_version_string : unit -> 'a

val print_standard_library : unit -> 'a

val fatal : string -> 'a

val first_ccopts : string list ref

val first_ppx : string list ref

val first_include_dirs : string list ref

val last_include_dirs : string list ref

val get_objfiles : with_ocamlparam:bool -> string list

val last_objfiles : string list ref

val first_objfiles : string list ref

val stop_early : bool ref

val has_linker_inputs : bool ref

type filename = string

type readenv_position =

| Before_args
| Before_compile of filename
| Before_link

val readenv : Stdlib.Format.formatter -> readenv_position -> unit

type deferred_action =

| ProcessImplementation of string
| ProcessInterface of string
| ProcessCFile of string
| ProcessOtherFile of string
| ProcessObjects of string list
| ProcessDLLs of string list

val c_object_of_filename : string -> string

val defer : deferred_action -> unit

val anonymous : string -> unit

val impl : string -> unit

val intf : string -> unit

val process_deferred_actions : 
  (Stdlib.Format.formatter
   * (start_from:Clflags.Compiler_pass.t ->
   source_file:string ->
   output_prefix:string ->
   unit)
   * (source_file:string ->
   output_prefix:string ->
   unit)
   * string
   * string) ->
  unit

val parse_arguments : 
  ?current:int ref ->
  string array ref ->
  Stdlib.Arg.anon_fun ->
  string ->
  unit