aboutsummaryrefslogtreecommitdiffhomepage
path: root/coq/coq-system.el
diff options
context:
space:
mode:
authorGravatar Pierre Courtieu <Pierre.Courtieu@cnam.fr>2017-01-26 11:32:46 +0100
committerGravatar Pierre Courtieu <Pierre.Courtieu@cnam.fr>2017-01-26 11:32:46 +0100
commitcf290f2da6513c42ad57620136c7e6b6cebf8e11 (patch)
treeb1114d17e8c507bae32520851b468d1ac4770232 /coq/coq-system.el
parentc6e44de22de8dfe7a5c9521201937a8302ec12c9 (diff)
parent4bcac92df46da9e68b5e3d565bb118fb63b4feb4 (diff)
Merge branch 'master' of github.com:ProofGeneral/PG into master_origin
Diffstat (limited to 'coq/coq-system.el')
-rw-r--r--coq/coq-system.el12
1 files changed, 12 insertions, 0 deletions
diff --git a/coq/coq-system.el b/coq/coq-system.el
index 88ce06be..0b9b6c58 100644
--- a/coq/coq-system.el
+++ b/coq/coq-system.el
@@ -170,6 +170,18 @@ Returns nil if the version can't be detected."
(signal 'coq-unclassifiable-version coq-version-to-use))
(t (signal (car err) (cdr err))))))))
+(defun coq--post-v86 ()
+ "Return t if the auto-detected version of Coq is >= 8.6.
+Return nil if the version cannot be detected."
+ (let ((coq-version-to-use (or (coq-version t) "8.5")))
+ (condition-case err
+ (not (coq--version< coq-version-to-use "8.6"))
+ (error
+ (cond
+ ((equal (substring (cadr err) 0 15) "Invalid version")
+ (signal 'coq-unclassifiable-version coq-version-to-use))
+ (t (signal (car err) (cdr err))))))))
+
(defcustom coq-use-makefile nil
"Whether to look for a Makefile to attempt to guess the command line.
Set to t if you want this feature, but note that it is deprecated."