This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Drop optimization for -O3 *and higher*
authorH.Merijn Brand <h.m.brand@xs4all.nl>
Fri, 30 Jan 2004 08:18:28 +0000 (08:18 +0000)
committerH.Merijn Brand <h.m.brand@xs4all.nl>
Fri, 30 Jan 2004 08:18:28 +0000 (08:18 +0000)
p4raw-id: //depot/perl@22247

ext/Storable/hints/linux.pl

index 05661af..0c7d5e3 100644 (file)
@@ -8,7 +8,7 @@
 use Config;
 if ($Config{gccversion}) {
     my $optimize = $Config{optimize};
-    if ($optimize =~ s/(^| )-O3( |$)/$1-O2$2/) {
+    if ($optimize =~ s/(^| )-O[3-9]( |$)/$1-O2$2/) {
        $self->{OPTIMIZE} = $optimize;
     }
 }