From 6d7beb6188d7d7314624a05865ba72a78ff3f39c Mon Sep 17 00:00:00 2001 From: dkf Date: Fri, 17 Jan 2014 09:43:01 +0000 Subject: remove some dead code --- generic/tclIO.c | 17 ----------------- 1 file changed, 17 deletions(-) diff --git a/generic/tclIO.c b/generic/tclIO.c index 8e0534d..547359b 100644 --- a/generic/tclIO.c +++ b/generic/tclIO.c @@ -6023,25 +6023,8 @@ ReadBytes( toRead = srcLen; } -#if 0 - dst = (char *) Tcl_GetByteArrayFromObj(objPtr, &length); - if (toRead > length - offset - 1) { - /* - * Double the existing size of the object or make enough room to hold - * all the characters we may get from the source buffer, whichever is - * larger. - */ - - length = offset * 2; - if (offset < toRead) { - length = offset + toRead + 1; - } - dst = (char *) Tcl_SetByteArrayLength(objPtr, length); - } -#else TclAppendBytesToByteArray(objPtr, NULL, toRead); dst = (char *) Tcl_GetByteArrayFromObj(objPtr, &length); -#endif dst += offset; if (GotFlag(statePtr, INPUT_NEED_NL)) { -- cgit v0.12