From 12ec3d59327166e112cd8e4650cbdf978adbaaf2 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Viktor=20S=C3=B6derqvist?= Date: Wed, 29 Jan 2025 22:29:35 +0100 Subject: [PATCH] Increase timeout for cross-version-replication test (#1644) MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Fixes #1641 Signed-off-by: Viktor Söderqvist --- tests/integration/cross-version-replication.tcl | 2 +- tests/support/util.tcl | 4 ++-- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/tests/integration/cross-version-replication.tcl b/tests/integration/cross-version-replication.tcl index 6ec3d0db80..104e821460 100644 --- a/tests/integration/cross-version-replication.tcl +++ b/tests/integration/cross-version-replication.tcl @@ -18,7 +18,7 @@ start_server {tags {"repl needs:other-server external:skip"} start-other-server start_server {} { test "Start replication from $primary_name_and_version" { r replicaof [srv -1 host] [srv -1 port] - wait_for_sync r + wait_for_sync r 500 100 # The key has been transferred. assert_equal bar [r get foo] assert_equal up [s master_link_status] diff --git a/tests/support/util.tcl b/tests/support/util.tcl index 8f3cda3a4c..5ba1f8ea55 100644 --- a/tests/support/util.tcl +++ b/tests/support/util.tcl @@ -110,8 +110,8 @@ proc waitForBgrewriteaof r { } } -proc wait_for_sync r { - wait_for_condition 50 100 { +proc wait_for_sync {r {maxtries 50} {delay 100}} { + wait_for_condition $maxtries $delay { [status $r master_link_status] eq "up" } else { fail "replica didn't sync in time"