-sub run {
- my $this = shift();
- die "can't run the base-class test";
-}
-
-### Could include loop detection
-sub run_tests {
- my $this = shift();
- my @tname = @_;
-
- my $res = 0;
- foreach my $tname (@tname) {
- my $sub = $this->irspy()->_run_test($tname);
- $res = $sub if $sub > $res;
- }
-
- return $res;