From: Nicholas Clark <nick@ccl4.org>
Date: Tue, 27 Jan 2004 21:51:27 +0000 (+0000)
Subject: Storable's hints file shouldn't blanket set optimize to -O2 on Linux
X-Git-Tag: accepted/trunk/20130322.191538~22406
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=deade07f0bde6c2aae1e343d2c3d09fab8fcd7ee;p=platform%2Fupstream%2Fperl.git

Storable's hints file shouldn't blanket set optimize to -O2 on Linux
Only *drop* optimize to -O2 if it's -O3 on gcc on Linux

p4raw-id: //depot/perl@22238
---

diff --git a/ext/Storable/hints/linux.pl b/ext/Storable/hints/linux.pl
index ed80f84..05661af 100644
--- a/ext/Storable/hints/linux.pl
+++ b/ext/Storable/hints/linux.pl
@@ -6,5 +6,10 @@
 # 20011002 and 3.3, and in Redhat 7.1 with gcc 3.3.1. The failures
 # happen only for unthreaded builds, threaded builds work okay.
 use Config;
-$self->{OPTIMIZE} = '-O2';
+if ($Config{gccversion}) {
+    my $optimize = $Config{optimize};
+    if ($optimize =~ s/(^| )-O3( |$)/$1-O2$2/) {
+	$self->{OPTIMIZE} = $optimize;
+    }
+}