diff options
-rw-r--r-- | test-suite/tests/cross-compilation.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/test-suite/tests/cross-compilation.test b/test-suite/tests/cross-compilation.test index 175e6402b..b15c51d6e 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) #:to 'bytecode))) - (and=> (parse-elf bv) + (bv+constants (compile '(hello-world) #:to 'bytecode))) + (and=> (parse-elf (car bv+constants)) (lambda (elf) (and (equal? (elf-byte-order elf) endian) (equal? (elf-word-size elf) word-size))))))))) |