Line
Link Here
|
0 |
-- 1/ext/Errno/Errno_pm.PL |
0 |
++ 2/ext/Errno/Errno_pm.PL |
Lines 225-244
Link Here
|
225 |
{ # BeOS (support now removed) did not enter this block |
225 |
{ # BeOS (support now removed) did not enter this block |
226 |
# invoke CPP and read the output |
226 |
# invoke CPP and read the output |
227 |
|
227 |
|
|
|
228 |
my $inhibit_linemarkers = ''; |
229 |
if ($Config{gccversion} =~ /\A(\d+)\./ and $1 >= 5) { |
230 |
# GCC 5.0 interleaves expanded macros with line numbers breaking |
231 |
# each line into multiple lines. RT#123784 |
232 |
$inhibit_linemarkers = ' -P'; |
233 |
} |
234 |
|
228 |
if ($^O eq 'VMS') { |
235 |
if ($^O eq 'VMS') { |
229 |
my $cpp = "$Config{cppstdin} $Config{cppflags} $Config{cppminus}"; |
236 |
my $cpp = "$Config{cppstdin} $Config{cppflags}" . |
|
|
237 |
$inhibit_linemarkers . " $Config{cppminus}"; |
230 |
$cpp =~ s/sys\$input//i; |
238 |
$cpp =~ s/sys\$input//i; |
231 |
open(CPPO,"$cpp errno.c |") or |
239 |
open(CPPO,"$cpp errno.c |") or |
232 |
die "Cannot exec $Config{cppstdin}"; |
240 |
die "Cannot exec $Config{cppstdin}"; |
233 |
} elsif ($IsMSWin32 || $^O eq 'NetWare') { |
241 |
} elsif ($IsMSWin32 || $^O eq 'NetWare') { |
234 |
open(CPPO,"$Config{cpprun} $Config{cppflags} errno.c |") or |
242 |
my $cpp = "$Config{cpprun} $Config{cppflags}" . |
235 |
die "Cannot run '$Config{cpprun} $Config{cppflags} errno.c'"; |
243 |
$inhibit_linemarkers; |
|
|
244 |
open(CPPO,"$cpp errno.c |") or |
245 |
die "Cannot run '$cpp errno.c'"; |
236 |
} elsif ($IsSymbian) { |
246 |
} elsif ($IsSymbian) { |
237 |
my $cpp = "gcc -E -I$ENV{SDK}\\epoc32\\include\\libc -"; |
247 |
my $cpp = "gcc -E -I$ENV{SDK}\\epoc32\\include\\libc" . |
|
|
248 |
$inhibit_linemarkers ." -"; |
238 |
open(CPPO,"$cpp < errno.c |") |
249 |
open(CPPO,"$cpp < errno.c |") |
239 |
or die "Cannot exec $cpp"; |
250 |
or die "Cannot exec $cpp"; |
240 |
} else { |
251 |
} else { |
241 |
my $cpp = default_cpp(); |
252 |
my $cpp = default_cpp() . $inhibit_linemarkers; |
242 |
open(CPPO,"$cpp < errno.c |") |
253 |
open(CPPO,"$cpp < errno.c |") |
243 |
or die "Cannot exec $cpp"; |
254 |
or die "Cannot exec $cpp"; |
244 |
} |
255 |
} |