Patrick Williams | f1e5d69 | 2016-03-30 15:21:19 -0500 | [diff] [blame^] | 1 | Upstream-Status:Inappropriate [embedded specific] |
| 2 | |
| 3 | The upstream code assumes that the compiler version used to compiler miniperl/perl-native |
| 4 | is the same as the one being used to build the perl binary. Since most people are not running |
| 5 | systems with gcc 5, it is unlikely that it will work on any supported host. Switch out gccversion |
| 6 | for 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'; |