summaryrefslogtreecommitdiffstats
path: root/generic/tclCkalloc.c
diff options
context:
space:
mode:
Diffstat (limited to 'generic/tclCkalloc.c')
-rw-r--r--generic/tclCkalloc.c24
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;