Revision 29642

Date:
2008/07/21 02:30:47
Author:
jkeenan
Revision Log:
Correct syntax error.
Files:

Legend:

 
Added
 
Removed
 
Modified

  • branches/parallel/t/steps/gen_core_pmcs-01.t

     
    15 15 use Parrot::Configure::Options qw( process_options );
    16 16 use Parrot::Configure::Test qw(
    17 17 test_step_thru_runstep
    18 test_step_constructor_and_description
    18 19 );
    19 20
    20 21 my $args = process_options(
    … …  
    31 32 $conf->add_steps($pkg);
    32 33 $conf->options->set( %{$args} );
    33 34 my $step = test_step_constructor_and_description($conf);
    34 ok( scalar( split( / /, $conf->data->get('pmc_names') ) ),
    35 my @pmc_names = split( / /, $conf->data->get('pmc_names') );
    36 ok( scalar( @pmc_names ),
    35 37 "Got nonzero number of pmc names, which is prerequisite for gen:core_pmcs");
    36 38
    37 39 pass("Completed all tests in $0");