type dll_mode = | For_checking| For_execution
val open_dlls : dll_mode -> string list -> unitval close_all_dlls : unit -> unittype primitive_address = | Prim_loaded of dll_address| Prim_exists
val add_path : string list -> unitval remove_path : string list -> unitval init_compile : bool -> unitval init_toplevel : string list -> unit