summaryrefslogtreecommitdiffstats
path: root/win/tclWinNotify.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2018-09-05 13:45:15 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2018-09-05 13:45:15 (GMT)
commit1f6ac7f87e3a127645d7839916f0bc2a6143b9b9 (patch)
treeebd9cd2ef1306351bac09ce6e0c22872ad04d953 /win/tclWinNotify.c
parent2562ea174bddf62331bd7d71ebd4b49f53ad8345 (diff)
parent5c9968a001208bb4fc6d06ad040c28bd84b7831f (diff)
downloadtcl-1f6ac7f87e3a127645d7839916f0bc2a6143b9b9.zip
tcl-1f6ac7f87e3a127645d7839916f0bc2a6143b9b9.tar.gz
tcl-1f6ac7f87e3a127645d7839916f0bc2a6143b9b9.tar.bz2
Merge 8.7.
Change some internal function signatures, accounting for the 64-bit era.
Diffstat (limited to 'win/tclWinNotify.c')
-rw-r--r--win/tclWinNotify.c4
1 files changed, 1 insertions, 3 deletions
diff --git a/win/tclWinNotify.c b/win/tclWinNotify.c
index 28c8445..b34fc4f 100644
--- a/win/tclWinNotify.c
+++ b/win/tclWinNotify.c
@@ -36,7 +36,6 @@ typedef struct {
int pending; /* Alert message pending, this field is locked
* by the notifierMutex. */
HWND hwnd; /* Messaging window. */
- int timeout; /* Current timeout value. */
int timerActive; /* 1 if interval timer is running. */
} ThreadSpecificData;
@@ -309,11 +308,10 @@ Tcl_SetTimer(
timeout = 1;
}
}
- tsdPtr->timeout = timeout;
if (timeout != 0) {
tsdPtr->timerActive = 1;
SetTimer(tsdPtr->hwnd, INTERVAL_TIMER,
- (unsigned long) tsdPtr->timeout, NULL);
+ timeout, NULL);
} else {
tsdPtr->timerActive = 0;
KillTimer(tsdPtr->hwnd, INTERVAL_TIMER);