Re-export Config.load_path as UTop.load_path
This change helps to implement toplevel extensions that want to find files in the load path, e.g. for improved error messages.
This commit is contained in:
parent
ff18d998b5
commit
884328596a
|
@ -732,6 +732,12 @@ let () =
|
|||
(* Make UTop accessible. *)
|
||||
Topdirs.dir_directory (Findlib.package_directory "utop")
|
||||
|
||||
(* +-----------------------------------------------------------------+
|
||||
| Compiler-libs re-exports |
|
||||
+-----------------------------------------------------------------+ *)
|
||||
|
||||
let load_path = Config.load_path
|
||||
|
||||
(* +-----------------------------------------------------------------+
|
||||
| Deprecated |
|
||||
+-----------------------------------------------------------------+ *)
|
||||
|
|
|
@ -303,6 +303,13 @@ val discard_formatters : Format.formatter list -> (unit -> 'a) -> 'a
|
|||
|
||||
val split_words : string -> string list
|
||||
|
||||
(** {6 compiler-libs reexports} *)
|
||||
|
||||
val load_path : string list ref
|
||||
(** [load_path] is an alias of [Config.load_path], normally hidden in toplevel.
|
||||
It contains the list of directories added by findlib-required packages
|
||||
and [#directory] directives. *)
|
||||
|
||||
(**/**)
|
||||
|
||||
(* These variables are not used and deprecated: *)
|
||||
|
|
Loading…
Reference in New Issue