diff options
| author | Hugo Herbelin | 2016-01-21 09:21:23 +0100 |
|---|---|---|
| committer | Hugo Herbelin | 2016-01-22 21:26:44 +0100 |
| commit | f65f8d5a4d9ba437fa2d8af03e2781d841e53007 (patch) | |
| tree | 8463f297afabb3a8dcf9f0316ed8033724891f97 /toplevel | |
| parent | aa1913411547eeed464b024f1cf54113be26e929 (diff) | |
Restore warnings produced by the interpretation of the command line
(e.g. with deprecated options such as -byte, etc.) since I guess this
is what we expect.
Was probably lost in 81eb133d64ac81cb.
Diffstat (limited to 'toplevel')
| -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 afd4ef40e8..cfedff0809 100644 --- a/toplevel/coqtop.ml +++ b/toplevel/coqtop.ml @@ -35,7 +35,7 @@ let print_header () = ppnl (str "Welcome to Coq " ++ str ver ++ str " (" ++ str rev ++ str ")"); pp_flush () -let warning s = msg_warning (strbrk s) +let warning s = with_option Flags.warn msg_warning (strbrk s) let toploop = ref None |