mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-07-05 09:10:18 +02:00
Code Activity

ignore 'expect-fail' forms in elisp tests

Browse source 
(Best-ability ChangeLog annotation added by Christopher Allan Webber.)

* test-suite/tests/elisp-compiler.test (compile-test): Update to support
  expect-fail.
This commit is contained in:
Robin Templeton 2015-05-10 17:41:12 -04:00 • committed by Christopher Allan Webber
parent 898e00b6cf
commit a005046c59
1 changed files with 3 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

4
test-suite/tests/elisp-compiler.test
View file

@ -36,7 +36,9 @@
(compile 'exp #:from 'elisp #:to 'value)))) (compile 'exp #:from 'elisp #:to 'value))))
((_ (pass-if-exception test-name exc exp)) ((_ (pass-if-exception test-name exc exp))
(pass-if-exception test-name exc (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 (define-syntax with-test-prefix/compile
(syntax-rules () (syntax-rules ()