steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Another x86 fix

release
Slava Pestov 2007-10-06 20:16:34 -04:00
parent 0044d00700
commit 20d81509df
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
core/cpu/x86/bootstrap.factor
View File

@ -10,7 +10,7 @@ big-endian off
: stack-frame-size 8 bootstrap-cells ;
: scan-save stack-reg stack-frame-size 3 bootstrap-cells - [+] ;
: scan-save stack-reg 3 bootstrap-cells [+] ;
[
arg0 arg0 quot-array@ [+] MOV ! load array
@ -79,9 +79,9 @@ big-endian off
[
load-branch
stack-reg [] scan-reg MOV ! save scan pointer
scan-save scan-reg MOV ! save scan pointer
xt-reg CALL ! call quotation
scan-reg stack-reg [] MOV ! restore scan pointer
scan-reg scan-save MOV ! restore scan pointer
] { } make jit-if-call set
[