diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2007-06-12 12:36:54 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2007-06-12 12:36:54 (GMT) |
| commit | 755d028b486e29aa92d29e6eec54ec5745829c1f (patch) | |
| tree | ae92a52188871f401bae49cf31ca32ba1eadc525 /generic/tclIndexObj.c | |
| parent | a416ef038cf5bc87716558a4dce7b163ebcd6697 (diff) | |
| download | tcl-755d028b486e29aa92d29e6eec54ec5745829c1f.zip tcl-755d028b486e29aa92d29e6eec54ec5745829c1f.tar.gz tcl-755d028b486e29aa92d29e6eec54ec5745829c1f.tar.bz2 | |
Silence a 'const'ness warning.
Diffstat (limited to 'generic/tclIndexObj.c')
| -rw-r--r-- | generic/tclIndexObj.c | 4 |
1 files 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 |