summaryrefslogtreecommitdiffstats
path: root/generic/tclFileName.c
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2001-09-27 00:19:57 (GMT)
committerdgp <dgp@users.sourceforge.net>2001-09-27 00:19:57 (GMT)
commit073702fdd13f3a1c8c129b1fc0ac838f01b4d11b (patch)
tree11719d8041bc71444822ebd3d7e40e25c1c4323e /generic/tclFileName.c
parenta6c26a069d4a7aa7cd5420cabb2a7614de09f299 (diff)
downloadtcl-073702fdd13f3a1c8c129b1fc0ac838f01b4d11b.zip
tcl-073702fdd13f3a1c8c129b1fc0ac838f01b4d11b.tar.gz
tcl-073702fdd13f3a1c8c129b1fc0ac838f01b4d11b.tar.bz2
* Vince Darley reports the 2001-09-24 TIP 27 changes left the win
directory CONST poisoned. These changes should fix that.
Diffstat (limited to 'generic/tclFileName.c')
-rw-r--r--generic/tclFileName.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclFileName.c b/generic/tclFileName.c
index 3eb9a17..4c2a580 100644
--- a/generic/tclFileName.c
+++ b/generic/tclFileName.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: tclFileName.c,v 1.20 2001/09/04 18:06:34 vincentdarley Exp $
+ * RCS: @(#) $Id: tclFileName.c,v 1.21 2001/09/27 00:19:57 dgp Exp $
*/
#include "tclInt.h"
@@ -272,7 +272,7 @@ ExtractWinRoot(path, resultPtr, offset, typePtr)
Tcl_PathType
Tcl_GetPathType(path)
- char *path;
+ CONST char *path;
{
Tcl_PathType type;
Tcl_Obj *tempObj = Tcl_NewStringObj(path,-1);