blob: efbc55df2949f66ad258f1b40633d9760c577723 [file] [log] [blame]
Patrick Williamsf1e5d692016-03-30 15:21:19 -05001Upstream-Status:Inappropriate [embedded specific]
2
3The upstream code assumes that the compiler version used to compiler miniperl/perl-native
4is the same as the one being used to build the perl binary. Since most people are not running
5systems with gcc 5, it is unlikely that it will work on any supported host. Switch out gccversion
6for the version extracted from $CC --version.
7
8--- perl-5.22.0/ext/Errno/Errno_pm.PL 2015-10-19 18:01:20.622143786 -0400
9+++ perl-5.22.0-fixed/ext/Errno/Errno_pm.PL 2015-10-19 17:50:35.662137367 -0400
10@@ -224,9 +224,12 @@
11
12 { # BeOS (support now removed) did not enter this block
13 # invoke CPP and read the output
14+ my $compiler = $ENV{'CC'};
15+ my $compiler_out = `$compiler --version`;
16+ my @compiler_version = split / /,$compiler_out;
17
18 my $inhibit_linemarkers = '';
19- if ($Config{gccversion} =~ /\A(\d+)\./ and $1 >= 5) {
20+ if (@compiler_version[2] =~ /\A(\d+)\./ and $1 >= 5) {
21 # GCC 5.0 interleaves expanded macros with line numbers breaking
22 # each line into multiple lines. RT#123784
23 $inhibit_linemarkers = ' -P';