use radix literals

[factor.git] / basis / game / input / dinput / keys-array / keys-array.factor

diff --git a/basis/game/input/dinput/keys-array/keys-array.factor b/basis/game/input/dinput/keys-array/keys-array.factor
index b9f21f70a291665b0b9ca24a09dc52cfa64a78dc..dca6dbe2b518308ecd93c5e24310a8ac2c348ccf 100644 (file)
--- a/basis/game/input/dinput/keys-array/keys-array.factor
+++ b/basis/game/input/dinput/keys-array/keys-array.factor
@@ -8,7 +8,7 @@ TUPLE: keys-array
 C: <keys-array> keys-array
 
 : >key ( byte -- ? )
-    HEX: 80 bitand c-bool> ;
+    0x80 bitand c-bool> ;
 
 M: keys-array length length>> ;
 M: keys-array nth-unsafe underlying>> nth-unsafe >key ;