diff options
author | davygrvy <davygrvy@pobox.com> | 2002-11-19 01:29:27 (GMT) |
---|---|---|
committer | davygrvy <davygrvy@pobox.com> | 2002-11-19 01:29:27 (GMT) |
commit | 31afe3baa87a58624ae0fb3c62b917627766a4c7 (patch) | |
tree | 50ab16535eb23288ac10a8641e9f1bbbd00cd586 | |
parent | fde7bd393999feda74572fce41dcbc6a7d41b139 (diff) | |
download | tcl-31afe3baa87a58624ae0fb3c62b917627766a4c7.zip tcl-31afe3baa87a58624ae0fb3c62b917627766a4c7.tar.gz tcl-31afe3baa87a58624ae0fb3c62b917627766a4c7.tar.bz2 |
* win/tclWinThrd.c (Tcl_CreateThread/TclpThreadExit): Fixed
improper compiler macros that missed the VC++ compiler. This
resulted in VC++ builds using CreateThread()/ExitThread() in place
of the proper _beginthreadex()/_endthreadex(). This was a large
error and am surprised I missed seeing it earlier.
-rw-r--r-- | win/tclWinThrd.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/win/tclWinThrd.c b/win/tclWinThrd.c index a00c672..cbef305 100644 --- a/win/tclWinThrd.c +++ b/win/tclWinThrd.c @@ -9,7 +9,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclWinThrd.c,v 1.20 2002/08/29 19:02:19 andreas_kupries Exp $ + * RCS: @(#) $Id: tclWinThrd.c,v 1.21 2002/11/19 01:29:27 davygrvy Exp $ */ #include "tclWinInt.h" @@ -133,7 +133,7 @@ Tcl_CreateThread(idPtr, proc, clientData, stackSize, flags) EnterCriticalSection(&joinLock); -#if defined(__MSVCRT__) || defined(__BORLANDC__) +#if defined(_MSC_VER) || defined(__MSVCRT__) || defined(__BORLANDC__) tHandle = (HANDLE) _beginthreadex(NULL, (unsigned) stackSize, proc, clientData, 0, (unsigned *)idPtr); #else @@ -212,7 +212,7 @@ TclpThreadExit(status) TclSignalExitThread (Tcl_GetCurrentThread (), status); LeaveCriticalSection(&joinLock); -#if defined(__MSVCRT__) || defined(__BORLANDC__) +#if defined(_MSC_VER) || defined(__MSVCRT__) || defined(__BORLANDC__) _endthreadex((unsigned) status); #else ExitThread((DWORD) status); |