cpu.x86: don't have to pass VM pointer to quotations anymore

diff --git a/basis/cpu/x86/32/32.factor b/basis/cpu/x86/32/32.factor
index e741012bc4360c951020438569acbb7ee1c03650..f1cf0211d5bf9a0c0987a289792e337b4e03feb5 100644 (file)
--- a/basis/cpu/x86/32/32.factor
+++ b/basis/cpu/x86/32/32.factor
@@ -237,7 +237,6 @@ M: x86.32 %alien-indirect ( -- )
 M: x86.32 %alien-callback ( quot -- )
     EAX EDX %restore-context
     EAX swap %load-reference
-    EDX %mov-vm-ptr
     EAX quot-xt-offset [+] CALL
     EAX EDX %save-context ;
 

diff --git a/basis/cpu/x86/64/64.factor b/basis/cpu/x86/64/64.factor
index 071f45d1275c79461df3c6c13c9b2d204b933829..22485673949731b37116ca854566f88ff92507e7 100644 (file)
--- a/basis/cpu/x86/64/64.factor
+++ b/basis/cpu/x86/64/64.factor
@@ -225,7 +225,6 @@ M: x86.64 %alien-indirect ( -- )
 M: x86.64 %alien-callback ( quot -- )
     param-reg-0 param-reg-1 %restore-context
     param-reg-0 swap %load-reference
-    param-reg-1 %mov-vm-ptr
     param-reg-0 quot-xt-offset [+] CALL
     param-reg-0 param-reg-1 %save-context ;