6 while ($_ = $ARGV[0]) {
8 if (/^-/ || /^[A-Z_]+=/) {
15 if ($#Range_args != 1) {
16 print STDERR "usage: dotest [make-args] from-test to-test\n";
19 $test = $Range_args[0];
20 $last_test = $Range_args[1];
21 if ($test gt $last_test) {
22 print STDERR "_from_ test $test _to_ test $last_test?\n";
24 while ($test le $last_test) {
25 system("make @Make_args runtest_$test");
26 $test++; # string incr