use radix literals

[factor.git] / basis / cpu / ppc / 64 / linux / bootstrap.factor

diff --git a/basis/cpu/ppc/64/linux/bootstrap.factor b/basis/cpu/ppc/64/linux/bootstrap.factor
index 9fd9506cc0a33404c76a965b315781ee33c49431..8d2ded480dc1f7c864d3a41fd36ba5d8934ad5d1 100644 (file)
--- a/basis/cpu/ppc/64/linux/bootstrap.factor
+++ b/basis/cpu/ppc/64/linux/bootstrap.factor
@@ -20,11 +20,11 @@ CONSTANT: frame-reg 31
 
 : LOAD64 ( r n -- )
     [ dup ] dip {
-        [ nip -48 shift HEX: ffff bitand LIS ]
-        [ -32 shift HEX: ffff bitand ORI ]
+        [ nip -48 shift 0xffff bitand LIS ]
+        [ -32 shift 0xffff bitand ORI ]
         [ drop 32 SLDI ]
-        [ -16 shift HEX: ffff bitand ORIS ]
-        [ HEX: ffff bitand ORI ]
+        [ -16 shift 0xffff bitand ORIS ]
+        [ 0xffff bitand ORI ]
     } 3cleave ;
 
 : jit-trap-null ( src -- ) drop ;