diff options
| author | mig <mig> | 2013-01-02 19:20:54 (GMT) |
|---|---|---|
| committer | mig <mig> | 2013-01-02 19:20:54 (GMT) |
| commit | d8f0e91c57caab6e617a23e90621d54cc11e4715 (patch) | |
| tree | fce2e7f6a0843a73a95f96fbe00535b4b175f833 /generic/tclIORTrans.c | |
| parent | 6ba39bbeaa4ebd171089b1943b9521ae7570e249 (diff) | |
| download | tcl-d8f0e91c57caab6e617a23e90621d54cc11e4715.zip tcl-d8f0e91c57caab6e617a23e90621d54cc11e4715.tar.gz tcl-d8f0e91c57caab6e617a23e90621d54cc11e4715.tar.bz2 | |
remove stray calls to Tcl_Alloc and friends: the core should only use ckalloc to allow MEM_DEBUG to work properly
Diffstat (limited to 'generic/tclIORTrans.c')
| -rw-r--r-- | generic/tclIORTrans.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclIORTrans.c b/generic/tclIORTrans.c index 2b9efb9..1de635f 100644 --- a/generic/tclIORTrans.c +++ b/generic/tclIORTrans.c @@ -2942,7 +2942,7 @@ ResultClear( return; } - Tcl_Free((char *) rPtr->buf); + ckfree((char *) rPtr->buf); rPtr->buf = NULL; rPtr->allocated = 0; } @@ -2977,10 +2977,10 @@ ResultAdd( if (rPtr->allocated == 0) { rPtr->allocated = toWrite + RB_INCREMENT; - rPtr->buf = UCHARP(Tcl_Alloc(rPtr->allocated)); + rPtr->buf = UCHARP(ckalloc(rPtr->allocated)); } else { rPtr->allocated += toWrite + RB_INCREMENT; - rPtr->buf = UCHARP(Tcl_Realloc((char *) rPtr->buf, + rPtr->buf = UCHARP(ckrealloc((char *) rPtr->buf, rPtr->allocated)); } } |