[Guile-commits] 35/36: ignore 'expect-fail' forms in elisp tests

[Christopher Allan Webber]

cwebber pushed a commit to branch wip-elisp
in repository guile.

commit a005046c5989b9b5cce8f3e60dea297b878ff9b1
Author: Robin Templeton <address@hidden>
Date:   Sun May 10 17:41:12 2015 -0400

    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.
---
 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 ddfa80a..1e40dc0 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 ()