diff options
author | nijtmans <nijtmans> | 2010-03-16 16:18:35 (GMT) |
---|---|---|
committer | nijtmans <nijtmans> | 2010-03-16 16:18:35 (GMT) |
commit | 0cf955ab149d4c4221bdafaaab80d53352ac4446 (patch) | |
tree | 28a29bff39c724d9681bca5b764170877b5f14fe | |
parent | d8aa6f53b956aac50cc8abbee8efde417120f022 (diff) | |
download | tcl-0cf955ab149d4c4221bdafaaab80d53352ac4446.zip tcl-0cf955ab149d4c4221bdafaaab80d53352ac4446.tar.gz tcl-0cf955ab149d4c4221bdafaaab80d53352ac4446.tar.bz2 |
don't cast away "const" without reason.
-rw-r--r-- | ChangeLog | 1 | ||||
-rw-r--r-- | win/tclWinChan.c | 4 |
2 files changed, 3 insertions, 2 deletions
@@ -3,6 +3,7 @@ * compat/zlib/* Upgrade zlib to version 1.2.4 * win/makefile.vc * unix/Makefile.in + * win/tclWinChan.c don't cast away "const" without reason. 2010-03-12 Jan Nijtmans <nijtmans@users.sf.net> diff --git a/win/tclWinChan.c b/win/tclWinChan.c index c2bddb9..6ab056d 100644 --- a/win/tclWinChan.c +++ b/win/tclWinChan.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: tclWinChan.c,v 1.55 2010/01/10 22:58:39 nijtmans Exp $ + * RCS: @(#) $Id: tclWinChan.c,v 1.56 2010/03/16 16:18:35 nijtmans Exp $ */ #include "tclWinInt.h" @@ -856,7 +856,7 @@ TclpOpenFileChannel( char channelName[16 + TCL_INTEGER_SPACE]; TclFile readFile = NULL, writeFile = NULL; - nativeName = (TCHAR *) Tcl_FSGetNativePath(pathPtr); + nativeName = (const TCHAR *) Tcl_FSGetNativePath(pathPtr); if (nativeName == NULL) { return NULL; } |