diff options
| author | Emilio Jesus Gallego Arias | 2019-04-29 17:36:36 +0200 |
|---|---|---|
| committer | Emilio Jesus Gallego Arias | 2019-04-29 17:36:36 +0200 |
| commit | cb02d26b3cb5fba749a80b13e822d9a95ec0b5e8 (patch) | |
| tree | b1bf1cf2acbeb321956f00bf41e65437dbf6f910 | |
| parent | 05c5c3ab8e52ebe43179975b42142f2646b0479e (diff) | |
[toplevel] Only print welcome header in standard coqtop.
Closes #8410 (adapted from fix by @silene in the 8.9 branch)
| -rw-r--r-- | toplevel/coqtop.ml | 2 |
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 = |