From: Peter Iannucci <iannucci@mit.edu>
Date: Wed, 2 Oct 2013 01:42:40 +0000 (-0400)
Subject: Partially fixed a bug in the test suite that led to test runs randomly failing.
X-Git-Url: http://xvm.mit.edu/gitweb/invirt/third/libt4.git/commitdiff_plain/5bb7eb131773abd9e642f83629528b4c4e706b2e?ds=sidebyside

Partially fixed a bug in the test suite that led to test runs randomly failing.
---

diff --git a/rsm_tester.pl b/rsm_tester.pl
index c99c66f..3d94744 100755
--- a/rsm_tester.pl
+++ b/rsm_tester.pl
@@ -67,7 +67,7 @@ sub randports {
   my $num = shift;
   my @p = ();
   for( my $i = 0; $i < $num; $i++ ) {
-    push( @p, int(rand(54000))+10000 );
+    push( @p, int(rand(54000/2))*2+10000 );
   }
   my @sp = sort { $a <=> $b } @p;
   return @sp;