Primitives now pass vm ptr on 64bit x86

db4
Phil Dawes 2009-08-25 06:59:26 +01:00
parent 0bc7c0c1d0
commit be1b079eb5
2 changed files with 4 additions and 0 deletions

View File

@ -21,6 +21,9 @@ IN: bootstrap.x86
: rex-length ( -- n ) 1 ;
[
! HACK: stash vm pointer above the ds stack
temp0 0 MOV rc-absolute-cell rt-vm jit-rel
ds-reg bootstrap-cell [+] temp0 MOV
! load stack_chain
temp0 0 MOV rc-absolute-cell rt-stack-chain jit-rel
temp0 temp0 [] MOV

View File

@ -13,6 +13,7 @@ namespace factor
extern const primitive_type primitives[];
#define PRIMITIVE_OVERFLOW_GETVM() vm
#define VM_PTR vm
#define ASSERTVM()
}