view release on metacpan or  search on metacpan

lib/App/grindperl.pm  view on Meta::CPAN

234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
my $jobs = $self->opt->get_jobs;
 
if ( $test_jobs ) {
  $ENV{TEST_JOBS} = $test_jobs if $test_jobs > 1;
 
  if ( $self->opt->get_porting ) {
    $self->vlog("Running 'make test_porting' with $test_jobs jobs");
    $self->do_cmd("make -j $jobs test_porting")
      or croak ("make test_porting failed");
  }
  elsif ( grep { /test_harness/ } do { local(@ARGV,$/) = "Makefile"; <>} ) {
    $self->vlog("Running 'make test_harness' with $test_jobs jobs");
    $self->do_cmd("make -j $jobs test_harness")
        or croak ("make test_harness failed");
  }
  else {
    $self->vlog("Running 'make test' with $test_jobs jobs");
    $self->do_cmd("make -j $jobs test")
        or croak ("make test failed");
  }
}