diff options
| author | nijtmans <nijtmans@noemail.net> | 2008-11-17 22:15:33 (GMT) |
|---|---|---|
| committer | nijtmans <nijtmans@noemail.net> | 2008-11-17 22:15:33 (GMT) |
| commit | 5b7c03beb6cc1cf08ee54551c8fcc1576c62ac7b (patch) | |
| tree | 2f8215b09f523671c94a4acc837892ad9160b950 /generic/tclVar.c | |
| parent | 0eeba10b941d28935f4bf60bd7ed6920afe501eb (diff) | |
| download | tcl-5b7c03beb6cc1cf08ee54551c8fcc1576c62ac7b.zip tcl-5b7c03beb6cc1cf08ee54551c8fcc1576c62ac7b.tar.gz tcl-5b7c03beb6cc1cf08ee54551c8fcc1576c62ac7b.tar.bz2 | |
Fix signature and implementation of Tcl_HashStats,
such that it conforms to the documentation.
FossilOrigin-Name: 2b7fc9b4445dd1264716d839f5b6637f5bbb766c
Diffstat (limited to 'generic/tclVar.c')
| -rw-r--r-- | generic/tclVar.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclVar.c b/generic/tclVar.c index dc35f69..34d3741 100644 --- a/generic/tclVar.c +++ b/generic/tclVar.c @@ -16,7 +16,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclVar.c,v 1.171 2008/10/26 18:34:04 dkf Exp $ + * RCS: @(#) $Id: tclVar.c,v 1.172 2008/11/17 22:15:34 nijtmans Exp $ */ #include "tclInt.h" @@ -3214,7 +3214,7 @@ Tcl_ArrayObjCmd( } case ARRAY_STATISTICS: { - const char *stats; + char *stats; if (notArray) { goto error; |