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

Merge branch 'master' of git://factorcode.org/git/factor

db4
Slava Pestov 2009-09-08 22:34:17 -05:00
parent cd5133b233 f166797dd4
commit 0e2a3e4292
1 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
basis/cpu/ppc/ppc.factor
View File

@ -554,9 +554,13 @@ M:: ppc %compare-float-unordered ( dst src1 src2 cc temp -- )
{ cc/= [ label BNE ] }
} case ;
M: ppc %compare-branch [ (%compare) ] 2dip %branch ;
M:: ppc %compare-branch ( label src1 src2 cc -- )
src1 src2 (%compare)
label cc %branch ;
M: ppc %compare-imm-branch [ (%compare-imm) ] 2dip %branch ;
M:: ppc %compare-imm-branch ( label src1 src2 cc -- )
src1 src2 (%compare)
label cc %branch ;
:: (%branch) ( label branch1 branch2 -- )
label branch1 execute( label -- )