fixed vm ptr passing to box_value_struct

2009-08-27 19:49:57 +01:00 · 2009-08-27 19:49:57 +01:00 · 888eae9554
parent 3345922330
commit 888eae9554
1 changed files with 1 additions and 1 deletions
--- a/basis/cpu/x86/64/64.factor
+++ b/basis/cpu/x86/64/64.factor
@ -165,7 +165,7 @@ M: x86.64 %box-large-struct ( n c-type -- )
    ! Compute destination address
    param-reg-1 swap struct-return@ LEA
    ! Copy the struct from the C stack
-    "box_value_struct" f %alien-invoke ;
+    "box_value_struct" %vm-invoke-3rd-arg ;

 M: x86.64 %prepare-box-struct ( -- )
    ! Compute target address for value struct return