From b7e29ca8dddb0216050f0cf922f205e2e900e6e2 Mon Sep 17 00:00:00 2001
From: Slava Pestov <slava@slava-pestovs-macbook-pro.local>
Date: Tue, 25 Aug 2009 22:37:10 -0500
Subject: [PATCH] cpu.ppc.assembler: LOAD32 assembler macro was busted

---
 basis/cpu/ppc/assembler/assembler.factor | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/basis/cpu/ppc/assembler/assembler.factor b/basis/cpu/ppc/assembler/assembler.factor
index f59f8779ef..dd633f4e9a 100644
--- a/basis/cpu/ppc/assembler/assembler.factor
+++ b/basis/cpu/ppc/assembler/assembler.factor
@@ -205,7 +205,7 @@ MTSPR: CTR 9
 : SRWI ( d a b -- ) (SRWI) RLWINM ;
 : SRWI. ( d a b -- ) (SRWI) RLWINM. ;
 :: LOAD32 ( n r -- )
-    n -16 shift HEX: 7fff bitand r LIS
-    r r n HEX: 7fff bitand ORI ;
+    n -16 shift HEX: ffff bitand r LIS
+    r r n HEX: ffff bitand ORI ;
 : immediate? ( n -- ? ) HEX: -8000 HEX: 7fff between? ;
 : LOAD ( n r -- ) over immediate? [ LI ] [ LOAD32 ] if ;