summaryrefslogtreecommitdiffstats
path: root/generic/tclStringObj.c
diff options
context:
space:
mode:
authordkf <dkf@noemail.net>2011-03-26 11:53:59 (GMT)
committerdkf <dkf@noemail.net>2011-03-26 11:53:59 (GMT)
commit4b9e6ef1b0919f9d052e5307fa98a14e83f64321 (patch)
treeab47b39e8bedb1021813e1161e79eb9a80359b53 /generic/tclStringObj.c
parent3dc1ed5dc720346b7ce0bb61573a568e938260b0 (diff)
downloadtcl-4b9e6ef1b0919f9d052e5307fa98a14e83f64321.zip
tcl-4b9e6ef1b0919f9d052e5307fa98a14e83f64321.tar.gz
tcl-4b9e6ef1b0919f9d052e5307fa98a14e83f64321.tar.bz2
Reduce the number of casts used to manage Tcl_Obj internal representations.
FossilOrigin-Name: b2381061a7b89af02f5c0247d1f4fa8164587470
Diffstat (limited to 'generic/tclStringObj.c')
-rw-r--r--generic/tclStringObj.c5
1 files changed, 2 insertions, 3 deletions
diff --git a/generic/tclStringObj.c b/generic/tclStringObj.c
index 7cdbb3e..cf635bc 100644
--- a/generic/tclStringObj.c
+++ b/generic/tclStringObj.c
@@ -134,10 +134,9 @@ typedef struct String {
#define stringAlloc(numChars) \
(String *) ckalloc((unsigned) STRING_SIZE(numChars) )
#define stringRealloc(ptr, numChars) \
- (String *) ckrealloc((char *) ptr, (unsigned) STRING_SIZE(numChars) )
+ (String *) ckrealloc((ptr), (unsigned) STRING_SIZE(numChars) )
#define stringAttemptRealloc(ptr, numChars) \
- (String *) attemptckrealloc((char *) ptr, \
- (unsigned) STRING_SIZE(numChars) )
+ (String *) attemptckrealloc((ptr), (unsigned) STRING_SIZE(numChars) )
#define GET_STRING(objPtr) \
((String *) (objPtr)->internalRep.otherValuePtr)
#define SET_STRING(objPtr, stringPtr) \