steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

ui.backend.windows: explicate quotation parameters in add-wm-handler

factor-shell
Alexander Iljin 2017-10-09 10:48:52 +03:00 committed by John Benediktsson
parent d1d3a33617
commit 9cdb209d01
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
basis/ui/backend/windows/windows.factor
View File

@ -506,7 +506,7 @@ SYMBOL: wm-handlers
H{ } clone wm-handlers set-global H{ } clone wm-handlers set-global
: add-wm-handler ( quot wm -- ) : add-wm-handler ( quot: ( hWnd Msg wParam lParam -- LRESULT ) wm -- )
dup array? dup array?
[ [ execute( -- wm ) add-wm-handler ] with each ] [ [ execute( -- wm ) add-wm-handler ] with each ]
[ wm-handlers get-global set-at ] if ; [ wm-handlers get-global set-at ] if ;