diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2018-09-27 21:45:01 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2018-09-27 21:45:01 (GMT) |
| commit | 45d39f04442dea70448b254d80cfbe15d6c488ed (patch) | |
| tree | a9621415ae7e9fd92e92bdbd8316ccbaa002c1fe /generic/tclVar.c | |
| parent | a29938f899c3d13c4c9590d22c6b64769fc2ce77 (diff) | |
| download | tcl-45d39f04442dea70448b254d80cfbe15d6c488ed.zip tcl-45d39f04442dea70448b254d80cfbe15d6c488ed.tar.gz tcl-45d39f04442dea70448b254d80cfbe15d6c488ed.tar.bz2 | |
ckalloc -> Tcl_Alloc
Diffstat (limited to 'generic/tclVar.c')
| -rw-r--r-- | generic/tclVar.c | 4 |
1 files 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); } /* |