diff --git a/tests/test_helper.tcl b/tests/test_helper.tcl
index 8c6a3b81..a025b994 100644
--- a/tests/test_helper.tcl
+++ b/tests/test_helper.tcl
@@ -475,7 +475,6 @@ for {set j 0} {$j < [llength $argv]} {incr j} {
         set ::dont_clean 1
     } elseif {$opt eq {--wait-server}} {
         set ::wait_server 1
-        incr j
     } elseif {$opt eq {--timeout}} {
         set ::timeout $arg
         incr j