]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/game/input/dinput/dinput.factor
use radix literals
[factor.git] / basis / game / input / dinput / dinput.factor
index 594dc8c059d09226b57011f7668663d1cc3394c6..b883e24e77c05bd82edb33a718fe2defdf017d6c 100755 (executable)
@@ -283,7 +283,7 @@ CONSTANT: pov-values
 : >slider ( long -- float )
     65535.0 /f ; inline
 : >pov ( long -- symbol )
-    dup HEX: FFFF bitand HEX: FFFF =
+    dup 0xFFFF bitand 0xFFFF =
     [ drop pov-neutral ]
     [ 2750 + 4500 /i pov-values nth ] if ; inline