FFI rewrite part 5: return value boxing and callback parameter boxing now uses vregs...

[factor.git] / basis / cpu / x86 / 64 / 64-tests.factor

diff --git a/basis/cpu/x86/64/64-tests.factor b/basis/cpu/x86/64/64-tests.factor
index 2d2c89441c019b22f1abd681d5cf8180938a086a..3ade9e9e7f4805b6bbe10a57a3a6513484959e03 100644 (file)
--- a/basis/cpu/x86/64/64-tests.factor
+++ b/basis/cpu/x86/64/64-tests.factor
@@ -1,5 +1,6 @@
 USING: alien alien.c-types cpu.architecture cpu.x86.64
-cpu.x86.assembler cpu.x86.assembler.operands tools.test ;
+cpu.x86.assembler cpu.x86.assembler.operands tools.test
+assocs sequences ;
 IN: cpu.x86.64.tests
 
 : assembly-test-1 ( -- x ) int { } cdecl [ RAX 3 MOV ] alien-assembly ;
@@ -9,7 +10,7 @@ IN: cpu.x86.64.tests
 : assembly-test-2 ( a b -- x )
     int { int int } cdecl [
         param-reg-0 param-reg-1 ADD
-        int-regs return-reg param-reg-0 MOV
+        int-regs return-regs at first param-reg-0 MOV
     ] alien-assembly ;
 
 [ 23 ] [ 17 6 assembly-test-2 ] unit-test