From da4c77b445a0e228854fad72187c8f98f96c972b Mon Sep 17 00:00:00 2001 From: Slava Pestov Date: Sun, 28 Oct 2007 01:21:26 -0400 Subject: [PATCH] Remove commented-out code --- extra/ui/windows/windows.factor | 3 --- 1 file changed, 3 deletions(-) diff --git a/extra/ui/windows/windows.factor b/extra/ui/windows/windows.factor index cba9c427b7..6b19085a1c 100755 --- a/extra/ui/windows/windows.factor +++ b/extra/ui/windows/windows.factor @@ -306,8 +306,6 @@ SYMBOL: hWnd "uint" { "void*" "uint" "long" "long" } "stdcall" [ [ pick - ! "Message: " write dup get-windows-message-name write - ! " " write dup unparse print flush { { [ dup WM_CLOSE = ] [ drop handle-wm-close 0 ] } { [ dup WM_PAINT = ] @@ -340,7 +338,6 @@ SYMBOL: hWnd { [ t ] [ drop DefWindowProc ] } } cond ] ui-try - ! "finished handling message" print .s flush ] alien-callback ; : do-events ( -- )