die if @ARGV != 2;
our ($test, $src_dir) = @ARGV;
+my ($msg_file) = tempfile ();
+select ($msg_file);
+
our (@prereq_tests) = ();
if ($test =~ /^(.*)-persistence$/) {
push (@prereq_tests, $1);
fail "Prerequisite test $prereq_test failed.\n" if $result[0] ne 'PASS';
}
-my ($msg_file) = tempfile ();
-select ($msg_file);
\f
# Generic testing.