Module Ocaml_dynloader = Ocaml_dynloader


val default_disabled_warnings : int list

See the labelled argument custom_warnings_spec for what these are for.

val warnings_spec : disabled_warnings:int list -> string
val default_warnings_spec : string
type t

mutable type for loading ocaml modules.

type dynloader = t
exception Is_not_native

Currently this library works with native code only. Called in bytecode, the function create will return the following exception as an error result.

type 'a create_arguments = ?in_dir:string -> ?include_directories:string list -> ?custom_warnings_spec:string -> ?strict_sequence:bool -> ?cmx_flags:string list -> ?cmxs_flags:string list -> ?trigger_unused_value_warnings_despite_mli:bool -> ?use_cache:Plugin_cache.Config.t -> ?run_plugin_toplevel:[
| `In_async_thread
| `Outside_of_async
] -> 'a
module Camlp4 : sig .. end
module Ppx : sig .. end
module Preprocessor : sig .. end
module Compilation_config : sig .. end
val create : (?initialize_compilation_config:(directory:string -> Compilation_config.t Async.Std.Deferred.Or_error.t) -> ?ocamlopt_opt:string -> ?ocamldep_opt:string -> unit -> t Async.Std.Deferred.Or_error.t) create_arguments
val clean : t -> unit Async.Std.Deferred.Or_error.t

Cleaning the files generated by this Ocaml_dynloader.t from the begining of his life, and try to remove the directory if it is empty once the files have been removed. Doesn't fail if the directory contains other files, keep them and keep the directory in that case. Once cleaned, you cannot use a dynloader anymore, you should just leave it alone and let it be collected by the GC at some point. Using a cleaned dynloader will result in an error.

module Univ_constr : sig .. end
module type Module_type = sig .. end
val find_dependencies : t -> string -> string list Async.Std.Deferred.Or_error.t

find_dependencies t file uses ocamldep to compute the list of .ml and .mli files that file depends on transitively, which you can then pass to load_ocaml_src_files. file must be an .ml file, and all the files it depend on must be in the same folder.

module type S = sig .. end
module Make (X : Module_type) : S with type t := X.t
module Side_effect : S with type t := unit
In some cases, we are only interested by the toplevel side effects of dynlinked modules.
module type Side_effect = sig .. end
val side_effect_univ_constr : (module Side_effect) Univ_constr.t
val return_plugin : 'a Univ_constr.t -> (unit -> 'a) -> unit