ui.backend.windows: GetKeyboardState returns 0 on error

diff --git a/basis/ui/backend/windows/windows.factor b/basis/ui/backend/windows/windows.factor
index 7ebd24deeaf02e029a59b6b115b92b7fcb6b5da4..9a6ae6d958401bf2da1f0b05ecb77427202de74b 100644 (file)
--- a/basis/ui/backend/windows/windows.factor
+++ b/basis/ui/backend/windows/windows.factor
@@ -332,7 +332,7 @@ CONSTANT: exclude-keys-wm-char
             256 <byte-array> :> keyboard-state
             4 <byte-array> :> chars
             lParam -16 shift 0xff bitand :> scan-code
-            keyboard-state GetKeyboardState win32-error<>0
+            keyboard-state GetKeyboardState win32-error=0/f
             VK_CONTROL VK_CAPITAL [ 0 swap keyboard-state set-nth ] bi@
             wParam scan-code keyboard-state chars 2 0 ToUnicode dup win32-error=0/f
             1 <=  [