[svn:parrot] r44449 - branches/rm_cflags/config/auto
coke at svn.parrot.org
coke at svn.parrot.org
Wed Feb 24 06:36:51 UTC 2010
Author: coke
Date: Wed Feb 24 06:36:50 2010
New Revision: 44449
URL: https://trac.parrot.org/parrot/changeset/44449
Log:
Construct the warnings data structure in smaller pieces.
Modified:
branches/rm_cflags/config/auto/warnings.pm
Modified: branches/rm_cflags/config/auto/warnings.pm
==============================================================================
--- branches/rm_cflags/config/auto/warnings.pm Wed Feb 24 06:28:50 2010 (r44448)
+++ branches/rm_cflags/config/auto/warnings.pm Wed Feb 24 06:36:50 2010 (r44449)
@@ -92,6 +92,10 @@
validated => [],
};
+ # begin gcc/g++
+ my $gcc = {};
+ my $gpp = {};
+
my @gcc_or_gpp = qw(
-falign-functions=16
-fvisibility=hidden
@@ -142,11 +146,11 @@
-Wwrite-strings
);
- $data->{'warnings'}{'gcc'}{'basic'} = [ @gcc_or_gpp ];
- $data->{'warnings'}{'g++'}{'basic'} = [ @gcc_or_gpp ];
+ $gcc->{'basic'} = [ @gcc_or_gpp ];
+ $gpp->{'basic'} = [ @gcc_or_gpp ];
# Add some gcc only warnings that would break g++
- push @{$data->{'warnings'}{'gcc'}{'basic'}}, qw(
+ push @{$gcc->{'basic'}}, qw(
-Wbad-function-cast
-Wc++-compat
-Wdeclaration-after-statement
@@ -181,8 +185,13 @@
-Wunused-variable
) ];
- $data->{'warnings'}{'gcc'}{'cage'} = $gcc_or_gpp_cage;
- $data->{'warnings'}{'g++'}{'cage'} = $gcc_or_gpp_cage;
+ $gcc->{'cage'} = $gcc_or_gpp_cage;
+ $gpp->{'cage'} = $gcc_or_gpp_cage;
+
+ $data->{'warnings'}{'gcc'} = $gcc;
+ $data->{'warnings'}{'gpp'} = $gpp;
+
+ ## end gcc/g++
return $data;
}
More information about the parrot-commits
mailing list