diff options
| author | Hendrik Tews | 2021-02-22 23:00:41 +0100 |
|---|---|---|
| committer | Hendrik Tews | 2021-02-22 23:25:30 +0100 |
| commit | 76fe29c9b121a0010a0f24b5cca5ac706683e3c3 (patch) | |
| tree | ac5879e94b68e1b926783c93ff60b27039ccb464 /ci/simple-tests/test-coqtop-unavailable.el | |
| parent | bdb67820696b2bfec06fda72f2a39548c73dcaf7 (diff) | |
protect uses of coq-callcoq
Uses of coq-callcoq need to correctly handle nil as result for
the case that coq-callcoq fails.
Additionally, add a regression test.
Fixes #551
Diffstat (limited to 'ci/simple-tests/test-coqtop-unavailable.el')
| -rw-r--r-- | ci/simple-tests/test-coqtop-unavailable.el | 24 |
1 files changed, 24 insertions, 0 deletions
diff --git a/ci/simple-tests/test-coqtop-unavailable.el b/ci/simple-tests/test-coqtop-unavailable.el new file mode 100644 index 00000000..8d16bf4e --- /dev/null +++ b/ci/simple-tests/test-coqtop-unavailable.el @@ -0,0 +1,24 @@ +;; This file is part of Proof General. +;; +;; © Copyright 2021 Hendrik Tews +;; +;; Authors: Hendrik Tews +;; Maintainer: Hendrik Tews <hendrik@askra.de> +;; +;; License: GPL (GNU GENERAL PUBLIC LICENSE) + +;;; Commentary: +;; +;; Test that Proof General can open Coq files even when coqtop is +;; unavailable. + + +(ert-deftest coqtop-unavailable () + "Proof General can open Coq files even when coqtop is unavailable.." + (setq coq-prog-name "unavailable-program") + + ;; ensure coq-prog-name cannot be found + (should (not (locate-file coq-prog-name exec-path))) + + (find-file "simple.v") + (coq-prog-args)) |