Possible fix for false positives in issue 141 regression test

rgl · Jan 12, 2012 · 8b8261e · 8b8261e
1 parent fbfe656
commit 8b8261e
Showing 1 changed file with 5 additions and 1 deletion.
diff --git a/tests/integration/replication.tcl b/tests/integration/replication.tcl
@@ -115,7 +115,11 @@ start_server {tags {"repl"}} {
                     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]