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

Fix compile errors

db4
Slava Pestov 2008-06-11 04:52:19 -05:00
parent 608f70a52c
commit 39180371de
3 changed files with 15 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
core/cpu/x86/32/bootstrap.factor
View File

@ -6,13 +6,13 @@ IN: bootstrap.x86
4 \ cell set 4 \ cell set
: arg0 EAX ; : arg0 ( -- reg ) EAX ;
: arg1 EDX ; : arg1 ( -- reg ) EDX ;
: temp-reg EBX ; : temp-reg ( -- reg ) EBX ;
: stack-reg ESP ; : stack-reg ( -- reg ) ESP ;
: ds-reg ESI ; : ds-reg ( -- reg ) ESI ;
: fixnum>slot@ arg0 1 SAR ; : fixnum>slot@ ( -- ) arg0 1 SAR ;
: rex-length 0 ; : rex-length ( -- n ) 0 ;
<< "resource:core/cpu/x86/bootstrap.factor" parse-file parsed >> << "resource:core/cpu/x86/bootstrap.factor" parse-file parsed >>
call call

14
core/cpu/x86/64/bootstrap.factor
View File

@ -6,13 +6,13 @@ IN: bootstrap.x86
8 \ cell set 8 \ cell set
: arg0 RDI ; : arg0 ( -- reg ) RDI ;
: arg1 RSI ; : arg1 ( -- reg ) RSI ;
: temp-reg RBX ; : temp-reg ( -- reg ) RBX ;
: stack-reg RSP ; : stack-reg ( -- reg ) RSP ;
: ds-reg R14 ; : ds-reg ( -- reg ) R14 ;
: fixnum>slot@ ; : fixnum>slot@ ( -- ) ;
: rex-length 1 ; : rex-length ( -- n ) 1 ;
<< "resource:core/cpu/x86/bootstrap.factor" parse-file parsed >> << "resource:core/cpu/x86/bootstrap.factor" parse-file parsed >>
call call

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

@ -9,7 +9,7 @@ big-endian off
1 jit-code-format set 1 jit-code-format set
: stack-frame-size 4 bootstrap-cells ; : stack-frame-size ( -- n ) 4 bootstrap-cells ;
[ [
! Load word ! Load word