diff options
| author | donal.k.fellows@manchester.ac.uk <dkf> | 2011-03-26 11:53:59 (GMT) |
|---|---|---|
| committer | donal.k.fellows@manchester.ac.uk <dkf> | 2011-03-26 11:53:59 (GMT) |
| commit | 880b93e43358b53971cc383a797a2bde8bf989ad (patch) | |
| tree | ab47b39e8bedb1021813e1161e79eb9a80359b53 /generic/tclStringObj.c | |
| parent | b262f59751fc75956d4b71cb482fc27e543777e7 (diff) | |
| download | tcl-880b93e43358b53971cc383a797a2bde8bf989ad.zip tcl-880b93e43358b53971cc383a797a2bde8bf989ad.tar.gz tcl-880b93e43358b53971cc383a797a2bde8bf989ad.tar.bz2 | |
Reduce the number of casts used to manage Tcl_Obj internal representations.
Diffstat (limited to 'generic/tclStringObj.c')
| -rw-r--r-- | generic/tclStringObj.c | 5 |
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) \ |