aboutsummaryrefslogtreecommitdiffhomepage
path: root/toplevel/mltop.ml
diff options
context:
space:
mode:
authorGravatar Guillaume Melquiond <guillaume.melquiond@inria.fr>2014-04-07 19:36:55 +0200
committerGravatar Guillaume Melquiond <guillaume.melquiond@inria.fr>2014-04-07 19:38:48 +0200
commit7d3ce4012a53b123dac95381bf46aac65f865d69 (patch)
treee408eff343dce996f1f2bd267d78e8f2c61b1c72 /toplevel/mltop.ml
parent4fdfc180bb2de6430537c7cff5d32b36c7bb8354 (diff)
Revert part of eba6b75 as coq_makefile ignores -I if it overlaps with -R. (Fix for Rocq/Rational.)
Diffstat (limited to 'toplevel/mltop.ml')
-rw-r--r--toplevel/mltop.ml1
1 files changed, 1 insertions, 0 deletions
diff --git a/toplevel/mltop.ml b/toplevel/mltop.ml
index cc9aa59aa..e0cb2209d 100644
--- a/toplevel/mltop.ml
+++ b/toplevel/mltop.ml
@@ -178,6 +178,7 @@ let add_rec_path ~unix_path ~coq_root =
with Exit -> None
in
let dirs = List.map_filter convert_dirs dirs in
+ let () = List.iter (fun lpe -> add_ml_dir (fst lpe)) dirs in
let () = add_ml_dir unix_path in
let add (path, dir) = Loadpath.add_load_path path false dir in
let () = List.iter add dirs in