aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMaxime Dénès2019-04-30 09:23:39 +0200
committerMaxime Dénès2019-04-30 09:23:39 +0200
commit8e4ee8e71a08fef13d25ce9b02a2b4b9ccbbff9b (patch)
tree40c3a5870725031f3c7a580d7ea152c527530b5d
parentfcba5e87be13bc5a5374fe274476cd4d5c45f058 (diff)
parentcb02d26b3cb5fba749a80b13e822d9a95ec0b5e8 (diff)
Merge PR #10024: [toplevel] Only print welcome header in standard coqtop.
Reviewed-by: maximedenes
-rw-r--r--toplevel/coqtop.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/toplevel/coqtop.ml b/toplevel/coqtop.ml
index 8fae561be8..15172b30f8 100644
--- a/toplevel/coqtop.ml
+++ b/toplevel/coqtop.ml
@@ -220,7 +220,6 @@ let init_toplevel ~help ~init custom_init arglist =
let top_lp = Coqinit.toplevel_init_load_path () in
List.iter Mltop.add_coq_path top_lp;
let opts, extras = custom_init ~opts extras in
- Flags.if_verbose print_header ();
Mltop.init_known_plugins ();
Global.set_engagement opts.impredicative_set;
@@ -296,6 +295,7 @@ let rec coqc_deprecated_check args acc extras =
let coqtop_init ~opts extra =
init_color opts;
CoqworkmgrApi.(init !async_proofs_worker_priority);
+ Flags.if_verbose print_header ();
opts, extra
let coqtop_toplevel =