aboutsummaryrefslogtreecommitdiffhomepage
diff options
context:
space:
mode:
authorGravatar glondu <glondu@85f007b7-540e-0410-9357-904b9bb8a0f7>2009-09-17 15:59:03 +0000
committerGravatar glondu <glondu@85f007b7-540e-0410-9357-904b9bb8a0f7>2009-09-17 15:59:03 +0000
commitf2320b085559b7470a3dad13cf2a1e9b0c1fb680 (patch)
tree845df47497bb29a6de762768450c699cd3ff50c4
parentc66bc369d9b91a436cab10b164c8e1bd5cac79c8 (diff)
Replace unprotected call to where_in_path by find_file_in_path
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@12340 85f007b7-540e-0410-9357-904b9bb8a0f7
-rw-r--r--toplevel/mltop.ml42
1 files changed, 1 insertions, 1 deletions
diff --git a/toplevel/mltop.ml4 b/toplevel/mltop.ml4
index eb9359107..455e4286a 100644
--- a/toplevel/mltop.ml4
+++ b/toplevel/mltop.ml4
@@ -109,7 +109,7 @@ let dir_ml_load s =
* in this file, the Makefile dependency logic needs to be updated.
*)
let warn = Flags.is_verbose() in
- let _,gname = where_in_path ~warn !coq_mlpath_copy s in
+ let _,gname = find_file_in_path ~warn !coq_mlpath_copy s in
try
Dynlink.loadfile gname;
with | Dynlink.Error a ->