diff options
| author | welch <welch> | 2000-04-10 22:44:15 (GMT) |
|---|---|---|
| committer | welch <welch> | 2000-04-10 22:44:15 (GMT) |
| commit | 13aec0471ffd37b75154bb25f75de7fda964de63 (patch) | |
| tree | 18fc4d9eb7a8ab7cb66a2f6c7de9022bebb75bc2 | |
| parent | 1ca8b9ee3d089e20d6e8603c3b6ce33bac188d6d (diff) | |
| download | tcl-13aec0471ffd37b75154bb25f75de7fda964de63.zip tcl-13aec0471ffd37b75154bb25f75de7fda964de63.tar.gz tcl-13aec0471ffd37b75154bb25f75de7fda964de63.tar.bz2 | |
Fixed Tcl_CreateThreadProc declaration
| -rw-r--r-- | generic/tcl.h | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/generic/tcl.h b/generic/tcl.h index e1396de..4af2c79 100644 --- a/generic/tcl.h +++ b/generic/tcl.h @@ -12,7 +12,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tcl.h,v 1.66 2000/04/10 18:17:41 hobbs Exp $ + * RCS: @(#) $Id: tcl.h,v 1.67 2000/04/10 22:44:15 welch Exp $ */ #ifndef _TCL @@ -395,6 +395,8 @@ typedef struct Tcl_Var_ *Tcl_Var; #ifdef MAC_TCL typedef pascal void *(Tcl_ThreadCreateProc) _ANSI_ARGS_((ClientData clientData)); +#elif defined __WIN32__ +typedef unsigned (__stdcall Tcl_ThreadCreateProc) _ANSI_ARGS_((ClientData clientData)); #else typedef void (Tcl_ThreadCreateProc) _ANSI_ARGS_((ClientData clientData)); #endif |