aboutsummaryrefslogtreecommitdiff
path: root/toplevel
diff options
context:
space:
mode:
authorletouzey2008-07-23 14:46:57 +0000
committerletouzey2008-07-23 14:46:57 +0000
commitceee412ccf9dcfe85c97a1f5c6b684af04b697f2 (patch)
tree26ed897e118a8c5ddeb760ff4d6358d28b5effad /toplevel
parent25927c9afb1c5fa62ee4af1427c85a23623fe0ae (diff)
Stop glob messages to be printed by default on stdout
Jean-Marc, feel free to check I've not broken anything concerning coqdoc... git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@11248 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'toplevel')
-rw-r--r--toplevel/vernac.ml3
1 files changed, 1 insertions, 2 deletions
diff --git a/toplevel/vernac.ml b/toplevel/vernac.ml
index ae35b0fa1a..92d2bbf28b 100644
--- a/toplevel/vernac.ml
+++ b/toplevel/vernac.ml
@@ -228,8 +228,7 @@ let compile verbosely f =
let ldir,long_f_dot_v = Library.start_library f in
if Dumpglob.multi_dump () then
Dumpglob.open_glob_file (f ^ ".glob");
- if Dumpglob.dump () then
- Dumpglob.dump_string ("F" ^ Names.string_of_dirpath ldir ^ "\n");
+ Dumpglob.dump_string ("F" ^ Names.string_of_dirpath ldir ^ "\n");
if !Flags.xml_export then !xml_start_library ();
let _ = load_vernac verbosely long_f_dot_v in
if Pfedit.get_all_proof_names () <> [] then