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
old mode 100755 (executable)
new mode 100644 (file)
index 3426b89..dca6dbe
--- a/basis/game/input/dinput/keys-array/keys-array.factor
+++ b/basis/game/input/dinput/keys-array/keys-array.factor
@@ -1,5 +1,5 @@
 USING: sequences sequences.private math
-accessors alien.data ;
+accessors alien.c-types ;
 IN: game.input.dinput.keys-array
 
 TUPLE: keys-array
@@ -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 ;