diff options
-rw-r--r-- | lib/system.ml | 3 | ||||
-rw-r--r-- | toplevel/coqargs.ml | 2 |
2 files changed, 3 insertions, 2 deletions
diff --git a/lib/system.ml b/lib/system.ml index e56736eb1..0ad86c73f 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 5b73471c5..a7065c031 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 = |