diff --git a/tests/sentinel.tcl b/tests/sentinel.tcl
index b15bce65634cd5cd057ff5a3e9ebcb7ae73bf24a..80f9f90b0abf6ea61cc19cfd133e2bf03535e2cf 100644
--- a/tests/sentinel.tcl
+++ b/tests/sentinel.tcl
@@ -212,6 +212,8 @@ proc foreach_instance_id {instances idvar code} {
         set errcode [catch {uplevel 1 $code} result]
         if {$errcode == 1} {
             error $result $::errorInfo $::errorCode
+        } elseif {$errcode == 4} {
+            continue
         } elseif {$errcode != 0} {
             return -code $errcode $result
         }