diff options
author | dgp <dgp@users.sourceforge.net> | 2009-02-11 18:07:48 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2009-02-11 18:07:48 (GMT) |
commit | d30eaa00001670c9031797d534be65f1c21a868b (patch) | |
tree | 2bdbbcf1086888325210efa5d620a1198688340c /generic | |
parent | 93480ff215923ba215001b05e93b3316e4742487 (diff) | |
download | tcl-d30eaa00001670c9031797d534be65f1c21a868b.zip tcl-d30eaa00001670c9031797d534be65f1c21a868b.tar.gz tcl-d30eaa00001670c9031797d534be65f1c21a868b.tar.bz2 |
* generic/tclStringObj.c: Changed type of the 'allocated' field
* generic/tclTestObj.c: of the String struct (and the
TestString counterpart) from size_t to int since only int values are
ever stored in it.
Diffstat (limited to 'generic')
-rw-r--r-- | generic/tclTestObj.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclTestObj.c b/generic/tclTestObj.c index e0dddce..73cca56 100644 --- a/generic/tclTestObj.c +++ b/generic/tclTestObj.c @@ -13,7 +13,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclTestObj.c,v 1.29 2009/02/10 23:09:07 nijtmans Exp $ + * RCS: @(#) $Id: tclTestObj.c,v 1.30 2009/02/11 18:07:56 dgp Exp $ */ #include "tclInt.h" @@ -55,7 +55,7 @@ static int TeststringobjCmd(ClientData dummy, Tcl_Interp *interp, typedef struct TestString { int numChars; - size_t allocated; + int allocated; size_t uallocated; Tcl_UniChar unicode[2]; } TestString; |