diff options
| author | Damien Doligez <damien.doligez-inria.fr> | 2009-12-03 16:04:55 +0000 |
|---|---|---|
| committer | Damien Doligez <damien.doligez-inria.fr> | 2009-12-03 16:04:55 +0000 |
| commit | f2734e23cd78d36f1bedc9bbb3791e28e6cf5805 (patch) | |
| tree | b3d3bc839ccbc29d72adcbcb85e815da90c879e3 | |
| parent | 769be0ebbdd8f5c38e4e32e03e91f5612a2f0372 (diff) | |
| download | ocaml-f2734e23cd78d36f1bedc9bbb3791e28e6cf5805.tar.gz | |
stupid bug with warnings
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@9438 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
| -rw-r--r-- | driver/optmain.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/driver/optmain.ml b/driver/optmain.ml index e3827a8a80..2680966671 100644 --- a/driver/optmain.ml +++ b/driver/optmain.ml @@ -169,7 +169,7 @@ let main () = "-version", Arg.Unit print_version_string, " Print compiler version and exit"; "-verbose", Arg.Set verbose, " Print calls to external commands"; - "-w", Arg.String (Warnings.parse_options true), + "-w", Arg.String (Warnings.parse_options false), "<list> Enable or disable warnings according to <list>:\n\ \032 +<num> enable warning <num>\n\ \032 +<letter> enable set <letter>\n\ @@ -178,7 +178,7 @@ let main () = \032 @<num> enable warning <num> and treat it as an error\n\ \032 @<letter> enable set <letter> and treat them as errors\n\ \032 default setting is \"+a-4-6-9-27\""; - "-warn-error" , Arg.String (Warnings.parse_options false), + "-warn-error" , Arg.String (Warnings.parse_options true), "<list> Enable or disable error status for warnings according\n\ \ to <list>. See option -w for the syntax of <list>.\n\ \ Default setting is \"-a\""; |