cpu.ppc.assembler: LOAD32 assembler macro was busted

diff --git a/basis/cpu/ppc/assembler/assembler.factor b/basis/cpu/ppc/assembler/assembler.factor
index f59f8779efde99713ddde63ab1dc9f15fb1dc9de..dd633f4e9a3523b29731dc5d0b88ec8a7f116823 100644 (file)
--- 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 ;