diff options
| author | dgp@users.sourceforge.net <dgp> | 2014-07-10 12:59:24 (GMT) |
|---|---|---|
| committer | dgp@users.sourceforge.net <dgp> | 2014-07-10 12:59:24 (GMT) |
| commit | d824f372ff798bed3f7f55e5a3aad98156e14dae (patch) | |
| tree | 8177e43d015697994d7ba22593e8cfbac1b00477 | |
| parent | 9bfd192718049ca70d077e748afe16739a72441e (diff) | |
| parent | 75974073298e812f01ec9565a4c0c1d3167fcba2 (diff) | |
| download | tcl-d824f372ff798bed3f7f55e5a3aad98156e14dae.zip tcl-d824f372ff798bed3f7f55e5a3aad98156e14dae.tar.gz tcl-d824f372ff798bed3f7f55e5a3aad98156e14dae.tar.bz2 | |
Repair buffer indexing error in Tcl_ReadRaw().
| -rw-r--r-- | generic/tclIO.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclIO.c b/generic/tclIO.c index 5cdf2c3..d7ed3ac 100644 --- a/generic/tclIO.c +++ b/generic/tclIO.c @@ -5445,7 +5445,7 @@ Tcl_ReadRaw( if (bytesToRead > 0) { - int nread = ChanRead(chanPtr, readBuf+copied, bytesToRead); + int nread = ChanRead(chanPtr, readBuf, bytesToRead); if (nread > 0) { /* Successful read (short is OK) - add to bytes copied */ |