[svn:parrot] r47223 - branches/tt1452_configure_debug/config/auto/cpu/ppc

[jkeenan at svn.parrot.org]

Author: jkeenan
Date: Mon May 31 13:56:57 2010
New Revision: 47223
URL: https://trac.parrot.org/parrot/changeset/47223

Log:
Continue to adapt config steps to new approach to verbose/debugging output.

Modified:
   branches/tt1452_configure_debug/config/auto/cpu/ppc/auto.pm

Modified: branches/tt1452_configure_debug/config/auto/cpu/ppc/auto.pm
==============================================================================
--- branches/tt1452_configure_debug/config/auto/cpu/ppc/auto.pm	Mon May 31 13:56:20 2010	(r47222)
+++ branches/tt1452_configure_debug/config/auto/cpu/ppc/auto.pm	Mon May 31 13:56:57 2010	(r47223)
@@ -19,17 +19,15 @@
 sub runstep {
     my ( $self, $conf ) = @_;
 
-    my $verbose = $conf->options->get('verbose');
-
     my @files = qw( test_gcc_cmpset_c.in );
     for my $f (@files) {
-        print " $f " if $verbose;
+        $conf->debug(" $f ");
         my ($suffix) = $f =~ /test_(\w+)/;
         $f = "config/auto/cpu/ppc/$f";
         $conf->cc_gen($f);
         eval { $conf->cc_build("-DPARROT_CONFIG_TEST") };
         if ($@) {
-            print " $@ " if $verbose;
+            $conf->debug(" $@ ");
         }
         else {
             if ( $conf->cc_run() =~ /ok/ ) {
@@ -37,7 +35,7 @@
                     "ppc_has_$suffix" => '1',
                     "HAS_PPC_$suffix" => '1',
                 );
-                print " (\U$suffix) " if ($verbose);
+                $conf->debug(" (\U$suffix) ");
                 $conf->data->add( ' ', TEMP_generated => $f );
             }
         }