Commit 908be1db authored by antirez's avatar antirez
Browse files

Cluster test: helpers/onlydots.tcl: detect EOF and exit.

parent 5b47783d
...@@ -7,7 +7,9 @@ fconfigure stdin -buffering none ...@@ -7,7 +7,9 @@ fconfigure stdin -buffering none
while 1 { while 1 {
set c [read stdin 1] set c [read stdin 1]
if {$c eq {.}} { if {$c eq {}} {
exit 0; # EOF
} elseif {$c eq {.}} {
puts -nonewline . puts -nonewline .
flush stdout flush stdout
} }
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment