diff options
author | dgp <dgp@users.sourceforge.net> | 2014-01-30 19:13:28 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2014-01-30 19:13:28 (GMT) |
commit | c00d7aa9b969d0589dffe5a2a14e6b339d8084c0 (patch) | |
tree | c8640b0b72fabd3ef681766255d54b3616a4d6c5 /generic | |
parent | 050c8a639fb8fb89e5febcb7564310ee16de2461 (diff) | |
download | tcl-c00d7aa9b969d0589dffe5a2a14e6b339d8084c0.zip tcl-c00d7aa9b969d0589dffe5a2a14e6b339d8084c0.tar.gz tcl-c00d7aa9b969d0589dffe5a2a14e6b339d8084c0.tar.bz2 |
Trial: Implement DoWrite() as WriteBytes().
Diffstat (limited to 'generic')
-rw-r--r-- | generic/tclIO.c | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/generic/tclIO.c b/generic/tclIO.c index dd9f1dc..1434d88 100644 --- a/generic/tclIO.c +++ b/generic/tclIO.c @@ -9213,6 +9213,9 @@ DoWrite( const char *src, /* Data to write. */ int srcLen) /* Number of bytes to write. */ { +#if 1 + return WriteBytes(chanPtr, src, srcLen); +#else ChannelState *statePtr = chanPtr->state; /* State info for channel */ ChannelBuffer *outBufPtr; /* Current output buffer. */ @@ -9340,6 +9343,7 @@ DoWrite( } /* Closes "while" */ return totalDestCopied; +#endif } /* |