From 755d028b486e29aa92d29e6eec54ec5745829c1f Mon Sep 17 00:00:00 2001 From: dkf Date: Tue, 12 Jun 2007 12:36:54 +0000 Subject: Silence a 'const'ness warning. --- generic/tclIndexObj.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/generic/tclIndexObj.c b/generic/tclIndexObj.c index df8d9ee..e45a902 100644 --- a/generic/tclIndexObj.c +++ b/generic/tclIndexObj.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: tclIndexObj.c,v 1.33 2007/06/12 12:29:05 dkf Exp $ + * RCS: @(#) $Id: tclIndexObj.c,v 1.34 2007/06/12 12:36:54 dkf Exp $ */ #include "tclInt.h" @@ -450,7 +450,7 @@ Tcl_WrongNumArgs( Tcl_Obj *objPtr; int i, len, elemLen, flags; Interp *iPtr = (Interp *) interp; - char *elementStr; + const char *elementStr; /* * [incr Tcl] does something fairly horrific when generating error -- cgit v0.12