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

cpu.ppc: fix typo

db4
Slava Pestov 2009-09-04 06:41:33 -05:00
parent c9e04cd8f5
commit fc1bf07a1f
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -500,7 +500,7 @@ M: ppc %epilogue ( n -- )
dst \ t %load-reference dst \ t %load-reference
"end" get resolve-label ; inline "end" get resolve-label ; inline
: %boolean ( dst temp cc -- ) :: %boolean ( dst temp cc -- )
cc negate-cc order-cc { cc negate-cc order-cc {
{ cc< [ dst temp \ BLT (%boolean) ] } { cc< [ dst temp \ BLT (%boolean) ] }
{ cc<= [ dst temp \ BLE (%boolean) ] } { cc<= [ dst temp \ BLE (%boolean) ] }