module Ocaml_compiler: sig .. end
val forpack_flags : string -> Tags.t -> Command.spec
val ocamlc_c : Tags.t -> Pathname.t -> Command.pathname -> Command.t
val ocamlc_link : Options.command_spec ->
Command.tags -> string list -> Command.pathname -> Command.t
val ocamlc_link_lib : Command.tags -> Pathname.t list -> Command.pathname -> Command.t
val ocamlc_link_prog : Command.tags -> Pathname.t list -> Command.pathname -> Command.t
val ocamlmklib : Command.tags -> string list -> Pathname.t -> Command.t
val ocamlmktop : Tags.t -> string list -> Command.pathname -> Command.t
val byte_lib_linker : Command.tags -> Pathname.t list -> Pathname.t -> Command.t
val byte_lib_linker_tags : Tags.t -> Tags.t
val ocamlc_p : Command.tags -> string list -> Command.pathname -> Command.t
val ocamlopt_c : Tags.t -> Pathname.t -> Command.pathname -> Command.t
val ocamlopt_link : Options.command_spec ->
Command.tags -> string list -> Command.pathname -> Command.t
val ocamlopt_link_lib : Command.tags -> Pathname.t list -> Command.pathname -> Command.t
val ocamlopt_link_shared_lib : Command.tags -> Pathname.t list -> Command.pathname -> Command.t
val ocamlopt_link_prog : Command.tags -> Pathname.t list -> Command.pathname -> Command.t
val ocamlopt_p : Command.tags -> Pathname.t list -> Pathname.t -> Command.t
val native_lib_linker : Command.tags -> Pathname.t list -> Pathname.t -> Command.t
val native_shared_lib_linker : Command.tags -> Pathname.t list -> Command.pathname -> Command.t
val native_lib_linker_tags : Tags.t -> Tags.t
val prepare_compile : (Pathname.t list list -> ('a, exn) My_std.Outcome.t list) ->
Pathname.t -> unit
val byte_compile_ocaml_interf : 'a ->
'a ->
('a -> Pathname.t) ->
(Pathname.t list list -> ('b, exn) My_std.Outcome.t list) -> Command.t
val byte_compile_ocaml_implem : ?tag:Tags.elt ->
'a ->
'a ->
('a -> Pathname.t) ->
(Pathname.t list list -> ('b, exn) My_std.Outcome.t list) -> Command.t
val cache_prepare_link : (Pathname.t * Pathname.t * Pathname.t list, bool) Hashtbl.t
val prepare_link : Pathname.t ->
Pathname.t ->
Pathname.t list ->
(Pathname.t list list -> (Pathname.t, exn) My_std.Outcome.t list) -> unit
val native_compile_ocaml_implem : ?tag:Tags.elt ->
?cmx_ext:Pathname.t ->
'a ->
('a -> Pathname.t) ->
(Pathname.t list list -> (Pathname.t, exn) My_std.Outcome.t list) ->
Command.t
val libs_of_use_lib : Tags.t -> string list
val prepare_libs : string ->
string ->
Pathname.t ->
(Pathname.t list list -> ('a, exn) My_std.Outcome.t list) -> Pathname.t list
val library_index : (Pathname.t, Pathname.t list) Hashtbl.t
val package_index : (Pathname.t, Pathname.t list) Hashtbl.t
val hidden_packages : Pathname.t list Pervasives.ref
val hide_package_contents : Pathname.t -> unit
module Ocaml_dependencies_input: sig .. end
module Ocaml_dependencies: Ocaml_dependencies.Make(Ocaml_dependencies_input)
val caml_transitive_closure : ?caml_obj_ext:string ->
?caml_lib_ext:string ->
?pack_mode:bool ->
?used_libraries:string list ->
?hidden_packages:string list -> Pathname.t list -> Pathname.t list
val link_one_gen : ('a -> Pathname.t list -> Pathname.t -> 'b) ->
(Tags.t -> 'a) -> 'c -> 'c -> ('c -> Pathname.t) -> 'd -> 'b
val link_gen : string ->
string ->
string ->
Pathname.t list ->
(Tags.t -> Pathname.t list -> Pathname.t -> 'a) ->
(Tags.t -> Tags.t) -> 'b -> 'b -> ('b -> Pathname.t) -> Rule.builder -> 'a
val byte_link_gen : (Command.tags -> Pathname.t list -> Pathname.t -> Command.t) ->
(Tags.t -> Tags.t) ->
string -> string -> (string -> Pathname.t) -> Rule.builder -> Command.t
val byte_link : string -> string -> (string -> Pathname.t) -> Rule.builder -> Command.t
val byte_library_link : string -> string -> (string -> Pathname.t) -> Rule.builder -> Command.t
val byte_debug_link_gen : (Command.tags -> Pathname.t list -> Pathname.t -> Command.t) ->
(Tags.t -> Tags.t) ->
string -> string -> (string -> Pathname.t) -> Rule.builder -> Command.t
val byte_debug_link : string -> string -> (string -> Pathname.t) -> Rule.builder -> Command.t
val byte_debug_library_link : string -> string -> (string -> Pathname.t) -> Rule.builder -> Command.t
val native_link_gen : (Tags.t -> Pathname.t list -> Pathname.t -> 'a) ->
(Tags.t -> Tags.t) -> 'b -> 'b -> ('b -> Pathname.t) -> Rule.builder -> 'a
val native_link : 'a -> 'a -> ('a -> Pathname.t) -> Rule.builder -> Command.t
val native_library_link : 'a -> 'a -> ('a -> Pathname.t) -> Rule.builder -> Command.t
val native_profile_link_gen : (Tags.t -> Pathname.t list -> Pathname.t -> 'a) ->
(Tags.t -> Tags.t) -> 'b -> 'b -> ('b -> Pathname.t) -> Rule.builder -> 'a
val native_profile_link : 'a -> 'a -> ('a -> Pathname.t) -> Rule.builder -> Command.t
val native_profile_library_link : 'a -> 'a -> ('a -> Pathname.t) -> Rule.builder -> Command.t
val link_units : (Pathname.t, Pathname.t list) Hashtbl.t ->
(string * string list) list ->
string ->
string ->
string ->
(Tags.t -> Pathname.t list -> Pathname.t -> 'a) ->
(Tags.t -> Tags.t) ->
Pathname.t list -> 'b -> ('b -> Pathname.t) -> Rule.builder -> 'a
val link_modules : (string * Pathname.t list) list ->
string ->
string ->
Pathname.t ->
(Command.tags -> Pathname.t list -> Pathname.t -> Command.t) ->
(Tags.t -> Command.tags) ->
Pathname.t list ->
string -> (string -> Pathname.t) -> Rule.builder -> Command.t
val pack_modules : (string * Pathname.t list) list ->
string ->
string ->
Pathname.t ->
(Command.tags -> Pathname.t list -> Pathname.t -> Command.t) ->
(Tags.t -> Command.tags) ->
Pathname.t list ->
string -> (string -> Pathname.t) -> Rule.builder -> Command.t
val link_from_file : (string list -> 'a -> ('b -> string) -> 'c -> 'd) ->
'b -> 'a -> ('b -> string) -> 'c -> 'd
val byte_library_link_modules : Pathname.t list ->
string -> (string -> Pathname.t) -> Rule.builder -> Command.t
val byte_library_link_mllib : string -> string -> (string -> Pathname.t) -> Rule.builder -> Command.t
val byte_toplevel_link_modules : Pathname.t list ->
string -> (string -> Pathname.t) -> Rule.builder -> Command.t
val byte_toplevel_link_mltop : string -> string -> (string -> Pathname.t) -> Rule.builder -> Command.t
val byte_debug_library_link_modules : Pathname.t list ->
string -> (string -> Pathname.t) -> Rule.builder -> Command.t
val byte_debug_library_link_mllib : string -> string -> (string -> Pathname.t) -> Rule.builder -> Command.t
val byte_pack_modules : Pathname.t list ->
string -> (string -> Pathname.t) -> Rule.builder -> Command.t
val byte_pack_mlpack : string -> string -> (string -> Pathname.t) -> Rule.builder -> Command.t
val byte_debug_pack_modules : Pathname.t list ->
string -> (string -> Pathname.t) -> Rule.builder -> Command.t
val byte_debug_pack_mlpack : string -> string -> (string -> Pathname.t) -> Rule.builder -> Command.t
val native_pack_modules : Pathname.t list ->
string -> (string -> Pathname.t) -> Rule.builder -> Command.t
val native_pack_mlpack : string -> string -> (string -> Pathname.t) -> Rule.builder -> Command.t
val native_profile_pack_modules : Pathname.t list ->
string -> (string -> Pathname.t) -> Rule.builder -> Command.t
val native_profile_pack_mlpack : string -> string -> (string -> Pathname.t) -> Rule.builder -> Command.t
val native_library_link_modules : Pathname.t list ->
string -> (string -> Pathname.t) -> Rule.builder -> Command.t
val native_shared_library_link_modules : Pathname.t list ->
string -> (string -> Pathname.t) -> Rule.builder -> Command.t
val native_library_link_mllib : string -> string -> (string -> Pathname.t) -> Rule.builder -> Command.t
val native_shared_library_link_mldylib : string -> string -> (string -> Pathname.t) -> Rule.builder -> Command.t
val native_shared_library_tags : Tags.elt list -> Tags.t -> Tags.t
val native_shared_library_link : ?tags:Tags.elt list -> 'a -> 'a -> ('a -> Pathname.t) -> 'b -> Command.t
val native_profile_library_link_modules : Pathname.t list ->
string -> (string -> Pathname.t) -> Rule.builder -> Command.t
val native_profile_shared_library_link_modules : Pathname.t list ->
string -> (string -> Pathname.t) -> Rule.builder -> Command.t
val native_profile_library_link_mllib : string -> string -> (string -> Pathname.t) -> Rule.builder -> Command.t
val native_profile_shared_library_link_mldylib : string -> string -> (string -> Pathname.t) -> Rule.builder -> Command.t