cvsuser 01/12/31 07:32:51
Modified: . Configure.pl
Log:
Made GCC ever so much pickier.
Switch list courtesy of Jarkko.
Revision Changes Path
1.50 +4 -7 parrot/Configure.pl
Index: Configure.pl
===================================================================
RCS file: /home/perlcvs/parrot/Configure.pl,v
retrieving revision 1.49
retrieving revision 1.50
diff -u -w -r1.49 -r1.50
--- Configure.pl 31 Dec 2001 06:48:49 -0000 1.49
+++ Configure.pl 31 Dec 2001 15:32:51 -0000 1.50
@@ -2,7 +2,7 @@
#
# Configure.pl
#
-# $Id: Configure.pl,v 1.49 2001/12/31 06:48:49 dan Exp $
+# $Id: Configure.pl,v 1.50 2001/12/31 15:32:51 dan Exp $
#
# Author: Brent Dax
#
@@ -30,7 +30,7 @@
# Handle options:
#
-my($opt_debugging, $opt_defaults, $opt_version, $opt_help, $opt_pedantic) = (0, 0,
0, 0, 0);
+my($opt_debugging, $opt_defaults, $opt_version, $opt_help) = (0, 0, 0, 0);
my(%opt_defines);
my $result = GetOptions(
'debugging!' => \$opt_debugging,
@@ -38,12 +38,11 @@
'version' => \$opt_version,
'help' => \$opt_help,
'define=s' => \%opt_defines,
- 'pedantic!' => \$opt_pedantic,
);
if($opt_version) {
print "Parrot Version $parrot_version Configure\n";
- print '$Id: Configure.pl,v 1.49 2001/12/31 06:48:49 dan Exp $' . "\n";
+ print '$Id: Configure.pl,v 1.50 2001/12/31 15:32:51 dan Exp $' . "\n";
exit;
}
@@ -52,7 +51,6 @@
$0 - Parrot Configure
Options:
--debugging Enable debugging
- --pedantic Add "-ansi -pedantic" if using gcc
--defaults Accept all default values
--define name=value Defines value name as value
--help This text
@@ -183,8 +181,7 @@
# If using gcc, crank up its warnings as much as possible and make it behave
# ansi-ish.
if ($Config{ccname} eq "gcc") {
- $c{cc_warn} = " -Wall";
- $c{cc_warn} .= " -ansi -pedantic" if $opt_pedantic;
+ $c{cc_warn} = " -Wall -ansi -pedantic -Wtraditional -Wstrict-prototypes
-Wmissing-prototypes -Winline -Wredundant-decls -Wall -Wshadow -Wpointer-arith
-Wcast-qual -Wcast-align -Wwrite-strings -Wconversion -Waggregate-return -Winline";
}
# Add the -DHAS_JIT if we're jitcapable
