diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-01-31 10:31:55 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-01-31 10:31:55 (GMT) |
commit | 16869d9a0554a0e248f7c85e37acf5d10b228906 (patch) | |
tree | 93d16010bea954703aad736080cb17ea3af82b51 /generic/tclStringObj.c | |
parent | 4eaaa750d1b7d6a7670e51be27a149a21f68c7ef (diff) | |
parent | abc1ba4c1cfe287f7f51dcb9ad436dae39d9953a (diff) | |
download | tcl-16869d9a0554a0e248f7c85e37acf5d10b228906.zip tcl-16869d9a0554a0e248f7c85e37acf5d10b228906.tar.gz tcl-16869d9a0554a0e248f7c85e37acf5d10b228906.tar.bz2 |
merge core-8-5-branch
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 04cf4ee..e495c2e 100644 --- a/generic/tclStringObj.c +++ b/generic/tclStringObj.c @@ -140,9 +140,9 @@ typedef struct String { #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 |