Just run test 3 times.

This commit is contained in:
Daniel Nichter
2013-08-10 19:17:21 -07:00
parent 299a61417a
commit 2b747d7ee3
2 changed files with 3 additions and 3 deletions

View File

@@ -134,7 +134,7 @@ fi
EXIT_STATUS=0 EXIT_STATUS=0
TEST_CMD="${TEST_CMD:-"prove -r t/"}" TEST_CMD="${TEST_CMD:-"prove -r t/"}"
for n in 1 2 3 4 5 5 5 5 5 5 5 5 5 5; do (eval $TEST_CMD); done for x in 1 2 3; do (eval $TEST_CMD); done
EXIT_STATUS=$(($? | 0)) EXIT_STATUS=$(($? | 0))

View File

@@ -139,10 +139,10 @@ SKIP: {
skip 'No /proc', 1 unless -d '/proc'; skip 'No /proc', 1 unless -d '/proc';
skip 'No fd in /proc', 1 unless -l "/proc/$PID/0" || -l "/proc/$PID/fd/0"; skip 'No fd in /proc', 1 unless -l "/proc/$PID/0" || -l "/proc/$PID/fd/0";
system("$cmd 5 --daemonize --pid $pid_file --log $log_file"); system("$cmd 15 --daemonize --pid $pid_file --log $log_file");
PerconaTest::wait_for_files($pid_file) PerconaTest::wait_for_files($pid_file)
or die "$cmd did not create $pid_file"; or die "$cmd did not create $pid_file";
my $pid = PerconaTest::get_cmd_pid("$cmd 5") my $pid = PerconaTest::get_cmd_pid("$cmd 15")
or die "Cannot get PID of $cmd 5"; or die "Cannot get PID of $cmd 5";
my $proc_fd_0 = -l "/proc/$pid/0" ? "/proc/$pid/0" my $proc_fd_0 = -l "/proc/$pid/0" ? "/proc/$pid/0"
: -l "/proc/$pid/fd/0" ? "/proc/$pid/fd/0" : -l "/proc/$pid/fd/0" ? "/proc/$pid/fd/0"