diff options
Diffstat (limited to 'generic/tclIO.c')
-rw-r--r-- | generic/tclIO.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tclIO.c b/generic/tclIO.c index 3dd13f6..7303314 100644 --- a/generic/tclIO.c +++ b/generic/tclIO.c @@ -4012,7 +4012,7 @@ Tcl_Write( return TCL_IO_FAILURE; } - if (srcLen == TCL_AUTO_LENGTH) { + if (srcLen == TCL_INDEX_NONE) { srcLen = strlen(src); } if (WriteBytes(chanPtr, src, srcLen) == -1) { @@ -4062,7 +4062,7 @@ Tcl_WriteRaw( return TCL_IO_FAILURE; } - if (srcLen == TCL_AUTO_LENGTH) { + if (srcLen == TCL_INDEX_NONE) { srcLen = strlen(src); } @@ -4121,7 +4121,7 @@ Tcl_WriteChars( chanPtr = statePtr->topChanPtr; - if (len == TCL_AUTO_LENGTH) { + if (len == TCL_INDEX_NONE) { len = strlen(src); } if (statePtr->encoding) { @@ -9633,7 +9633,7 @@ CopyData( * unsuitable for updating totals and toRead. */ - if (sizeb == TCL_AUTO_LENGTH) { + if (sizeb == TCL_INDEX_NONE) { writeError: if (interp) { TclNewObj(errObj); |