diff options
author | nijtmans <nijtmans> | 2011-01-25 22:33:56 (GMT) |
---|---|---|
committer | nijtmans <nijtmans> | 2011-01-25 22:33:56 (GMT) |
commit | 860c71bfb869a99031dcc18c0b45f8c2e7b0b0e0 (patch) | |
tree | 150b7e7d28f9c6fd1f44e197c65ffe5c4908eec8 /win/tclWinThrd.c | |
parent | 9e8baada957304199619be751f3cd6fe06fb5912 (diff) | |
download | tcl-860c71bfb869a99031dcc18c0b45f8c2e7b0b0e0.zip tcl-860c71bfb869a99031dcc18c0b45f8c2e7b0b0e0.tar.gz tcl-860c71bfb869a99031dcc18c0b45f8c2e7b0b0e0.tar.bz2 |
Fix various gcc-4.5.2 64-bit warning messages,
e.g. by using full 64-bits for socket fd's
Diffstat (limited to 'win/tclWinThrd.c')
-rw-r--r-- | win/tclWinThrd.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/win/tclWinThrd.c b/win/tclWinThrd.c index 7154496..8c1d2f8 100644 --- a/win/tclWinThrd.c +++ b/win/tclWinThrd.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: tclWinThrd.c,v 1.53 2010/06/16 14:49:51 nijtmans Exp $ + * RCS: @(#) $Id: tclWinThrd.c,v 1.54 2011/01/25 22:33:56 nijtmans Exp $ */ #include "tclWinInt.h" @@ -263,7 +263,7 @@ TclpThreadExit( Tcl_ThreadId Tcl_GetCurrentThread(void) { - return (Tcl_ThreadId) GetCurrentThreadId(); + return (Tcl_ThreadId)(size_t)GetCurrentThreadId(); } /* |