diff options
| author | donal.k.fellows@manchester.ac.uk <dkf> | 2013-01-03 10:25:23 (GMT) |
|---|---|---|
| committer | donal.k.fellows@manchester.ac.uk <dkf> | 2013-01-03 10:25:23 (GMT) |
| commit | ec27f9439e22b89d891eda22d06f2840aafbcb10 (patch) | |
| tree | e893b3dd616ac686c87b773ce210095f78318130 /generic/tclIORTrans.c | |
| parent | 81f9141f0be640d86a991914755b474081acb29e (diff) | |
| parent | b6124c913d28171d5279f062301293f817e01875 (diff) | |
| download | tcl-ec27f9439e22b89d891eda22d06f2840aafbcb10.zip tcl-ec27f9439e22b89d891eda22d06f2840aafbcb10.tar.gz tcl-ec27f9439e22b89d891eda22d06f2840aafbcb10.tar.bz2 | |
merge trunk
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)); } } |