summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorhershey <hershey>1999-06-16 00:00:48 (GMT)
committerhershey <hershey>1999-06-16 00:00:48 (GMT)
commit51f2d76280e4152cd3313ecea349790f04a0ec60 (patch)
treed223255b2a08ef927873334d19bba07ac70a2842
parent1b1bab45a700c36f964cdbd1a79045e914e0aa96 (diff)
downloadtcl-51f2d76280e4152cd3313ecea349790f04a0ec60.zip
tcl-51f2d76280e4152cd3313ecea349790f04a0ec60.tar.gz
tcl-51f2d76280e4152cd3313ecea349790f04a0ec60.tar.bz2
fixed bugs that kept windows from compiling.
-rw-r--r--generic/tclStringObj.c12
1 files changed, 6 insertions, 6 deletions
diff --git a/generic/tclStringObj.c b/generic/tclStringObj.c
index e00b02a..24881d6 100644
--- a/generic/tclStringObj.c
+++ b/generic/tclStringObj.c
@@ -33,7 +33,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclStringObj.c,v 1.10 1999/06/15 22:06:17 hershey Exp $ */
+ * RCS: @(#) $Id: tclStringObj.c,v 1.11 1999/06/16 00:00:48 hershey Exp $ */
#include "tclInt.h"
@@ -654,7 +654,7 @@ Tcl_SetObjLength(objPtr, length)
stringPtr->numChars = -1;
stringPtr->uallocated = 0;
- if (length > stringPtr->allocated) {
+ if (length > (int) stringPtr->allocated) {
/*
* Not enough space in current string. Reallocate the string
@@ -1120,7 +1120,7 @@ AppendUtfToUtfRep(objPtr, bytes, numBytes)
newLength = numBytes + oldLength;
stringPtr = GET_STRING(objPtr);
- if (newLength > stringPtr->allocated) {
+ if (newLength > (int) stringPtr->allocated) {
/*
* There isn't currently enough space in the string
@@ -1201,7 +1201,7 @@ Tcl_AppendStringsToObjVA (objPtr, argList)
}
stringPtr = GET_STRING(objPtr);
- if (newLength > stringPtr->allocated) {
+ if (newLength > (int) stringPtr->allocated) {
/*
* There isn't currently enough space in the string
@@ -1380,7 +1380,7 @@ DupStringInternalRep(srcPtr, copyPtr)
*/
if (srcStringPtr->numChars == srcPtr->length) {
- copyStringPtr = (String *) ckalloc(STRING_SIZE(0));
+ copyStringPtr = (String *) ckalloc(sizeof(String));
copyStringPtr->uallocated = 0;
} else {
copyStringPtr = (String *) ckalloc(
@@ -1453,7 +1453,7 @@ SetStringFromAny(interp, objPtr)
* Allocate enough space for the basic String structure.
*/
- stringPtr = (String *) ckalloc(STRING_SIZE(0));
+ stringPtr = (String *) ckalloc(sizeof(String));
stringPtr->numChars = -1;
stringPtr->uallocated = 0;