summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authornijtmans <nijtmans>2010-03-16 16:18:35 (GMT)
committernijtmans <nijtmans>2010-03-16 16:18:35 (GMT)
commit0cf955ab149d4c4221bdafaaab80d53352ac4446 (patch)
tree28a29bff39c724d9681bca5b764170877b5f14fe
parentd8aa6f53b956aac50cc8abbee8efde417120f022 (diff)
downloadtcl-0cf955ab149d4c4221bdafaaab80d53352ac4446.zip
tcl-0cf955ab149d4c4221bdafaaab80d53352ac4446.tar.gz
tcl-0cf955ab149d4c4221bdafaaab80d53352ac4446.tar.bz2
don't cast away "const" without reason.
-rw-r--r--ChangeLog1
-rw-r--r--win/tclWinChan.c4
2 files changed, 3 insertions, 2 deletions
diff --git a/ChangeLog b/ChangeLog
index c86d6f4..c3b44bf8 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -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;
}