From 5fa08a5dd84f38d311dccfc1de5c1a204b6042b6 Mon Sep 17 00:00:00 2001
From: Hugo Herbelin
Date: Thu, 13 Jul 2017 16:48:34 +0200
Subject: Adding -print-version in addition to -print-version for consistency.

---
 tools/coqc.ml      | 2 +-
 toplevel/coqtop.ml | 2 +-
 toplevel/usage.ml  | 2 +-
 3 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/tools/coqc.ml b/tools/coqc.ml
index 5da203742c..0559d7b537 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 08c2350237..86c0cbfa23 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 f8c7b114c9..962bb4302b 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\")\
-- 
cgit v1.2.3