]> gitweb.factorcode.org Git - factor.git/blobdiff - unmaintained/dragdrop-listener/dragdrop-listener.factor
use radix literals
[factor.git] / unmaintained / dragdrop-listener / dragdrop-listener.factor
index 3ed2256c7d911a2fe1664fb1717f726017b8f880..650c9bef243577e378b19665d76d410f501db785 100644 (file)
@@ -7,7 +7,7 @@ SPECIALIZED-ARRAY: WCHAR
 IN: windows.dragdrop-listener\r
 \r
 : filenames-from-hdrop ( hdrop -- filenames )\r
-    dup HEX: FFFFFFFF f 0 DragQueryFile ! get count of files\r
+    dup 0xFFFFFFFF f 0 DragQueryFile ! get count of files\r
     [\r
         2dup f 0 DragQueryFile 1 + ! get size of filename buffer\r
         dup WCHAR <c-array>\r