aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorGaëtan Gilbert2018-02-27 16:54:06 +0100
committerGaëtan Gilbert2018-02-27 16:54:06 +0100
commit8339c1f95ec5e0923673e0c27d6842ff5d9838c0 (patch)
tree2dc7ed415080ee26c47755705b4d652fb8327d87
parente3124e098ef8170dac2b348b91757a7034bc4999 (diff)
Fix #6751 trust_file_cache logic was inverted
Bug introduced by 675a1dc401eb9a5540ba5bc9a522c1f84d4c3d54
-rw-r--r--lib/system.ml3
-rw-r--r--toplevel/coqargs.ml2
2 files changed, 3 insertions, 2 deletions
diff --git a/lib/system.ml b/lib/system.ml
index e56736eb15..0ad86c73ff 100644
--- a/lib/system.ml
+++ b/lib/system.ml
@@ -54,7 +54,8 @@ let make_dir_table dir =
let filter_dotfiles s f = if f.[0] = '.' then s else StrSet.add f s in
Array.fold_left filter_dotfiles StrSet.empty (Sys.readdir dir)
-let trust_file_cache = ref true
+(** Don't trust in interactive mode (the default) *)
+let trust_file_cache = ref false
let exists_in_dir_respecting_case dir bf =
let cache_dir dir =
diff --git a/toplevel/coqargs.ml b/toplevel/coqargs.ml
index 5b73471c59..a7065c0315 100644
--- a/toplevel/coqargs.ml
+++ b/toplevel/coqargs.ml
@@ -153,7 +153,7 @@ let add_compat_require opts v =
let set_batch_mode opts =
Flags.quiet := true;
- System.trust_file_cache := false;
+ System.trust_file_cache := true;
{ opts with batch_mode = true }
let add_compile opts verbose s =