diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-05-23 16:03:29 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-05-23 16:03:29 (GMT) |
| commit | 2acd355f8dc8e75b3a63b7b1dc079ebccb3a2701 (patch) | |
| tree | 7410995c34f762f6c920204b067e5ef2b4ea268b /win | |
| parent | f3f254e8bab8854467fda3c5a2c48a640fb7687c (diff) | |
| download | tcl-2acd355f8dc8e75b3a63b7b1dc079ebccb3a2701.zip tcl-2acd355f8dc8e75b3a63b7b1dc079ebccb3a2701.tar.gz tcl-2acd355f8dc8e75b3a63b7b1dc079ebccb3a2701.tar.bz2 | |
Give Tcl_CreateThread a TCL_HASH_TYPE (unsigned) stackSize parameter
Diffstat (limited to 'win')
| -rw-r--r-- | win/tclWinThrd.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/win/tclWinThrd.c b/win/tclWinThrd.c index e9d4e08..da9133f 100644 --- a/win/tclWinThrd.c +++ b/win/tclWinThrd.c @@ -204,7 +204,7 @@ TclpThreadCreate( Tcl_ThreadId *idPtr, /* Return, the ID of the thread. */ Tcl_ThreadCreateProc *proc, /* Main() function of the thread. */ ClientData clientData, /* The one argument to Main(). */ - int stackSize, /* Size of stack for the new thread. */ + TCL_HASH_TYPE stackSize, /* Size of stack for the new thread. */ int flags) /* Flags controlling behaviour of the new * thread. */ { @@ -223,11 +223,11 @@ TclpThreadCreate( */ #if defined(_MSC_VER) || defined(__MSVCRT__) - tHandle = (HANDLE) _beginthreadex(NULL, (unsigned) stackSize, + tHandle = (HANDLE) _beginthreadex(NULL, (unsigned)stackSize, (Tcl_ThreadCreateProc*) TclWinThreadStart, winThreadPtr, 0, (unsigned *)idPtr); #else - tHandle = CreateThread(NULL, (DWORD) stackSize, + tHandle = CreateThread(NULL, (DWORD)stackSize, TclWinThreadStart, winThreadPtr, 0, (LPDWORD)idPtr); #endif @@ -725,7 +725,7 @@ Tcl_ConditionWait( if (timePtr == NULL) { wtime = INFINITE; } else { - wtime = timePtr->sec * 1000 + timePtr->usec / 1000; + wtime = (DWORD)timePtr->sec * 1000 + (DWORD)timePtr->usec / 1000; } /* |