cpu.ppc: fix typo

diff --git a/basis/cpu/ppc/ppc.factor b/basis/cpu/ppc/ppc.factor
index eef58978d42f6e0e510b650873793dc54479a5b1..da920b6322ad4f60705ef85245d86176e16b931b 100644 (file)
--- a/basis/cpu/ppc/ppc.factor
+++ b/basis/cpu/ppc/ppc.factor
@@ -500,7 +500,7 @@ M: ppc %epilogue ( n -- )
     dst \ t %load-reference
     "end" get resolve-label ; inline
 
-: %boolean ( dst temp cc -- )
+:: %boolean ( dst temp cc -- )
     cc negate-cc order-cc {
         { cc<  [ dst temp \ BLT (%boolean) ] }
         { cc<= [ dst temp \ BLE (%boolean) ] }