diff options
Diffstat (limited to 'generic/tkPack.c')
-rw-r--r-- | generic/tkPack.c | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/generic/tkPack.c b/generic/tkPack.c index d57d2bf..07047a9 100644 --- a/generic/tkPack.c +++ b/generic/tkPack.c @@ -1035,7 +1035,7 @@ GetPacker( if (!isNew) { return Tcl_GetHashValue(hPtr); } - packPtr = (Packer *) ckalloc(sizeof(Packer)); + packPtr = ckalloc(sizeof(Packer)); packPtr->tkwin = tkwin; packPtr->masterPtr = NULL; packPtr->nextPtr = NULL; @@ -1368,7 +1368,8 @@ DestroyPacker( * dead. */ { register Packer *packPtr = (Packer *) memPtr; - ckfree((char *) packPtr); + + ckfree(packPtr); } /* |