diff --git a/basis/cpu/x86/32/32.factor b/basis/cpu/x86/32/32.factor index e741012bc4..f1cf0211d5 100644 --- 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 071f45d127..2248567394 100644 --- 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 ;