diff options
author | Robin Templeton <robin@terpri.org> | 2015-05-10 17:41:12 -0400 |
---|---|---|
committer | Christopher Allan Webber <cwebber@dustycloud.org> | 2016-03-25 12:00:14 -0700 |
commit | a005046c5989b9b5cce8f3e60dea297b878ff9b1 (patch) | |
tree | fe8b82e436b3b11c435ed6a0484e85e8a9a547ca /test-suite/tests/elisp-compiler.test | |
parent | 898e00b6cf984df9f5585719c85d10e2e8fcf785 (diff) | |
download | guile-a005046c5989b9b5cce8f3e60dea297b878ff9b1.tar.gz |
ignore 'expect-fail' forms in elisp tests
(Best-ability ChangeLog annotation added by Christopher Allan Webber.)
* test-suite/tests/elisp-compiler.test (compile-test): Update to support
expect-fail.
Diffstat (limited to 'test-suite/tests/elisp-compiler.test')
-rw-r--r-- | test-suite/tests/elisp-compiler.test | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/test-suite/tests/elisp-compiler.test b/test-suite/tests/elisp-compiler.test index ddfa80a9a..1e40dc040 100644 --- a/test-suite/tests/elisp-compiler.test +++ b/test-suite/tests/elisp-compiler.test @@ -36,7 +36,9 @@ (compile 'exp #:from 'elisp #:to 'value)))) ((_ (pass-if-exception test-name exc exp)) (pass-if-exception test-name exc - (compile 'exp #:from 'elisp #:to 'value))))) + (compile 'exp #:from 'elisp #:to 'value))) + ((_ (expect-fail test-name exp)) + #f))) (define-syntax with-test-prefix/compile (syntax-rules () |