[svn:parrot] r44290 - branches/rm_cflags/config/auto

[coke at svn.parrot.org]

Author: coke
Date: Mon Feb 22 06:22:46 2010
New Revision: 44290
URL: https://trac.parrot.org/parrot/changeset/44290

Log:
move gcc/g++ under 'warnings'

Modified:
   branches/rm_cflags/config/auto/warnings.pm

Modified: branches/rm_cflags/config/auto/warnings.pm
==============================================================================
--- branches/rm_cflags/config/auto/warnings.pm	Mon Feb 22 04:54:53 2010	(r44289)
+++ branches/rm_cflags/config/auto/warnings.pm	Mon Feb 22 06:22:46 2010	(r44290)
@@ -19,7 +19,6 @@
 use strict;
 use warnings;
 
-
 use base qw(Parrot::Configure::Step);
 
 use Parrot::Configure::Utils ();
@@ -91,10 +90,10 @@
         -Wwrite-strings
     ) ];
 
-    $data->{'gcc'}{'potential'} = $gcc_or_gpp;
-    $data->{'g++'}{'potential'} = $gcc_or_gpp;
+    $data->{warnings}{'gcc'}{'potential'} = $gcc_or_gpp;
+    $data->{warnings}{'g++'}{'potential'} = $gcc_or_gpp;
 
-    push @{$data->{'gcc'}{'potential'}}, [qw(
+    push @{$data->{warnings}{'gcc'}{'potential'}}, [qw(
         -Wbad-function-cast
         -Wc++-compat
         -Wdeclaration-after-statement
@@ -130,8 +129,8 @@
         -Wunused-variable
     ) ];
 
-    $data->{'gcc'}{'cage'} = $gcc_or_gpp;
-    $data->{'g++'}{'cage'} = $gcc_or_gpp;
+    $data->{warnings}{'gcc'}{'cage'} = $gcc_or_gpp;
+    $data->{warnings}{'g++'}{'cage'} = $gcc_or_gpp;
 
     return $data;
 }
@@ -154,10 +153,10 @@
         return;
     }
 
-    my @warnings = @{$self->{$compiler}{potential}};
+    my @warnings = @{$self->{warnings}{$compiler}{potential}};
 
     # add on some extra warnings if requested
-    push @warnings, @{$self->{$compiler}{cage}}
+    push @warnings, @{$self->{warnings}{$compiler}{cage}}
         if $conf->options->get('cage');
 
     # now try out our warnings