[Guile-commits] 32/36: update cross-compilation test

[Christopher Allan Webber]

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

commit 51fb37b34c46612d319a18c4ad384faafdc03122
Author: Robin Templeton <robin@terpri.org>
AuthorDate: Sun May 10 17:11:40 2015 -0400

    update cross-compilation test
    
    (Best-ability ChangeLog annotation added by Christopher Allan Webber.)
    
    * test-suite/tests/cross-compilation.test (test-target): Update it.
---
 test-suite/tests/cross-compilation.test | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/test-suite/tests/cross-compilation.test 
b/test-suite/tests/cross-compilation.test
index 120317b..456cf8a 100644
--- a/test-suite/tests/cross-compilation.test
+++ b/test-suite/tests/cross-compilation.test
@@ -56,8 +56,8 @@
                         (string=? (native-os) (target-os)))
                    (native-word-size)
                    word-size))
-              (bv (compile '(hello-world) #:warning-level 0 #:to 'bytecode)))
-          (and=> (parse-elf bv)
+              (bv+constants (compile '(hello-world) #:warning-level 0 #:to 
'bytecode)))
+          (and=> (parse-elf (car bv+constants))
                  (lambda (elf)
                    (and (equal? (elf-byte-order elf) endian)
                         (equal? (elf-word-size elf) word-size)))))))))