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

This commit is contained in:
antirez 2014-10-08 10:17:01 +02:00
parent 5b47783d77
commit 908be1dbeb

View File

@ -7,7 +7,9 @@ fconfigure stdin -buffering none
while 1 {
set c [read stdin 1]
if {$c eq {.}} {
if {$c eq {}} {
exit 0; # EOF
} elseif {$c eq {.}} {
puts -nonewline .
flush stdout
}