summaryrefslogtreecommitdiffstats
path: root/win
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2002-01-26 01:10:08 (GMT)
committerdgp <dgp@users.sourceforge.net>2002-01-26 01:10:08 (GMT)
commit107d41756017e763fb66994fb0ba6072b20a7d2b (patch)
treee98bf2d4819a5270b97f764736441c86b9eb51e3 /win
parent727dc02ba3e05c4df81068bc3fd0ac3a8c98328b (diff)
downloadtcl-107d41756017e763fb66994fb0ba6072b20a7d2b.zip
tcl-107d41756017e763fb66994fb0ba6072b20a7d2b.tar.gz
tcl-107d41756017e763fb66994fb0ba6072b20a7d2b.tar.bz2
* Sought out and eliminated instances of CONST-casting that are no
longer needed after the TIP 27 effort.
Diffstat (limited to 'win')
-rw-r--r--win/tclWinInit.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/win/tclWinInit.c b/win/tclWinInit.c
index 771081b..bf71fe7 100644
--- a/win/tclWinInit.c
+++ b/win/tclWinInit.c
@@ -7,7 +7,7 @@
* Copyright (c) 1998-1999 by Scriptics Corporation.
* All rights reserved.
*
- * RCS: @(#) $Id: tclWinInit.c,v 1.32 2002/01/25 20:40:56 dgp Exp $
+ * RCS: @(#) $Id: tclWinInit.c,v 1.33 2002/01/26 01:10:08 dgp Exp $
*/
#include "tclWinInt.h"
@@ -335,7 +335,7 @@ AppendEnvironment(
Tcl_Obj *objPtr;
char *str;
Tcl_DString ds;
- char **pathv;
+ CONST char **pathv;
/*
* The "L" preceeding the TCL_LIBRARY string is used to tell VC++
@@ -370,7 +370,7 @@ AppendEnvironment(
* version string.
*/
- pathv[pathc - 1] = (char *) (lib + 4);
+ pathv[pathc - 1] = (lib + 4);
Tcl_DStringInit(&ds);
str = Tcl_JoinPath(pathc, pathv, &ds);
objPtr = Tcl_NewStringObj(str, Tcl_DStringLength(&ds));