summaryrefslogtreecommitdiffstats
path: root/generic/tclIO.c
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2014-07-10 12:59:24 (GMT)
committerdgp <dgp@users.sourceforge.net>2014-07-10 12:59:24 (GMT)
commitd2e0b26a11a2c8f5bc8c9282811df46306cb03ca (patch)
tree8177e43d015697994d7ba22593e8cfbac1b00477 /generic/tclIO.c
parent83ae4550f1932eba49b33dcf1e661e6559d17248 (diff)
parent2ebc99f24c5036009ba72a25e29a6daf38f6e225 (diff)
downloadtcl-d2e0b26a11a2c8f5bc8c9282811df46306cb03ca.zip
tcl-d2e0b26a11a2c8f5bc8c9282811df46306cb03ca.tar.gz
tcl-d2e0b26a11a2c8f5bc8c9282811df46306cb03ca.tar.bz2
Repair buffer indexing error in Tcl_ReadRaw().
Diffstat (limited to 'generic/tclIO.c')
-rw-r--r--generic/tclIO.c2
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 */