diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2011-03-26 11:53:59 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2011-03-26 11:53:59 (GMT) |
| commit | 77029bd1e96f8df35c93b67699e5aee7c4546d72 (patch) | |
| tree | ab47b39e8bedb1021813e1161e79eb9a80359b53 /generic/tclStringObj.c | |
| parent | b570644554e1dc8b3efeb2a54cd329b877e8a67c (diff) | |
| download | tcl-77029bd1e96f8df35c93b67699e5aee7c4546d72.zip tcl-77029bd1e96f8df35c93b67699e5aee7c4546d72.tar.gz tcl-77029bd1e96f8df35c93b67699e5aee7c4546d72.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) \ |