summaryrefslogtreecommitdiffstats
path: root/generic/tclStringObj.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2013-01-31 10:31:55 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2013-01-31 10:31:55 (GMT)
commit16869d9a0554a0e248f7c85e37acf5d10b228906 (patch)
tree93d16010bea954703aad736080cb17ea3af82b51 /generic/tclStringObj.c
parent4eaaa750d1b7d6a7670e51be27a149a21f68c7ef (diff)
parentabc1ba4c1cfe287f7f51dcb9ad436dae39d9953a (diff)
downloadtcl-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.c4
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