From 45d39f04442dea70448b254d80cfbe15d6c488ed Mon Sep 17 00:00:00 2001
From: "jan.nijtmans" <nijtmans@users.sourceforge.net>
Date: Thu, 27 Sep 2018 21:45:01 +0000
Subject: ckalloc -> Tcl_Alloc

---
 generic/tclVar.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/generic/tclVar.c b/generic/tclVar.c
index df02ebf..37c739f 100644
--- a/generic/tclVar.c
+++ b/generic/tclVar.c
@@ -6555,7 +6555,7 @@ void
 TclInitArrayVar(
     Var *arrayPtr)
 {
-    ArrayVarHashTable *tablePtr = ckalloc(sizeof(ArrayVarHashTable));
+    ArrayVarHashTable *tablePtr = Tcl_Alloc(sizeof(ArrayVarHashTable));
 
     /*
      * Mark the variable as an array.
@@ -6599,7 +6599,7 @@ DeleteArrayVar(
      */
 
     VarHashDeleteTable(arrayPtr->value.tablePtr);
-    ckfree(tablePtr);
+    Tcl_Free(tablePtr);
 }
 
 /*
-- 
cgit v0.12