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

Fix PPC compile errors

db4
Slava Pestov 2008-07-25 17:40:32 -05:00
parent cc09f334ef
commit 06d9d4db16
3 changed files with 8 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
core/cpu/ppc/bootstrap.factor
View File

@ -14,13 +14,13 @@ big-endian on
: ds-reg 14 ; : ds-reg 14 ;
: rs-reg 15 ; : rs-reg 15 ;
: factor-area-size 4 bootstrap-cells ; : factor-area-size ( -- n ) 4 bootstrap-cells ;
: stack-frame : stack-frame ( -- n )
factor-area-size c-area-size + 4 bootstrap-cells align ; factor-area-size c-area-size + 4 bootstrap-cells align ;
: next-save stack-frame bootstrap-cell - ; : next-save ( -- n ) stack-frame bootstrap-cell - ;
: xt-save stack-frame 2 bootstrap-cells - ; : xt-save ( -- n ) stack-frame 2 bootstrap-cells - ;
[ [
0 6 LOAD32 0 6 LOAD32

4
core/cpu/ppc/linux/bootstrap.factor
View File

@ -3,8 +3,8 @@
USING: parser layouts system kernel ; USING: parser layouts system kernel ;
IN: bootstrap.ppc IN: bootstrap.ppc
: c-area-size 10 bootstrap-cells ; : c-area-size ( -- n ) 10 bootstrap-cells ;
: lr-save bootstrap-cell ; : lr-save ( -- n ) bootstrap-cell ;
<< "resource:core/cpu/ppc/bootstrap.factor" parse-file parsed >> << "resource:core/cpu/ppc/bootstrap.factor" parse-file parsed >>
call call

4
core/cpu/ppc/macosx/bootstrap.factor
View File

@ -3,8 +3,8 @@
USING: parser layouts system kernel ; USING: parser layouts system kernel ;
IN: bootstrap.ppc IN: bootstrap.ppc
: c-area-size 14 bootstrap-cells ; : c-area-size ( -- n ) 14 bootstrap-cells ;
: lr-save 2 bootstrap-cells ; : lr-save ( -- n ) 2 bootstrap-cells ;
<< "resource:core/cpu/ppc/bootstrap.factor" parse-file parsed >> << "resource:core/cpu/ppc/bootstrap.factor" parse-file parsed >>
call call