diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-02-03 16:05:31 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-02-03 16:05:31 (GMT) |
| commit | b0bf6914f1e11ba4b7a127dcda5cd48f96976a33 (patch) | |
| tree | 01db44fdacc53c737b3eca7e953393794e326a41 /generic/tclStringObj.c | |
| parent | 330e115d111796221e3560e558e531eae5e28b25 (diff) | |
| parent | 9088907888b8deb7fcd5748c0dcc4472130ee10b (diff) | |
| download | tcl-b0bf6914f1e11ba4b7a127dcda5cd48f96976a33.zip tcl-b0bf6914f1e11ba4b7a127dcda5cd48f96976a33.tar.gz tcl-b0bf6914f1e11ba4b7a127dcda5cd48f96976a33.tar.bz2 | |
merge trunk
Diffstat (limited to 'generic/tclStringObj.c')
| -rw-r--r-- | generic/tclStringObj.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclStringObj.c b/generic/tclStringObj.c index 64c661b..4be8428 100644 --- a/generic/tclStringObj.c +++ b/generic/tclStringObj.c @@ -140,9 +140,9 @@ typedef struct { #define stringAttemptRealloc(ptr, numChars) \ (String *) attemptckrealloc((ptr), (unsigned) STRING_SIZE(numChars) ) #define GET_STRING(objPtr) \ - ((String *) (objPtr)->internalRep.otherValuePtr) + ((String *) (objPtr)->internalRep.twoPtrValue.ptr1) #define SET_STRING(objPtr, stringPtr) \ - ((objPtr)->internalRep.otherValuePtr = (void *) (stringPtr)) + ((objPtr)->internalRep.twoPtrValue.ptr1 = (void *) (stringPtr)) /* * TCL STRING GROWTH ALGORITHM |