From 0334cfba029b4811816c9928b09010c1746b89c2 Mon Sep 17 00:00:00 2001 From: Doug Coleman Date: Fri, 7 Dec 2007 13:35:47 -0600 Subject: [PATCH] Add two undocumented windows message names --- extra/windows/messages/messages.factor | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/extra/windows/messages/messages.factor b/extra/windows/messages/messages.factor index bc8fe0f0ce..5e19f3bf0d 100644 --- a/extra/windows/messages/messages.factor +++ b/extra/windows/messages/messages.factor @@ -13,7 +13,7 @@ SYMBOL: windows-messages word [ word-name ] keep execute maybe-create-windows-messages windows-messages get set-at ; parsing -: get-windows-message-name ( n -- name ) +: windows-message-name ( n -- name ) windows-messages get at* [ drop "unknown message" ] unless ; : WM_NULL HEX: 0000 ; inline add-windows-message @@ -107,6 +107,8 @@ SYMBOL: windows-messages : WM_NCXBUTTONDOWN HEX: 00AB ; inline add-windows-message : WM_NCXBUTTONUP HEX: 00AC ; inline add-windows-message : WM_NCXBUTTONDBLCLK HEX: 00AD ; inline add-windows-message +: WM_NCUAHDRAWCAPTION HEX: 00AE ; inline add-windows-message ! undocumented +: WM_NCUAHDRAWFRAME HEX: 00AF ; inline add-windows-message ! undocumented : WM_INPUT HEX: 00FF ; inline add-windows-message : WM_KEYFIRST HEX: 0100 ; inline add-windows-message : WM_KEYDOWN HEX: 0100 ; inline add-windows-message