summaryrefslogtreecommitdiffstats
path: root/generic/tclCkalloc.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2020-03-07 15:55:35 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2020-03-07 15:55:35 (GMT)
commit467d03dbc94f1e8b6ec74da6ac0f54ce4975bf10 (patch)
tree03949fda0c5247d6df80ba114da1ec1649060a89 /generic/tclCkalloc.c
parentb8ffa18096ee9a37d5105ec6c48c0b6eeea7dbc4 (diff)
downloadtcl-467d03dbc94f1e8b6ec74da6ac0f54ce4975bf10.zip
tcl-467d03dbc94f1e8b6ec74da6ac0f54ce4975bf10.tar.gz
tcl-467d03dbc94f1e8b6ec74da6ac0f54ce4975bf10.tar.bz2
Change (interal) function signature of TclpAlloc/TclpRealloc/TclpFree, using (void *) in stead of (char *)
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;