Sequence numbers are a single digit, so when it hits 10, wrap

around to 0.

diff --git a/t/SIPtest.pm b/t/SIPtest.pm
index 61c142e..de7e040 100644 (file)
--- a/t/SIPtest.pm
+++ b/t/SIPtest.pm
@@ -174,6 +174,7 @@ sub run_sip_tests {
 
     foreach my $test (@_) {
        one_msg($sock, $test, $seqno++);
+       $seqno %= 10;           # sequence number is one digit
     }
 }