[svn:parrot] r49461 - branches/tt1810_missing_step_tests/lib/Parrot/Configure/Options

[jkeenan at svn.parrot.org]

Author: jkeenan
Date: Wed Oct  6 02:08:21 2010
New Revision: 49461
URL: https://trac.parrot.org/parrot/changeset/49461

Log:
Call get_steps_missing_tests() before postconfiguration tests.

Modified:
   branches/tt1810_missing_step_tests/lib/Parrot/Configure/Options/Test.pm

Modified: branches/tt1810_missing_step_tests/lib/Parrot/Configure/Options/Test.pm
==============================================================================
--- branches/tt1810_missing_step_tests/lib/Parrot/Configure/Options/Test.pm	Wed Oct  6 01:43:03 2010	(r49460)
+++ branches/tt1810_missing_step_tests/lib/Parrot/Configure/Options/Test.pm	Wed Oct  6 02:08:21 2010	(r49461)
@@ -7,6 +7,7 @@
 use Test::Harness;
 use lib qw(lib);
 use Parrot::Configure::Step::List qw( get_steps_list );
+use Parrot::Configure::Options::Test::Prepare qw( get_steps_missing_tests );
 
 sub new {
     my ( $class, $argsref ) = @_;
@@ -107,6 +108,11 @@
     if ( $self->get_run('run_build_tests') ) {
         print "\n\n";
         print "As you requested, I will now run some tests of the build tools.\n\n";
+        my @steps_missing_tests = get_steps_missing_tests();
+        if (@steps_missing_tests) {
+            print "The following configuration steps lack corresponding tests:\n";
+            print "  $_\n" for @steps_missing_tests;
+        }
         runtests(@postconfiguration_tests) or die
             "Post-configuration and build tools tests did not complete successfully; running 'make' might be dubious.";
     }