diff options
author | Hugo Herbelin <Hugo.Herbelin@inria.fr> | 2017-07-13 16:48:34 +0200 |
---|---|---|
committer | Hugo Herbelin <Hugo.Herbelin@inria.fr> | 2017-07-25 13:27:05 +0200 |
commit | 5fa08a5dd84f38d311dccfc1de5c1a204b6042b6 (patch) | |
tree | 923c957440651c4c5930837b14f46273121dffcb | |
parent | c0fdb912c5e63bb43d6e8dd320e9f5613c6237ff (diff) |
Adding -print-version in addition to -print-version for consistency.
-rw-r--r-- | tools/coqc.ml | 2 | ||||
-rw-r--r-- | toplevel/coqtop.ml | 2 | ||||
-rw-r--r-- | toplevel/usage.ml | 2 |
3 files changed, 3 insertions, 3 deletions
diff --git a/tools/coqc.ml b/tools/coqc.ml index 5da203742..0559d7b53 100644 --- a/tools/coqc.ml +++ b/tools/coqc.ml @@ -86,7 +86,7 @@ let parse_args () = Envars.print_config stdout Coq_config.all_src_dirs; exit 0 - |"--print-version" :: _ -> + | ("-print-version" | "--print-version") :: _ -> Usage.machine_readable_version 0 (* Options for coqtop : a) options with 0 argument *) diff --git a/toplevel/coqtop.ml b/toplevel/coqtop.ml index 08c235023..86c0cbfa2 100644 --- a/toplevel/coqtop.ml +++ b/toplevel/coqtop.ml @@ -584,7 +584,7 @@ let parse_args arglist = |"-type-in-type" -> set_type_in_type () |"-unicode" -> add_require "Utf8_core" |"-v"|"--version" -> Usage.version (exitcode ()) - |"--print-version" -> Usage.machine_readable_version (exitcode ()) + |"-print-version"|"--print-version" -> Usage.machine_readable_version (exitcode ()) |"-where" -> print_where := true |"-xml" -> Flags.xml_export := true diff --git a/toplevel/usage.ml b/toplevel/usage.ml index f8c7b114c..962bb4302 100644 --- a/toplevel/usage.ml +++ b/toplevel/usage.ml @@ -57,7 +57,7 @@ let print_usage_channel co command = \n -where print Coq's standard library location and exit\ \n -config, --config print Coq's configuration information and exit\ \n -v, --version print Coq version and exit\ -\n --print-version print Coq version in easy to parse format and exit\ +\n -print-version print Coq version in easy to parse format and exit\ \n -list-tags print highlight color tags known by Coq and exit\ \n\ \n -quiet unset display of extra information (implies -w \"-all\")\ |