diff options
Diffstat (limited to 'generic/tclCkalloc.c')
-rw-r--r-- | generic/tclCkalloc.c | 24 |
1 files changed, 12 insertions, 12 deletions
diff --git a/generic/tclCkalloc.c b/generic/tclCkalloc.c index c1ff631..0092c83 100644 --- a/generic/tclCkalloc.c +++ b/generic/tclCkalloc.c @@ -633,7 +633,7 @@ Tcl_DbCkfree( if (memp->tagPtr != NULL) { if ((memp->tagPtr->refCount-- <= 1) && (curTagPtr != memp->tagPtr)) { - TclpFree((char *) memp->tagPtr); + TclpFree(memp->tagPtr); } } @@ -650,7 +650,7 @@ Tcl_DbCkfree( if (allocHead == memp) { allocHead = memp->flink; } - TclpFree((char *) memp); + TclpFree(memp); Tcl_MutexUnlock(ckallocMutexPtr); } @@ -914,7 +914,7 @@ MemoryCmd( return TCL_ERROR; } if ((curTagPtr != NULL) && (curTagPtr->refCount == 0)) { - TclpFree((char *) curTagPtr); + TclpFree(curTagPtr); } len = strlen(TclGetString(objv[2])); curTagPtr = (MemTag *) TclpAlloc(TAG_SIZE(len)); @@ -1052,7 +1052,7 @@ char * Tcl_Alloc( unsigned int size) { - char *result = TclpAlloc(size); + char *result = (char *)TclpAlloc(size); /* * Most systems will not alloc(0), instead bumping it to one so that NULL @@ -1076,7 +1076,7 @@ Tcl_DbCkalloc( const char *file, int line) { - char *result = TclpAlloc(size); + char *result = (char *)TclpAlloc(size); if ((result == NULL) && size) { fflush(stdout); @@ -1100,7 +1100,7 @@ char * Tcl_AttemptAlloc( unsigned int size) { - return TclpAlloc(size); + return (char *)TclpAlloc(size); } char * @@ -1109,7 +1109,7 @@ Tcl_AttemptDbCkalloc( TCL_UNUSED(const char *) /*file*/, TCL_UNUSED(int) /*line*/) { - return TclpAlloc(size); + return (char *)TclpAlloc(size); } /* @@ -1128,7 +1128,7 @@ Tcl_Realloc( char *ptr, unsigned int size) { - char *result = TclpRealloc(ptr, size); + char *result = (char *)TclpRealloc(ptr, size); if ((result == NULL) && size) { Tcl_Panic("unable to realloc %u bytes", size); @@ -1143,7 +1143,7 @@ Tcl_DbCkrealloc( const char *file, int line) { - char *result = TclpRealloc(ptr, size); + char *result = (char *)TclpRealloc(ptr, size); if ((result == NULL) && size) { fflush(stdout); @@ -1168,7 +1168,7 @@ Tcl_AttemptRealloc( char *ptr, unsigned int size) { - return TclpRealloc(ptr, size); + return (char *)TclpRealloc(ptr, size); } char * @@ -1178,7 +1178,7 @@ Tcl_AttemptDbCkrealloc( TCL_UNUSED(const char *) /*file*/, TCL_UNUSED(int) /*line*/) { - return TclpRealloc(ptr, size); + return (char *)TclpRealloc(ptr, size); } /* @@ -1282,7 +1282,7 @@ TclFinalizeMemorySubsystem(void) Tcl_MutexLock(ckallocMutexPtr); if (curTagPtr != NULL) { - TclpFree((char *) curTagPtr); + TclpFree(curTagPtr); curTagPtr = NULL; } allocHead = NULL; |