summaryrefslogtreecommitdiffstats
path: root/tests-perf
diff options
context:
space:
mode:
authorsebres <sebres@users.sourceforge.net>2024-01-29 11:06:36 (GMT)
committersebres <sebres@users.sourceforge.net>2024-01-29 11:06:36 (GMT)
commita44233ae3e64c20186cbd154e1873bc7f8448497 (patch)
treeeb31c61fe934bd09936517e851afe452ba856c97 /tests-perf
parent0908f2ec1d8a680a41f811cc6181c4a719bd6fa7 (diff)
downloadtcl-a44233ae3e64c20186cbd154e1873bc7f8448497.zip
tcl-a44233ae3e64c20186cbd154e1873bc7f8448497.tar.gz
tcl-a44233ae3e64c20186cbd154e1873bc7f8448497.tar.bz2
don't flush to use full buffer (otherwise the chunks were 4K anyway)
Diffstat (limited to 'tests-perf')
-rw-r--r--tests-perf/chan.perf.tcl2
1 files changed, 1 insertions, 1 deletions
diff --git a/tests-perf/chan.perf.tcl b/tests-perf/chan.perf.tcl
index b3bd1c4..2ef87cb 100644
--- a/tests-perf/chan.perf.tcl
+++ b/tests-perf/chan.perf.tcl
@@ -38,7 +38,7 @@ proc _get_test_chan {{bufSize 4096}} {
set i 0; while {$i < int((10*1e6 + 10*2e6 + 10*10e6 + 1*20e6)/4e3)} {
#puts -nonewline stdout $i\t
puts stdout $buf
- flush stdout
+ #flush stdout; # don't flush to use full buffer
incr i
}
} &