aboutsummaryrefslogtreecommitdiffhomepage
path: root/library/library.ml
diff options
context:
space:
mode:
Diffstat (limited to 'library/library.ml')
-rw-r--r--library/library.ml4
1 files changed, 1 insertions, 3 deletions
diff --git a/library/library.ml b/library/library.ml
index 6d7b0f603..f5c7f6335 100644
--- a/library/library.ml
+++ b/library/library.ml
@@ -652,9 +652,7 @@ let start_library f =
ldir
let load_library_todo f =
- let paths = Loadpath.get_paths () in
- let _, longf =
- System.find_file_in_path ~warn:(Flags.is_verbose()) paths (f^".v") in
+ let longf = Loadpath.locate_file (f^".v") in
let f = longf^"io" in
let ch = System.with_magic_number_check raw_intern_library f in
let (s0 : seg_sum), _, _ = System.marshal_in_segment f ch in