aboutsummaryrefslogtreecommitdiffhomepage
path: root/tools/coqdep_boot.ml
diff options
context:
space:
mode:
authorGravatar Pierre Boutillier <pierre.boutillier@ens-lyon.org>2014-06-30 14:00:39 +0200
committerGravatar Pierre Boutillier <pierre.boutillier@ens-lyon.org>2014-06-30 15:55:54 +0200
commite1d46f1c6ca9556e23e5378c6589220fc48da879 (patch)
tree6000c8c03de02115f134864dbbf64b0922cf2a7b /tools/coqdep_boot.ml
parent8e3ef4dbfd00c67af1cc2b83307038a6440584cb (diff)
Coqdep: update include strategies
-I is (only) the ml one -I -as is fixed -Q is understood -R is not a recursive ml include anymore $COQENV, user_contrib, ... are not recursively included coqlib/theories and coqlib/plugins are still recursively included (for now). (This may deserves an option) Closes Bug 2910: If there is a "Require a." in a b.v and a a.vo in path but no a.v, coqdep does not complains about a missing a.v.
Diffstat (limited to 'tools/coqdep_boot.ml')
-rw-r--r--tools/coqdep_boot.ml13
1 files changed, 9 insertions, 4 deletions
diff --git a/tools/coqdep_boot.ml b/tools/coqdep_boot.ml
index f42c8dc75..a80a713ed 100644
--- a/tools/coqdep_boot.ml
+++ b/tools/coqdep_boot.ml
@@ -24,21 +24,26 @@ let rec parse = function
| "-I" :: r :: ll ->
(* To solve conflict (e.g. same filename in kernel and checker)
we allow to state an explicit order *)
- add_dir add_known r [];
+ add_caml_dir r;
norec_dirs:=r::!norec_dirs;
parse ll
| f :: ll -> treat_file None f; parse ll
| [] -> ()
let coqdep_boot () =
+ let () = option_boot := true in
if Array.length Sys.argv < 2 then exit 1;
parse (List.tl (Array.to_list Sys.argv));
- if !option_c then
- add_rec_dir add_known "." []
+ if !option_c then begin
+ add_rec_dir add_known "." [];
+ add_rec_dir (fun _ -> add_caml_known) "." ["Coq"];
+ end
else begin
add_rec_dir add_known "theories" ["Coq"];
add_rec_dir add_known "plugins" ["Coq"];
- add_dir add_known "tactics" [];
+ add_caml_dir "tactics";
+ add_rec_dir (fun _ -> add_caml_known) "theories" ["Coq"];
+ add_rec_dir (fun _ -> add_caml_known) "plugins" ["Coq"];
end;
if !option_c then mL_dependencies ();
coq_dependencies ()