From 1ab87b68045ba6b3538301fd0d976bf4fbdd5d46 Mon Sep 17 00:00:00 2001 From: "jan.nijtmans" Date: Tue, 30 Jul 2019 13:26:07 +0000 Subject: Two times Tcl_Free() -> ckfree() --- generic/ttk/ttkTreeview.c | 2 +- unix/tkUnixWm.c | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/generic/ttk/ttkTreeview.c b/generic/ttk/ttkTreeview.c index b1739b6..cda98a0 100644 --- a/generic/ttk/ttkTreeview.c +++ b/generic/ttk/ttkTreeview.c @@ -1066,7 +1066,7 @@ static void TreeviewCleanup(void *recordPtr) TreeviewFreeColumns(tv); if (tv->tree.displayColumns) - Tcl_Free((ClientData)tv->tree.displayColumns); + ckfree((ClientData)tv->tree.displayColumns); foreachHashEntry(&tv->tree.items, FreeItemCB); Tcl_DeleteHashTable(&tv->tree.items); diff --git a/unix/tkUnixWm.c b/unix/tkUnixWm.c index 9ed9082..7b69713 100644 --- a/unix/tkUnixWm.c +++ b/unix/tkUnixWm.c @@ -2444,7 +2444,7 @@ WmIconphotoCmd( for (i = 3 + isDefault; i < objc; i++) { photo = Tk_FindPhoto(interp, Tcl_GetString(objv[i])); if (photo == NULL) { - Tcl_Free((char *) iconPropertyData); + ckfree((char *) iconPropertyData); return TCL_ERROR; } Tk_PhotoGetSize(photo, &width, &height); -- cgit v0.12