stop_write_load $load_handle2
stop_write_load $load_handle3
stop_write_load $load_handle4
- after 1000
+ set retry 10
+ while {$retry && ([$master debug digest] ne [[lindex $slaves 0] debug digest])} {
+ after 1000
+ incr retry -1
+ }
set digest [$master debug digest]
set digest0 [[lindex $slaves 0] debug digest]
set digest1 [[lindex $slaves 1] debug digest]