PSYNC test reliability improvements (test only issue)

Former-commit-id: 50fd4fa7e62f3996f15f6a8c4dcd892022f111ec
This commit is contained in:
John Sully 2020-06-01 16:01:26 -04:00
parent 4f7102f46c
commit 2b08505fed

View File

@ -25,10 +25,12 @@ proc show_cluster_status {} {
array set log {}
for {set j 0} {$j < 5} {incr j} {
set fd [open $R_log($j)]
while {[gets $fd l] >= 0} {
set found 0
while {[gets $fd l] >= 0 || !$found} {
if {[regexp $log_regexp $l] &&
[regexp -nocase $repl_regexp $l]} {
lappend log($j) $l
set found 1
}
}
close $fd