From fc1bf07a1fa1e0b0148324e21042fb2808db0e04 Mon Sep 17 00:00:00 2001
From: Slava Pestov <slava@factorcode.org>
Date: Fri, 4 Sep 2009 06:41:33 -0500
Subject: [PATCH] cpu.ppc: fix typo

---
 basis/cpu/ppc/ppc.factor | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/basis/cpu/ppc/ppc.factor b/basis/cpu/ppc/ppc.factor
index eef58978d4..da920b6322 100644
--- 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) ] }