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

db4
Slava Pestov 2008-11-24 12:01:55 -06:00
commit e62a558cf4
1 changed files with 2 additions and 2 deletions

View File

@ -396,14 +396,14 @@ M: ppc %epilogue ( n -- )
1 1 rot ADDI
0 MTLR ;
:: (%boolean) ( dst word -- )
:: (%boolean) ( dst temp word -- )
"end" define-label
dst \ f tag-number %load-immediate
"end" get word execute
dst \ t %load-indirect
"end" get resolve-label ; inline
: %boolean ( dst cc -- )
: %boolean ( dst temp cc -- )
negate-cc {
{ cc< [ \ BLT (%boolean) ] }
{ cc<= [ \ BLE (%boolean) ] }