warning fix

diff --git a/tests/runtests.pl b/tests/runtests.pl
index 227e66d8afd1230c1043ade38d3fe5b9d9f3e4de..7d10ef4fcd708e9c555f2d81803eeacf17cd0f00 100755 (executable)
--- a/tests/runtests.pl
+++ b/tests/runtests.pl
@@ -543,7 +543,7 @@ sub torture {
 
         logmsg "*** Alloc number $limit is now set to fail ***\n" if($gdbthis);
 
-        my $ret;
+        my $ret = 0;
         if($gdbthis) {
             runclient($gdbline)
         }