diff options
author | ericm <ericm> | 2000-06-13 20:30:23 (GMT) |
---|---|---|
committer | ericm <ericm> | 2000-06-13 20:30:23 (GMT) |
commit | 757d7e36f57c08d84ed7c80206dc6adf8bfdca57 (patch) | |
tree | b14abd2689333bd6dba627cc2ba74f5fffd63503 /win/tclWinNotify.c | |
parent | 7076d5005853e3fb3651487d8a6a7f0ca6585ba6 (diff) | |
download | tcl-757d7e36f57c08d84ed7c80206dc6adf8bfdca57.zip tcl-757d7e36f57c08d84ed7c80206dc6adf8bfdca57.tar.gz tcl-757d7e36f57c08d84ed7c80206dc6adf8bfdca57.tar.bz2 |
* win/tclWinDde.c:
* win/tclWinInit.c:
* win/tclWinNotify.c:
* win/tclWinPipe.c:
* win/tclWinReg.c:
* win/tclWinThrd.c: Applied patch from [Bug 5794].
Diffstat (limited to 'win/tclWinNotify.c')
-rw-r--r-- | win/tclWinNotify.c | 8 |
1 files changed, 3 insertions, 5 deletions
diff --git a/win/tclWinNotify.c b/win/tclWinNotify.c index 932f86c..d48cae2 100644 --- a/win/tclWinNotify.c +++ b/win/tclWinNotify.c @@ -10,7 +10,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclWinNotify.c,v 1.5 1999/07/02 22:08:28 redman Exp $ + * RCS: @(#) $Id: tclWinNotify.c,v 1.6 2000/06/13 20:30:23 ericm Exp $ */ #include "tclWinInt.h" @@ -20,8 +20,6 @@ * The follwing static indicates whether this module has been initialized. */ -static int initialized = 0; - #define INTERVAL_TIMER 1 /* Handle of interval timer. */ #define WM_WAKEUP WM_USER /* Message that is send by @@ -468,7 +466,7 @@ Tcl_WaitForEvent( * propagate the quit message and start unwinding. */ - PostQuitMessage(msg.wParam); + PostQuitMessage((int) msg.wParam); status = -1; } else if (result == -1) { /* @@ -510,5 +508,5 @@ void Tcl_Sleep(ms) int ms; /* Number of milliseconds to sleep. */ { - Sleep(ms); + Sleep((DWORD) ms); } |