]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/cpu/ppc/32/linux/bootstrap.factor
use radix literals
[factor.git] / basis / cpu / ppc / 32 / linux / bootstrap.factor
index 0d75eb010018f9e81a3500644e17678562cdc886..7a4b6acd1eddffdff7193755ab55f07a471d678f 100644 (file)
@@ -19,8 +19,8 @@ CONSTANT: frame-reg 31
 : nv-int-regs ( -- seq ) 13 31 [a,b] ;
 
 : LOAD32 ( r n -- )
-    [ -16 shift HEX: ffff bitand LIS ]
-    [ [ dup ] dip HEX: ffff bitand ORI ] 2bi ;
+    [ -16 shift 0xffff bitand LIS ]
+    [ [ dup ] dip 0xffff bitand ORI ] 2bi ;
 
 : jit-trap-null ( src -- ) drop ;
 : jit-load-vm ( dst -- )