5.22.1 -> 5.22.2
This commit is contained in:
parent
30e529b285
commit
cf4cc6db40
19 changed files with 534 additions and 42 deletions
|
@ -1,3 +1,44 @@
|
||||||
|
diff --git a/ext/Errno/Errno_pm.PL b/ext/Errno/Errno_pm.PL
|
||||||
|
index 6f20c5e..684f369 100644
|
||||||
|
--- a/ext/Errno/Errno_pm.PL
|
||||||
|
+++ b/ext/Errno/Errno_pm.PL
|
||||||
|
@@ -253,20 +253,31 @@ sub write_errno_pm {
|
||||||
|
unless ($^O eq 'MacOS' || $^O eq 'beos') { # trust what we have / get later
|
||||||
|
# invoke CPP and read the output
|
||||||
|
|
||||||
|
+ my $inhibit_linemarkers = '';
|
||||||
|
+ if ($Config{gccversion} =~ /\A(\d+)\./ and $1 >= 5) {
|
||||||
|
+ # GCC 5.0 interleaves expanded macros with line numbers breaking
|
||||||
|
+ # each line into multiple lines. RT#123784
|
||||||
|
+ $inhibit_linemarkers = ' -P';
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
if ($^O eq 'VMS') {
|
||||||
|
- my $cpp = "$Config{cppstdin} $Config{cppflags} $Config{cppminus}";
|
||||||
|
+ my $cpp = "$Config{cppstdin} $Config{cppflags}" .
|
||||||
|
+ $inhibit_linemarkers . " $Config{cppminus}";
|
||||||
|
$cpp =~ s/sys\$input//i;
|
||||||
|
open(CPPO,"$cpp errno.c |") or
|
||||||
|
die "Cannot exec $Config{cppstdin}";
|
||||||
|
} elsif ($IsMSWin32 || $^O eq 'NetWare') {
|
||||||
|
- open(CPPO,"$Config{cpprun} $Config{cppflags} errno.c |") or
|
||||||
|
- die "Cannot run '$Config{cpprun} $Config{cppflags} errno.c'";
|
||||||
|
+ my $cpp = "$Config{cpprun} $Config{cppflags}" .
|
||||||
|
+ $inhibit_linemarkers;
|
||||||
|
+ open(CPPO,"$cpp errno.c |") or
|
||||||
|
+ die "Cannot run '$cpp errno.c'";
|
||||||
|
} elsif ($IsSymbian) {
|
||||||
|
- my $cpp = "gcc -E -I$ENV{SDK}\\epoc32\\include\\libc -";
|
||||||
|
+ my $cpp = "gcc -E -I$ENV{SDK}\\epoc32\\include\\libc" .
|
||||||
|
+ $inhibit_linemarkers ." -";
|
||||||
|
open(CPPO,"$cpp < errno.c |")
|
||||||
|
or die "Cannot exec $cpp";
|
||||||
|
} else {
|
||||||
|
- my $cpp = default_cpp();
|
||||||
|
+ my $cpp = default_cpp() . $inhibit_linemarkers;
|
||||||
|
open(CPPO,"$cpp < errno.c |")
|
||||||
|
or die "Cannot exec $cpp";
|
||||||
|
}
|
||||||
diff --git a/hints/linux.sh b/hints/linux.sh
|
diff --git a/hints/linux.sh b/hints/linux.sh
|
||||||
index ac264c3..fb5a46e 100644
|
index ac264c3..fb5a46e 100644
|
||||||
--- a/hints/linux.sh
|
--- a/hints/linux.sh
|
||||||
|
@ -347,14 +388,14 @@ index 030db74..0d15a40 100644
|
||||||
}
|
}
|
||||||
|
|
||||||
diff --git a/patchlevel.h b/patchlevel.h
|
diff --git a/patchlevel.h b/patchlevel.h
|
||||||
index 82f11ed..9d98556 100644
|
index 82f11ed..2254fd1 100644
|
||||||
--- a/patchlevel.h
|
--- a/patchlevel.h
|
||||||
+++ b/patchlevel.h
|
+++ b/patchlevel.h
|
||||||
@@ -121,6 +121,7 @@ hunk.
|
@@ -121,6 +121,7 @@ hunk.
|
||||||
#if !defined(PERL_PATCHLEVEL_H_IMPLICIT) && !defined(LOCAL_PATCH_COUNT)
|
#if !defined(PERL_PATCHLEVEL_H_IMPLICIT) && !defined(LOCAL_PATCH_COUNT)
|
||||||
static const char *local_patches[] = {
|
static const char *local_patches[] = {
|
||||||
NULL
|
NULL
|
||||||
+ ,"Devel::PatchPerl 1.32"
|
+ ,"Devel::PatchPerl 1.38"
|
||||||
,NULL
|
,NULL
|
||||||
};
|
};
|
||||||
|
|
||||||
|
|
|
@ -1,3 +1,44 @@
|
||||||
|
diff --git a/ext/Errno/Errno_pm.PL b/ext/Errno/Errno_pm.PL
|
||||||
|
index 6f20c5e..684f369 100644
|
||||||
|
--- a/ext/Errno/Errno_pm.PL
|
||||||
|
+++ b/ext/Errno/Errno_pm.PL
|
||||||
|
@@ -253,20 +253,31 @@ sub write_errno_pm {
|
||||||
|
unless ($^O eq 'MacOS' || $^O eq 'beos') { # trust what we have / get later
|
||||||
|
# invoke CPP and read the output
|
||||||
|
|
||||||
|
+ my $inhibit_linemarkers = '';
|
||||||
|
+ if ($Config{gccversion} =~ /\A(\d+)\./ and $1 >= 5) {
|
||||||
|
+ # GCC 5.0 interleaves expanded macros with line numbers breaking
|
||||||
|
+ # each line into multiple lines. RT#123784
|
||||||
|
+ $inhibit_linemarkers = ' -P';
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
if ($^O eq 'VMS') {
|
||||||
|
- my $cpp = "$Config{cppstdin} $Config{cppflags} $Config{cppminus}";
|
||||||
|
+ my $cpp = "$Config{cppstdin} $Config{cppflags}" .
|
||||||
|
+ $inhibit_linemarkers . " $Config{cppminus}";
|
||||||
|
$cpp =~ s/sys\$input//i;
|
||||||
|
open(CPPO,"$cpp errno.c |") or
|
||||||
|
die "Cannot exec $Config{cppstdin}";
|
||||||
|
} elsif ($IsMSWin32 || $^O eq 'NetWare') {
|
||||||
|
- open(CPPO,"$Config{cpprun} $Config{cppflags} errno.c |") or
|
||||||
|
- die "Cannot run '$Config{cpprun} $Config{cppflags} errno.c'";
|
||||||
|
+ my $cpp = "$Config{cpprun} $Config{cppflags}" .
|
||||||
|
+ $inhibit_linemarkers;
|
||||||
|
+ open(CPPO,"$cpp errno.c |") or
|
||||||
|
+ die "Cannot run '$cpp errno.c'";
|
||||||
|
} elsif ($IsSymbian) {
|
||||||
|
- my $cpp = "gcc -E -I$ENV{SDK}\\epoc32\\include\\libc -";
|
||||||
|
+ my $cpp = "gcc -E -I$ENV{SDK}\\epoc32\\include\\libc" .
|
||||||
|
+ $inhibit_linemarkers ." -";
|
||||||
|
open(CPPO,"$cpp < errno.c |")
|
||||||
|
or die "Cannot exec $cpp";
|
||||||
|
} else {
|
||||||
|
- my $cpp = default_cpp();
|
||||||
|
+ my $cpp = default_cpp() . $inhibit_linemarkers;
|
||||||
|
open(CPPO,"$cpp < errno.c |")
|
||||||
|
or die "Cannot exec $cpp";
|
||||||
|
}
|
||||||
diff --git a/hints/linux.sh b/hints/linux.sh
|
diff --git a/hints/linux.sh b/hints/linux.sh
|
||||||
index ac264c3..fb5a46e 100644
|
index ac264c3..fb5a46e 100644
|
||||||
--- a/hints/linux.sh
|
--- a/hints/linux.sh
|
||||||
|
@ -347,14 +388,14 @@ index 030db74..0d15a40 100644
|
||||||
}
|
}
|
||||||
|
|
||||||
diff --git a/patchlevel.h b/patchlevel.h
|
diff --git a/patchlevel.h b/patchlevel.h
|
||||||
index 82f11ed..9d98556 100644
|
index 82f11ed..2254fd1 100644
|
||||||
--- a/patchlevel.h
|
--- a/patchlevel.h
|
||||||
+++ b/patchlevel.h
|
+++ b/patchlevel.h
|
||||||
@@ -121,6 +121,7 @@ hunk.
|
@@ -121,6 +121,7 @@ hunk.
|
||||||
#if !defined(PERL_PATCHLEVEL_H_IMPLICIT) && !defined(LOCAL_PATCH_COUNT)
|
#if !defined(PERL_PATCHLEVEL_H_IMPLICIT) && !defined(LOCAL_PATCH_COUNT)
|
||||||
static const char *local_patches[] = {
|
static const char *local_patches[] = {
|
||||||
NULL
|
NULL
|
||||||
+ ,"Devel::PatchPerl 1.32"
|
+ ,"Devel::PatchPerl 1.38"
|
||||||
,NULL
|
,NULL
|
||||||
};
|
};
|
||||||
|
|
||||||
|
|
|
@ -1,3 +1,44 @@
|
||||||
|
diff --git a/ext/Errno/Errno_pm.PL b/ext/Errno/Errno_pm.PL
|
||||||
|
index 124b8fc..670fabc 100644
|
||||||
|
--- a/ext/Errno/Errno_pm.PL
|
||||||
|
+++ b/ext/Errno/Errno_pm.PL
|
||||||
|
@@ -257,20 +257,31 @@ sub write_errno_pm {
|
||||||
|
unless ($^O eq 'MacOS' || $^O eq 'beos') { # trust what we have / get later
|
||||||
|
# invoke CPP and read the output
|
||||||
|
|
||||||
|
+ my $inhibit_linemarkers = '';
|
||||||
|
+ if ($Config{gccversion} =~ /\A(\d+)\./ and $1 >= 5) {
|
||||||
|
+ # GCC 5.0 interleaves expanded macros with line numbers breaking
|
||||||
|
+ # each line into multiple lines. RT#123784
|
||||||
|
+ $inhibit_linemarkers = ' -P';
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
if ($^O eq 'VMS') {
|
||||||
|
- my $cpp = "$Config{cppstdin} $Config{cppflags} $Config{cppminus}";
|
||||||
|
+ my $cpp = "$Config{cppstdin} $Config{cppflags}" .
|
||||||
|
+ $inhibit_linemarkers . " $Config{cppminus}";
|
||||||
|
$cpp =~ s/sys\$input//i;
|
||||||
|
open(CPPO,"$cpp errno.c |") or
|
||||||
|
die "Cannot exec $Config{cppstdin}";
|
||||||
|
} elsif ($IsMSWin32 || $^O eq 'NetWare') {
|
||||||
|
- open(CPPO,"$Config{cpprun} $Config{cppflags} errno.c |") or
|
||||||
|
- die "Cannot run '$Config{cpprun} $Config{cppflags} errno.c'";
|
||||||
|
+ my $cpp = "$Config{cpprun} $Config{cppflags}" .
|
||||||
|
+ $inhibit_linemarkers;
|
||||||
|
+ open(CPPO,"$cpp errno.c |") or
|
||||||
|
+ die "Cannot run '$cpp errno.c'";
|
||||||
|
} elsif ($IsSymbian) {
|
||||||
|
- my $cpp = "gcc -E -I$ENV{SDK}\\epoc32\\include\\libc -";
|
||||||
|
+ my $cpp = "gcc -E -I$ENV{SDK}\\epoc32\\include\\libc" .
|
||||||
|
+ $inhibit_linemarkers ." -";
|
||||||
|
open(CPPO,"$cpp < errno.c |")
|
||||||
|
or die "Cannot exec $cpp";
|
||||||
|
} else {
|
||||||
|
- my $cpp = default_cpp();
|
||||||
|
+ my $cpp = default_cpp() . $inhibit_linemarkers;
|
||||||
|
open(CPPO,"$cpp < errno.c |")
|
||||||
|
or die "Cannot exec $cpp";
|
||||||
|
}
|
||||||
diff --git a/ext/Hash-Util-FieldHash/t/10_hash.t b/ext/Hash-Util-FieldHash/t/10_hash.t
|
diff --git a/ext/Hash-Util-FieldHash/t/10_hash.t b/ext/Hash-Util-FieldHash/t/10_hash.t
|
||||||
index 29c2f4d..c266b6a 100755
|
index 29c2f4d..c266b6a 100755
|
||||||
--- a/ext/Hash-Util-FieldHash/t/10_hash.t
|
--- a/ext/Hash-Util-FieldHash/t/10_hash.t
|
||||||
|
@ -446,14 +487,14 @@ index 22a97eb..6eac035 100644
|
||||||
|
|
||||||
# Presumably this can be simplified
|
# Presumably this can be simplified
|
||||||
diff --git a/patchlevel.h b/patchlevel.h
|
diff --git a/patchlevel.h b/patchlevel.h
|
||||||
index 4442407..5169551 100644
|
index 4442407..b82feab 100644
|
||||||
--- a/patchlevel.h
|
--- a/patchlevel.h
|
||||||
+++ b/patchlevel.h
|
+++ b/patchlevel.h
|
||||||
@@ -131,6 +131,7 @@ static const char * const local_patches[] = {
|
@@ -131,6 +131,7 @@ static const char * const local_patches[] = {
|
||||||
NULL
|
NULL
|
||||||
PERL_GIT_UNPUSHED_COMMITS /* do not remove this line */
|
PERL_GIT_UNPUSHED_COMMITS /* do not remove this line */
|
||||||
PERL_GIT_UNCOMMITTED_CHANGES /* do not remove this line */
|
PERL_GIT_UNCOMMITTED_CHANGES /* do not remove this line */
|
||||||
+ ,"Devel::PatchPerl 1.32"
|
+ ,"Devel::PatchPerl 1.38"
|
||||||
,NULL
|
,NULL
|
||||||
};
|
};
|
||||||
|
|
||||||
|
|
|
@ -1,3 +1,44 @@
|
||||||
|
diff --git a/ext/Errno/Errno_pm.PL b/ext/Errno/Errno_pm.PL
|
||||||
|
index 124b8fc..670fabc 100644
|
||||||
|
--- a/ext/Errno/Errno_pm.PL
|
||||||
|
+++ b/ext/Errno/Errno_pm.PL
|
||||||
|
@@ -257,20 +257,31 @@ sub write_errno_pm {
|
||||||
|
unless ($^O eq 'MacOS' || $^O eq 'beos') { # trust what we have / get later
|
||||||
|
# invoke CPP and read the output
|
||||||
|
|
||||||
|
+ my $inhibit_linemarkers = '';
|
||||||
|
+ if ($Config{gccversion} =~ /\A(\d+)\./ and $1 >= 5) {
|
||||||
|
+ # GCC 5.0 interleaves expanded macros with line numbers breaking
|
||||||
|
+ # each line into multiple lines. RT#123784
|
||||||
|
+ $inhibit_linemarkers = ' -P';
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
if ($^O eq 'VMS') {
|
||||||
|
- my $cpp = "$Config{cppstdin} $Config{cppflags} $Config{cppminus}";
|
||||||
|
+ my $cpp = "$Config{cppstdin} $Config{cppflags}" .
|
||||||
|
+ $inhibit_linemarkers . " $Config{cppminus}";
|
||||||
|
$cpp =~ s/sys\$input//i;
|
||||||
|
open(CPPO,"$cpp errno.c |") or
|
||||||
|
die "Cannot exec $Config{cppstdin}";
|
||||||
|
} elsif ($IsMSWin32 || $^O eq 'NetWare') {
|
||||||
|
- open(CPPO,"$Config{cpprun} $Config{cppflags} errno.c |") or
|
||||||
|
- die "Cannot run '$Config{cpprun} $Config{cppflags} errno.c'";
|
||||||
|
+ my $cpp = "$Config{cpprun} $Config{cppflags}" .
|
||||||
|
+ $inhibit_linemarkers;
|
||||||
|
+ open(CPPO,"$cpp errno.c |") or
|
||||||
|
+ die "Cannot run '$cpp errno.c'";
|
||||||
|
} elsif ($IsSymbian) {
|
||||||
|
- my $cpp = "gcc -E -I$ENV{SDK}\\epoc32\\include\\libc -";
|
||||||
|
+ my $cpp = "gcc -E -I$ENV{SDK}\\epoc32\\include\\libc" .
|
||||||
|
+ $inhibit_linemarkers ." -";
|
||||||
|
open(CPPO,"$cpp < errno.c |")
|
||||||
|
or die "Cannot exec $cpp";
|
||||||
|
} else {
|
||||||
|
- my $cpp = default_cpp();
|
||||||
|
+ my $cpp = default_cpp() . $inhibit_linemarkers;
|
||||||
|
open(CPPO,"$cpp < errno.c |")
|
||||||
|
or die "Cannot exec $cpp";
|
||||||
|
}
|
||||||
diff --git a/ext/Hash-Util-FieldHash/t/10_hash.t b/ext/Hash-Util-FieldHash/t/10_hash.t
|
diff --git a/ext/Hash-Util-FieldHash/t/10_hash.t b/ext/Hash-Util-FieldHash/t/10_hash.t
|
||||||
index 29c2f4d..c266b6a 100755
|
index 29c2f4d..c266b6a 100755
|
||||||
--- a/ext/Hash-Util-FieldHash/t/10_hash.t
|
--- a/ext/Hash-Util-FieldHash/t/10_hash.t
|
||||||
|
@ -446,14 +487,14 @@ index 22a97eb..6eac035 100644
|
||||||
|
|
||||||
# Presumably this can be simplified
|
# Presumably this can be simplified
|
||||||
diff --git a/patchlevel.h b/patchlevel.h
|
diff --git a/patchlevel.h b/patchlevel.h
|
||||||
index 4442407..5169551 100644
|
index 4442407..b82feab 100644
|
||||||
--- a/patchlevel.h
|
--- a/patchlevel.h
|
||||||
+++ b/patchlevel.h
|
+++ b/patchlevel.h
|
||||||
@@ -131,6 +131,7 @@ static const char * const local_patches[] = {
|
@@ -131,6 +131,7 @@ static const char * const local_patches[] = {
|
||||||
NULL
|
NULL
|
||||||
PERL_GIT_UNPUSHED_COMMITS /* do not remove this line */
|
PERL_GIT_UNPUSHED_COMMITS /* do not remove this line */
|
||||||
PERL_GIT_UNCOMMITTED_CHANGES /* do not remove this line */
|
PERL_GIT_UNCOMMITTED_CHANGES /* do not remove this line */
|
||||||
+ ,"Devel::PatchPerl 1.32"
|
+ ,"Devel::PatchPerl 1.38"
|
||||||
,NULL
|
,NULL
|
||||||
};
|
};
|
||||||
|
|
||||||
|
|
|
@ -23,6 +23,47 @@ index e400dda..e25e31a 100755
|
||||||
### warn if we are going to skip long file names
|
### warn if we are going to skip long file names
|
||||||
if ($TOO_LONG) {
|
if ($TOO_LONG) {
|
||||||
diag("No long filename support - long filename extraction disabled") if ! $ENV{PERL_CORE};
|
diag("No long filename support - long filename extraction disabled") if ! $ENV{PERL_CORE};
|
||||||
|
diff --git a/ext/Errno/Errno_pm.PL b/ext/Errno/Errno_pm.PL
|
||||||
|
index 124b8fc..670fabc 100644
|
||||||
|
--- a/ext/Errno/Errno_pm.PL
|
||||||
|
+++ b/ext/Errno/Errno_pm.PL
|
||||||
|
@@ -257,20 +257,31 @@ sub write_errno_pm {
|
||||||
|
unless ($^O eq 'MacOS' || $^O eq 'beos') { # trust what we have / get later
|
||||||
|
# invoke CPP and read the output
|
||||||
|
|
||||||
|
+ my $inhibit_linemarkers = '';
|
||||||
|
+ if ($Config{gccversion} =~ /\A(\d+)\./ and $1 >= 5) {
|
||||||
|
+ # GCC 5.0 interleaves expanded macros with line numbers breaking
|
||||||
|
+ # each line into multiple lines. RT#123784
|
||||||
|
+ $inhibit_linemarkers = ' -P';
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
if ($^O eq 'VMS') {
|
||||||
|
- my $cpp = "$Config{cppstdin} $Config{cppflags} $Config{cppminus}";
|
||||||
|
+ my $cpp = "$Config{cppstdin} $Config{cppflags}" .
|
||||||
|
+ $inhibit_linemarkers . " $Config{cppminus}";
|
||||||
|
$cpp =~ s/sys\$input//i;
|
||||||
|
open(CPPO,"$cpp errno.c |") or
|
||||||
|
die "Cannot exec $Config{cppstdin}";
|
||||||
|
} elsif ($IsMSWin32 || $^O eq 'NetWare') {
|
||||||
|
- open(CPPO,"$Config{cpprun} $Config{cppflags} errno.c |") or
|
||||||
|
- die "Cannot run '$Config{cpprun} $Config{cppflags} errno.c'";
|
||||||
|
+ my $cpp = "$Config{cpprun} $Config{cppflags}" .
|
||||||
|
+ $inhibit_linemarkers;
|
||||||
|
+ open(CPPO,"$cpp errno.c |") or
|
||||||
|
+ die "Cannot run '$cpp errno.c'";
|
||||||
|
} elsif ($IsSymbian) {
|
||||||
|
- my $cpp = "gcc -E -I$ENV{SDK}\\epoc32\\include\\libc -";
|
||||||
|
+ my $cpp = "gcc -E -I$ENV{SDK}\\epoc32\\include\\libc" .
|
||||||
|
+ $inhibit_linemarkers ." -";
|
||||||
|
open(CPPO,"$cpp < errno.c |")
|
||||||
|
or die "Cannot exec $cpp";
|
||||||
|
} else {
|
||||||
|
- my $cpp = default_cpp();
|
||||||
|
+ my $cpp = default_cpp() . $inhibit_linemarkers;
|
||||||
|
open(CPPO,"$cpp < errno.c |")
|
||||||
|
or die "Cannot exec $cpp";
|
||||||
|
}
|
||||||
diff --git a/ext/Hash-Util-FieldHash/t/10_hash.t b/ext/Hash-Util-FieldHash/t/10_hash.t
|
diff --git a/ext/Hash-Util-FieldHash/t/10_hash.t b/ext/Hash-Util-FieldHash/t/10_hash.t
|
||||||
index 2cfb4e8..d58f053 100755
|
index 2cfb4e8..d58f053 100755
|
||||||
--- a/ext/Hash-Util-FieldHash/t/10_hash.t
|
--- a/ext/Hash-Util-FieldHash/t/10_hash.t
|
||||||
|
@ -432,14 +473,14 @@ index de26d84..52b0492 100644
|
||||||
|
|
||||||
# Presumably this can be simplified
|
# Presumably this can be simplified
|
||||||
diff --git a/patchlevel.h b/patchlevel.h
|
diff --git a/patchlevel.h b/patchlevel.h
|
||||||
index f1a12bd..61bf49d 100644
|
index f1a12bd..420296d 100644
|
||||||
--- a/patchlevel.h
|
--- a/patchlevel.h
|
||||||
+++ b/patchlevel.h
|
+++ b/patchlevel.h
|
||||||
@@ -131,6 +131,7 @@ static const char * const local_patches[] = {
|
@@ -131,6 +131,7 @@ static const char * const local_patches[] = {
|
||||||
,"uncommitted-changes"
|
,"uncommitted-changes"
|
||||||
#endif
|
#endif
|
||||||
PERL_GIT_UNPUSHED_COMMITS /* do not remove this line */
|
PERL_GIT_UNPUSHED_COMMITS /* do not remove this line */
|
||||||
+ ,"Devel::PatchPerl 1.32"
|
+ ,"Devel::PatchPerl 1.38"
|
||||||
,NULL
|
,NULL
|
||||||
};
|
};
|
||||||
|
|
||||||
|
|
|
@ -23,6 +23,47 @@ index e400dda..e25e31a 100755
|
||||||
### warn if we are going to skip long file names
|
### warn if we are going to skip long file names
|
||||||
if ($TOO_LONG) {
|
if ($TOO_LONG) {
|
||||||
diag("No long filename support - long filename extraction disabled") if ! $ENV{PERL_CORE};
|
diag("No long filename support - long filename extraction disabled") if ! $ENV{PERL_CORE};
|
||||||
|
diff --git a/ext/Errno/Errno_pm.PL b/ext/Errno/Errno_pm.PL
|
||||||
|
index 124b8fc..670fabc 100644
|
||||||
|
--- a/ext/Errno/Errno_pm.PL
|
||||||
|
+++ b/ext/Errno/Errno_pm.PL
|
||||||
|
@@ -257,20 +257,31 @@ sub write_errno_pm {
|
||||||
|
unless ($^O eq 'MacOS' || $^O eq 'beos') { # trust what we have / get later
|
||||||
|
# invoke CPP and read the output
|
||||||
|
|
||||||
|
+ my $inhibit_linemarkers = '';
|
||||||
|
+ if ($Config{gccversion} =~ /\A(\d+)\./ and $1 >= 5) {
|
||||||
|
+ # GCC 5.0 interleaves expanded macros with line numbers breaking
|
||||||
|
+ # each line into multiple lines. RT#123784
|
||||||
|
+ $inhibit_linemarkers = ' -P';
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
if ($^O eq 'VMS') {
|
||||||
|
- my $cpp = "$Config{cppstdin} $Config{cppflags} $Config{cppminus}";
|
||||||
|
+ my $cpp = "$Config{cppstdin} $Config{cppflags}" .
|
||||||
|
+ $inhibit_linemarkers . " $Config{cppminus}";
|
||||||
|
$cpp =~ s/sys\$input//i;
|
||||||
|
open(CPPO,"$cpp errno.c |") or
|
||||||
|
die "Cannot exec $Config{cppstdin}";
|
||||||
|
} elsif ($IsMSWin32 || $^O eq 'NetWare') {
|
||||||
|
- open(CPPO,"$Config{cpprun} $Config{cppflags} errno.c |") or
|
||||||
|
- die "Cannot run '$Config{cpprun} $Config{cppflags} errno.c'";
|
||||||
|
+ my $cpp = "$Config{cpprun} $Config{cppflags}" .
|
||||||
|
+ $inhibit_linemarkers;
|
||||||
|
+ open(CPPO,"$cpp errno.c |") or
|
||||||
|
+ die "Cannot run '$cpp errno.c'";
|
||||||
|
} elsif ($IsSymbian) {
|
||||||
|
- my $cpp = "gcc -E -I$ENV{SDK}\\epoc32\\include\\libc -";
|
||||||
|
+ my $cpp = "gcc -E -I$ENV{SDK}\\epoc32\\include\\libc" .
|
||||||
|
+ $inhibit_linemarkers ." -";
|
||||||
|
open(CPPO,"$cpp < errno.c |")
|
||||||
|
or die "Cannot exec $cpp";
|
||||||
|
} else {
|
||||||
|
- my $cpp = default_cpp();
|
||||||
|
+ my $cpp = default_cpp() . $inhibit_linemarkers;
|
||||||
|
open(CPPO,"$cpp < errno.c |")
|
||||||
|
or die "Cannot exec $cpp";
|
||||||
|
}
|
||||||
diff --git a/ext/Hash-Util-FieldHash/t/10_hash.t b/ext/Hash-Util-FieldHash/t/10_hash.t
|
diff --git a/ext/Hash-Util-FieldHash/t/10_hash.t b/ext/Hash-Util-FieldHash/t/10_hash.t
|
||||||
index 2cfb4e8..d58f053 100755
|
index 2cfb4e8..d58f053 100755
|
||||||
--- a/ext/Hash-Util-FieldHash/t/10_hash.t
|
--- a/ext/Hash-Util-FieldHash/t/10_hash.t
|
||||||
|
@ -432,14 +473,14 @@ index de26d84..52b0492 100644
|
||||||
|
|
||||||
# Presumably this can be simplified
|
# Presumably this can be simplified
|
||||||
diff --git a/patchlevel.h b/patchlevel.h
|
diff --git a/patchlevel.h b/patchlevel.h
|
||||||
index f1a12bd..61bf49d 100644
|
index f1a12bd..420296d 100644
|
||||||
--- a/patchlevel.h
|
--- a/patchlevel.h
|
||||||
+++ b/patchlevel.h
|
+++ b/patchlevel.h
|
||||||
@@ -131,6 +131,7 @@ static const char * const local_patches[] = {
|
@@ -131,6 +131,7 @@ static const char * const local_patches[] = {
|
||||||
,"uncommitted-changes"
|
,"uncommitted-changes"
|
||||||
#endif
|
#endif
|
||||||
PERL_GIT_UNPUSHED_COMMITS /* do not remove this line */
|
PERL_GIT_UNPUSHED_COMMITS /* do not remove this line */
|
||||||
+ ,"Devel::PatchPerl 1.32"
|
+ ,"Devel::PatchPerl 1.38"
|
||||||
,NULL
|
,NULL
|
||||||
};
|
};
|
||||||
|
|
||||||
|
|
|
@ -1,3 +1,44 @@
|
||||||
|
diff --git a/ext/Errno/Errno_pm.PL b/ext/Errno/Errno_pm.PL
|
||||||
|
index 56bc815..cf688be 100644
|
||||||
|
--- a/ext/Errno/Errno_pm.PL
|
||||||
|
+++ b/ext/Errno/Errno_pm.PL
|
||||||
|
@@ -248,20 +248,31 @@ sub write_errno_pm {
|
||||||
|
unless ($^O eq 'beos') { # trust what we have / get later
|
||||||
|
# invoke CPP and read the output
|
||||||
|
|
||||||
|
+ my $inhibit_linemarkers = '';
|
||||||
|
+ if ($Config{gccversion} =~ /\A(\d+)\./ and $1 >= 5) {
|
||||||
|
+ # GCC 5.0 interleaves expanded macros with line numbers breaking
|
||||||
|
+ # each line into multiple lines. RT#123784
|
||||||
|
+ $inhibit_linemarkers = ' -P';
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
if ($^O eq 'VMS') {
|
||||||
|
- my $cpp = "$Config{cppstdin} $Config{cppflags} $Config{cppminus}";
|
||||||
|
+ my $cpp = "$Config{cppstdin} $Config{cppflags}" .
|
||||||
|
+ $inhibit_linemarkers . " $Config{cppminus}";
|
||||||
|
$cpp =~ s/sys\$input//i;
|
||||||
|
open(CPPO,"$cpp errno.c |") or
|
||||||
|
die "Cannot exec $Config{cppstdin}";
|
||||||
|
} elsif ($IsMSWin32 || $^O eq 'NetWare') {
|
||||||
|
- open(CPPO,"$Config{cpprun} $Config{cppflags} errno.c |") or
|
||||||
|
- die "Cannot run '$Config{cpprun} $Config{cppflags} errno.c'";
|
||||||
|
+ my $cpp = "$Config{cpprun} $Config{cppflags}" .
|
||||||
|
+ $inhibit_linemarkers;
|
||||||
|
+ open(CPPO,"$cpp errno.c |") or
|
||||||
|
+ die "Cannot run '$cpp errno.c'";
|
||||||
|
} elsif ($IsSymbian) {
|
||||||
|
- my $cpp = "gcc -E -I$ENV{SDK}\\epoc32\\include\\libc -";
|
||||||
|
+ my $cpp = "gcc -E -I$ENV{SDK}\\epoc32\\include\\libc" .
|
||||||
|
+ $inhibit_linemarkers ." -";
|
||||||
|
open(CPPO,"$cpp < errno.c |")
|
||||||
|
or die "Cannot exec $cpp";
|
||||||
|
} else {
|
||||||
|
- my $cpp = default_cpp();
|
||||||
|
+ my $cpp = default_cpp() . $inhibit_linemarkers;
|
||||||
|
open(CPPO,"$cpp < errno.c |")
|
||||||
|
or die "Cannot exec $cpp";
|
||||||
|
}
|
||||||
diff --git a/hints/linux.sh b/hints/linux.sh
|
diff --git a/hints/linux.sh b/hints/linux.sh
|
||||||
index d0ac9fa..fb5a46e 100644
|
index d0ac9fa..fb5a46e 100644
|
||||||
--- a/hints/linux.sh
|
--- a/hints/linux.sh
|
||||||
|
@ -269,14 +310,14 @@ index 13a15b4..a564bb3 100644
|
||||||
|
|
||||||
# Presumably this can be simplified
|
# Presumably this can be simplified
|
||||||
diff --git a/patchlevel.h b/patchlevel.h
|
diff --git a/patchlevel.h b/patchlevel.h
|
||||||
index 4d9cd6d..c5ac24a 100644
|
index 4d9cd6d..0052d4a 100644
|
||||||
--- a/patchlevel.h
|
--- a/patchlevel.h
|
||||||
+++ b/patchlevel.h
|
+++ b/patchlevel.h
|
||||||
@@ -137,6 +137,7 @@ static const char * const local_patches[] = {
|
@@ -137,6 +137,7 @@ static const char * const local_patches[] = {
|
||||||
,"uncommitted-changes"
|
,"uncommitted-changes"
|
||||||
#endif
|
#endif
|
||||||
PERL_GIT_UNPUSHED_COMMITS /* do not remove this line */
|
PERL_GIT_UNPUSHED_COMMITS /* do not remove this line */
|
||||||
+ ,"Devel::PatchPerl 1.32"
|
+ ,"Devel::PatchPerl 1.38"
|
||||||
,NULL
|
,NULL
|
||||||
};
|
};
|
||||||
|
|
||||||
|
|
|
@ -1,3 +1,44 @@
|
||||||
|
diff --git a/ext/Errno/Errno_pm.PL b/ext/Errno/Errno_pm.PL
|
||||||
|
index 56bc815..cf688be 100644
|
||||||
|
--- a/ext/Errno/Errno_pm.PL
|
||||||
|
+++ b/ext/Errno/Errno_pm.PL
|
||||||
|
@@ -248,20 +248,31 @@ sub write_errno_pm {
|
||||||
|
unless ($^O eq 'beos') { # trust what we have / get later
|
||||||
|
# invoke CPP and read the output
|
||||||
|
|
||||||
|
+ my $inhibit_linemarkers = '';
|
||||||
|
+ if ($Config{gccversion} =~ /\A(\d+)\./ and $1 >= 5) {
|
||||||
|
+ # GCC 5.0 interleaves expanded macros with line numbers breaking
|
||||||
|
+ # each line into multiple lines. RT#123784
|
||||||
|
+ $inhibit_linemarkers = ' -P';
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
if ($^O eq 'VMS') {
|
||||||
|
- my $cpp = "$Config{cppstdin} $Config{cppflags} $Config{cppminus}";
|
||||||
|
+ my $cpp = "$Config{cppstdin} $Config{cppflags}" .
|
||||||
|
+ $inhibit_linemarkers . " $Config{cppminus}";
|
||||||
|
$cpp =~ s/sys\$input//i;
|
||||||
|
open(CPPO,"$cpp errno.c |") or
|
||||||
|
die "Cannot exec $Config{cppstdin}";
|
||||||
|
} elsif ($IsMSWin32 || $^O eq 'NetWare') {
|
||||||
|
- open(CPPO,"$Config{cpprun} $Config{cppflags} errno.c |") or
|
||||||
|
- die "Cannot run '$Config{cpprun} $Config{cppflags} errno.c'";
|
||||||
|
+ my $cpp = "$Config{cpprun} $Config{cppflags}" .
|
||||||
|
+ $inhibit_linemarkers;
|
||||||
|
+ open(CPPO,"$cpp errno.c |") or
|
||||||
|
+ die "Cannot run '$cpp errno.c'";
|
||||||
|
} elsif ($IsSymbian) {
|
||||||
|
- my $cpp = "gcc -E -I$ENV{SDK}\\epoc32\\include\\libc -";
|
||||||
|
+ my $cpp = "gcc -E -I$ENV{SDK}\\epoc32\\include\\libc" .
|
||||||
|
+ $inhibit_linemarkers ." -";
|
||||||
|
open(CPPO,"$cpp < errno.c |")
|
||||||
|
or die "Cannot exec $cpp";
|
||||||
|
} else {
|
||||||
|
- my $cpp = default_cpp();
|
||||||
|
+ my $cpp = default_cpp() . $inhibit_linemarkers;
|
||||||
|
open(CPPO,"$cpp < errno.c |")
|
||||||
|
or die "Cannot exec $cpp";
|
||||||
|
}
|
||||||
diff --git a/hints/linux.sh b/hints/linux.sh
|
diff --git a/hints/linux.sh b/hints/linux.sh
|
||||||
index d0ac9fa..fb5a46e 100644
|
index d0ac9fa..fb5a46e 100644
|
||||||
--- a/hints/linux.sh
|
--- a/hints/linux.sh
|
||||||
|
@ -269,14 +310,14 @@ index 13a15b4..a564bb3 100644
|
||||||
|
|
||||||
# Presumably this can be simplified
|
# Presumably this can be simplified
|
||||||
diff --git a/patchlevel.h b/patchlevel.h
|
diff --git a/patchlevel.h b/patchlevel.h
|
||||||
index 4d9cd6d..c5ac24a 100644
|
index 4d9cd6d..0052d4a 100644
|
||||||
--- a/patchlevel.h
|
--- a/patchlevel.h
|
||||||
+++ b/patchlevel.h
|
+++ b/patchlevel.h
|
||||||
@@ -137,6 +137,7 @@ static const char * const local_patches[] = {
|
@@ -137,6 +137,7 @@ static const char * const local_patches[] = {
|
||||||
,"uncommitted-changes"
|
,"uncommitted-changes"
|
||||||
#endif
|
#endif
|
||||||
PERL_GIT_UNPUSHED_COMMITS /* do not remove this line */
|
PERL_GIT_UNPUSHED_COMMITS /* do not remove this line */
|
||||||
+ ,"Devel::PatchPerl 1.32"
|
+ ,"Devel::PatchPerl 1.38"
|
||||||
,NULL
|
,NULL
|
||||||
};
|
};
|
||||||
|
|
||||||
|
|
|
@ -1,3 +1,44 @@
|
||||||
|
diff --git a/ext/Errno/Errno_pm.PL b/ext/Errno/Errno_pm.PL
|
||||||
|
index 439f254..a324604 100644
|
||||||
|
--- a/ext/Errno/Errno_pm.PL
|
||||||
|
+++ b/ext/Errno/Errno_pm.PL
|
||||||
|
@@ -242,20 +242,31 @@ sub write_errno_pm {
|
||||||
|
unless ($^O eq 'beos') { # trust what we have / get later
|
||||||
|
# invoke CPP and read the output
|
||||||
|
|
||||||
|
+ my $inhibit_linemarkers = '';
|
||||||
|
+ if ($Config{gccversion} =~ /\A(\d+)\./ and $1 >= 5) {
|
||||||
|
+ # GCC 5.0 interleaves expanded macros with line numbers breaking
|
||||||
|
+ # each line into multiple lines. RT#123784
|
||||||
|
+ $inhibit_linemarkers = ' -P';
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
if ($^O eq 'VMS') {
|
||||||
|
- my $cpp = "$Config{cppstdin} $Config{cppflags} $Config{cppminus}";
|
||||||
|
+ my $cpp = "$Config{cppstdin} $Config{cppflags}" .
|
||||||
|
+ $inhibit_linemarkers . " $Config{cppminus}";
|
||||||
|
$cpp =~ s/sys\$input//i;
|
||||||
|
open(CPPO,"$cpp errno.c |") or
|
||||||
|
die "Cannot exec $Config{cppstdin}";
|
||||||
|
} elsif ($IsMSWin32 || $^O eq 'NetWare') {
|
||||||
|
- open(CPPO,"$Config{cpprun} $Config{cppflags} errno.c |") or
|
||||||
|
- die "Cannot run '$Config{cpprun} $Config{cppflags} errno.c'";
|
||||||
|
+ my $cpp = "$Config{cpprun} $Config{cppflags}" .
|
||||||
|
+ $inhibit_linemarkers;
|
||||||
|
+ open(CPPO,"$cpp errno.c |") or
|
||||||
|
+ die "Cannot run '$cpp errno.c'";
|
||||||
|
} elsif ($IsSymbian) {
|
||||||
|
- my $cpp = "gcc -E -I$ENV{SDK}\\epoc32\\include\\libc -";
|
||||||
|
+ my $cpp = "gcc -E -I$ENV{SDK}\\epoc32\\include\\libc" .
|
||||||
|
+ $inhibit_linemarkers ." -";
|
||||||
|
open(CPPO,"$cpp < errno.c |")
|
||||||
|
or die "Cannot exec $cpp";
|
||||||
|
} else {
|
||||||
|
- my $cpp = default_cpp();
|
||||||
|
+ my $cpp = default_cpp() . $inhibit_linemarkers;
|
||||||
|
open(CPPO,"$cpp < errno.c |")
|
||||||
|
or die "Cannot exec $cpp";
|
||||||
|
}
|
||||||
diff --git a/hints/linux.sh b/hints/linux.sh
|
diff --git a/hints/linux.sh b/hints/linux.sh
|
||||||
index 688c68d..fb5a46e 100644
|
index 688c68d..fb5a46e 100644
|
||||||
--- a/hints/linux.sh
|
--- a/hints/linux.sh
|
||||||
|
@ -240,14 +281,14 @@ index 688c68d..fb5a46e 100644
|
||||||
if ldd $DBLIB | grep pthread >/dev/null
|
if ldd $DBLIB | grep pthread >/dev/null
|
||||||
then
|
then
|
||||||
diff --git a/patchlevel.h b/patchlevel.h
|
diff --git a/patchlevel.h b/patchlevel.h
|
||||||
index be508d1..11ae2e8 100644
|
index be508d1..d71558a 100644
|
||||||
--- a/patchlevel.h
|
--- a/patchlevel.h
|
||||||
+++ b/patchlevel.h
|
+++ b/patchlevel.h
|
||||||
@@ -137,6 +137,7 @@ static const char * const local_patches[] = {
|
@@ -137,6 +137,7 @@ static const char * const local_patches[] = {
|
||||||
,"uncommitted-changes"
|
,"uncommitted-changes"
|
||||||
#endif
|
#endif
|
||||||
PERL_GIT_UNPUSHED_COMMITS /* do not remove this line */
|
PERL_GIT_UNPUSHED_COMMITS /* do not remove this line */
|
||||||
+ ,"Devel::PatchPerl 1.32"
|
+ ,"Devel::PatchPerl 1.38"
|
||||||
,NULL
|
,NULL
|
||||||
};
|
};
|
||||||
|
|
||||||
|
|
|
@ -1,3 +1,44 @@
|
||||||
|
diff --git a/ext/Errno/Errno_pm.PL b/ext/Errno/Errno_pm.PL
|
||||||
|
index 439f254..a324604 100644
|
||||||
|
--- a/ext/Errno/Errno_pm.PL
|
||||||
|
+++ b/ext/Errno/Errno_pm.PL
|
||||||
|
@@ -242,20 +242,31 @@ sub write_errno_pm {
|
||||||
|
unless ($^O eq 'beos') { # trust what we have / get later
|
||||||
|
# invoke CPP and read the output
|
||||||
|
|
||||||
|
+ my $inhibit_linemarkers = '';
|
||||||
|
+ if ($Config{gccversion} =~ /\A(\d+)\./ and $1 >= 5) {
|
||||||
|
+ # GCC 5.0 interleaves expanded macros with line numbers breaking
|
||||||
|
+ # each line into multiple lines. RT#123784
|
||||||
|
+ $inhibit_linemarkers = ' -P';
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
if ($^O eq 'VMS') {
|
||||||
|
- my $cpp = "$Config{cppstdin} $Config{cppflags} $Config{cppminus}";
|
||||||
|
+ my $cpp = "$Config{cppstdin} $Config{cppflags}" .
|
||||||
|
+ $inhibit_linemarkers . " $Config{cppminus}";
|
||||||
|
$cpp =~ s/sys\$input//i;
|
||||||
|
open(CPPO,"$cpp errno.c |") or
|
||||||
|
die "Cannot exec $Config{cppstdin}";
|
||||||
|
} elsif ($IsMSWin32 || $^O eq 'NetWare') {
|
||||||
|
- open(CPPO,"$Config{cpprun} $Config{cppflags} errno.c |") or
|
||||||
|
- die "Cannot run '$Config{cpprun} $Config{cppflags} errno.c'";
|
||||||
|
+ my $cpp = "$Config{cpprun} $Config{cppflags}" .
|
||||||
|
+ $inhibit_linemarkers;
|
||||||
|
+ open(CPPO,"$cpp errno.c |") or
|
||||||
|
+ die "Cannot run '$cpp errno.c'";
|
||||||
|
} elsif ($IsSymbian) {
|
||||||
|
- my $cpp = "gcc -E -I$ENV{SDK}\\epoc32\\include\\libc -";
|
||||||
|
+ my $cpp = "gcc -E -I$ENV{SDK}\\epoc32\\include\\libc" .
|
||||||
|
+ $inhibit_linemarkers ." -";
|
||||||
|
open(CPPO,"$cpp < errno.c |")
|
||||||
|
or die "Cannot exec $cpp";
|
||||||
|
} else {
|
||||||
|
- my $cpp = default_cpp();
|
||||||
|
+ my $cpp = default_cpp() . $inhibit_linemarkers;
|
||||||
|
open(CPPO,"$cpp < errno.c |")
|
||||||
|
or die "Cannot exec $cpp";
|
||||||
|
}
|
||||||
diff --git a/hints/linux.sh b/hints/linux.sh
|
diff --git a/hints/linux.sh b/hints/linux.sh
|
||||||
index 688c68d..fb5a46e 100644
|
index 688c68d..fb5a46e 100644
|
||||||
--- a/hints/linux.sh
|
--- a/hints/linux.sh
|
||||||
|
@ -240,14 +281,14 @@ index 688c68d..fb5a46e 100644
|
||||||
if ldd $DBLIB | grep pthread >/dev/null
|
if ldd $DBLIB | grep pthread >/dev/null
|
||||||
then
|
then
|
||||||
diff --git a/patchlevel.h b/patchlevel.h
|
diff --git a/patchlevel.h b/patchlevel.h
|
||||||
index be508d1..11ae2e8 100644
|
index be508d1..d71558a 100644
|
||||||
--- a/patchlevel.h
|
--- a/patchlevel.h
|
||||||
+++ b/patchlevel.h
|
+++ b/patchlevel.h
|
||||||
@@ -137,6 +137,7 @@ static const char * const local_patches[] = {
|
@@ -137,6 +137,7 @@ static const char * const local_patches[] = {
|
||||||
,"uncommitted-changes"
|
,"uncommitted-changes"
|
||||||
#endif
|
#endif
|
||||||
PERL_GIT_UNPUSHED_COMMITS /* do not remove this line */
|
PERL_GIT_UNPUSHED_COMMITS /* do not remove this line */
|
||||||
+ ,"Devel::PatchPerl 1.32"
|
+ ,"Devel::PatchPerl 1.38"
|
||||||
,NULL
|
,NULL
|
||||||
};
|
};
|
||||||
|
|
||||||
|
|
|
@ -1,3 +1,44 @@
|
||||||
|
diff --git a/ext/Errno/Errno_pm.PL b/ext/Errno/Errno_pm.PL
|
||||||
|
index b707911..2588f0b 100644
|
||||||
|
--- a/ext/Errno/Errno_pm.PL
|
||||||
|
+++ b/ext/Errno/Errno_pm.PL
|
||||||
|
@@ -236,20 +236,31 @@ sub write_errno_pm {
|
||||||
|
{ # BeOS (support now removed) did not enter this block
|
||||||
|
# invoke CPP and read the output
|
||||||
|
|
||||||
|
+ my $inhibit_linemarkers = '';
|
||||||
|
+ if ($Config{gccversion} =~ /\A(\d+)\./ and $1 >= 5) {
|
||||||
|
+ # GCC 5.0 interleaves expanded macros with line numbers breaking
|
||||||
|
+ # each line into multiple lines. RT#123784
|
||||||
|
+ $inhibit_linemarkers = ' -P';
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
if ($^O eq 'VMS') {
|
||||||
|
- my $cpp = "$Config{cppstdin} $Config{cppflags} $Config{cppminus}";
|
||||||
|
+ my $cpp = "$Config{cppstdin} $Config{cppflags}" .
|
||||||
|
+ $inhibit_linemarkers . " $Config{cppminus}";
|
||||||
|
$cpp =~ s/sys\$input//i;
|
||||||
|
open(CPPO,"$cpp errno.c |") or
|
||||||
|
die "Cannot exec $Config{cppstdin}";
|
||||||
|
} elsif ($IsMSWin32 || $^O eq 'NetWare') {
|
||||||
|
- open(CPPO,"$Config{cpprun} $Config{cppflags} errno.c |") or
|
||||||
|
- die "Cannot run '$Config{cpprun} $Config{cppflags} errno.c'";
|
||||||
|
+ my $cpp = "$Config{cpprun} $Config{cppflags}" .
|
||||||
|
+ $inhibit_linemarkers;
|
||||||
|
+ open(CPPO,"$cpp errno.c |") or
|
||||||
|
+ die "Cannot run '$cpp errno.c'";
|
||||||
|
} elsif ($IsSymbian) {
|
||||||
|
- my $cpp = "gcc -E -I$ENV{SDK}\\epoc32\\include\\libc -";
|
||||||
|
+ my $cpp = "gcc -E -I$ENV{SDK}\\epoc32\\include\\libc" .
|
||||||
|
+ $inhibit_linemarkers ." -";
|
||||||
|
open(CPPO,"$cpp < errno.c |")
|
||||||
|
or die "Cannot exec $cpp";
|
||||||
|
} else {
|
||||||
|
- my $cpp = default_cpp();
|
||||||
|
+ my $cpp = default_cpp() . $inhibit_linemarkers;
|
||||||
|
open(CPPO,"$cpp < errno.c |")
|
||||||
|
or die "Cannot exec $cpp";
|
||||||
|
}
|
||||||
diff --git a/hints/linux.sh b/hints/linux.sh
|
diff --git a/hints/linux.sh b/hints/linux.sh
|
||||||
index a148248..fb5a46e 100644
|
index a148248..fb5a46e 100644
|
||||||
--- a/hints/linux.sh
|
--- a/hints/linux.sh
|
||||||
|
@ -223,14 +264,14 @@ index a148248..fb5a46e 100644
|
||||||
if ldd $DBLIB | grep pthread >/dev/null
|
if ldd $DBLIB | grep pthread >/dev/null
|
||||||
then
|
then
|
||||||
diff --git a/patchlevel.h b/patchlevel.h
|
diff --git a/patchlevel.h b/patchlevel.h
|
||||||
index cb033ea..1318325 100644
|
index cb033ea..78c727d 100644
|
||||||
--- a/patchlevel.h
|
--- a/patchlevel.h
|
||||||
+++ b/patchlevel.h
|
+++ b/patchlevel.h
|
||||||
@@ -137,6 +137,7 @@ static const char * const local_patches[] = {
|
@@ -137,6 +137,7 @@ static const char * const local_patches[] = {
|
||||||
,"uncommitted-changes"
|
,"uncommitted-changes"
|
||||||
#endif
|
#endif
|
||||||
PERL_GIT_UNPUSHED_COMMITS /* do not remove this line */
|
PERL_GIT_UNPUSHED_COMMITS /* do not remove this line */
|
||||||
+ ,"Devel::PatchPerl 1.32"
|
+ ,"Devel::PatchPerl 1.38"
|
||||||
,NULL
|
,NULL
|
||||||
};
|
};
|
||||||
|
|
||||||
|
|
|
@ -1,3 +1,44 @@
|
||||||
|
diff --git a/ext/Errno/Errno_pm.PL b/ext/Errno/Errno_pm.PL
|
||||||
|
index b707911..2588f0b 100644
|
||||||
|
--- a/ext/Errno/Errno_pm.PL
|
||||||
|
+++ b/ext/Errno/Errno_pm.PL
|
||||||
|
@@ -236,20 +236,31 @@ sub write_errno_pm {
|
||||||
|
{ # BeOS (support now removed) did not enter this block
|
||||||
|
# invoke CPP and read the output
|
||||||
|
|
||||||
|
+ my $inhibit_linemarkers = '';
|
||||||
|
+ if ($Config{gccversion} =~ /\A(\d+)\./ and $1 >= 5) {
|
||||||
|
+ # GCC 5.0 interleaves expanded macros with line numbers breaking
|
||||||
|
+ # each line into multiple lines. RT#123784
|
||||||
|
+ $inhibit_linemarkers = ' -P';
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
if ($^O eq 'VMS') {
|
||||||
|
- my $cpp = "$Config{cppstdin} $Config{cppflags} $Config{cppminus}";
|
||||||
|
+ my $cpp = "$Config{cppstdin} $Config{cppflags}" .
|
||||||
|
+ $inhibit_linemarkers . " $Config{cppminus}";
|
||||||
|
$cpp =~ s/sys\$input//i;
|
||||||
|
open(CPPO,"$cpp errno.c |") or
|
||||||
|
die "Cannot exec $Config{cppstdin}";
|
||||||
|
} elsif ($IsMSWin32 || $^O eq 'NetWare') {
|
||||||
|
- open(CPPO,"$Config{cpprun} $Config{cppflags} errno.c |") or
|
||||||
|
- die "Cannot run '$Config{cpprun} $Config{cppflags} errno.c'";
|
||||||
|
+ my $cpp = "$Config{cpprun} $Config{cppflags}" .
|
||||||
|
+ $inhibit_linemarkers;
|
||||||
|
+ open(CPPO,"$cpp errno.c |") or
|
||||||
|
+ die "Cannot run '$cpp errno.c'";
|
||||||
|
} elsif ($IsSymbian) {
|
||||||
|
- my $cpp = "gcc -E -I$ENV{SDK}\\epoc32\\include\\libc -";
|
||||||
|
+ my $cpp = "gcc -E -I$ENV{SDK}\\epoc32\\include\\libc" .
|
||||||
|
+ $inhibit_linemarkers ." -";
|
||||||
|
open(CPPO,"$cpp < errno.c |")
|
||||||
|
or die "Cannot exec $cpp";
|
||||||
|
} else {
|
||||||
|
- my $cpp = default_cpp();
|
||||||
|
+ my $cpp = default_cpp() . $inhibit_linemarkers;
|
||||||
|
open(CPPO,"$cpp < errno.c |")
|
||||||
|
or die "Cannot exec $cpp";
|
||||||
|
}
|
||||||
diff --git a/hints/linux.sh b/hints/linux.sh
|
diff --git a/hints/linux.sh b/hints/linux.sh
|
||||||
index a148248..fb5a46e 100644
|
index a148248..fb5a46e 100644
|
||||||
--- a/hints/linux.sh
|
--- a/hints/linux.sh
|
||||||
|
@ -223,14 +264,14 @@ index a148248..fb5a46e 100644
|
||||||
if ldd $DBLIB | grep pthread >/dev/null
|
if ldd $DBLIB | grep pthread >/dev/null
|
||||||
then
|
then
|
||||||
diff --git a/patchlevel.h b/patchlevel.h
|
diff --git a/patchlevel.h b/patchlevel.h
|
||||||
index cb033ea..1318325 100644
|
index cb033ea..78c727d 100644
|
||||||
--- a/patchlevel.h
|
--- a/patchlevel.h
|
||||||
+++ b/patchlevel.h
|
+++ b/patchlevel.h
|
||||||
@@ -137,6 +137,7 @@ static const char * const local_patches[] = {
|
@@ -137,6 +137,7 @@ static const char * const local_patches[] = {
|
||||||
,"uncommitted-changes"
|
,"uncommitted-changes"
|
||||||
#endif
|
#endif
|
||||||
PERL_GIT_UNPUSHED_COMMITS /* do not remove this line */
|
PERL_GIT_UNPUSHED_COMMITS /* do not remove this line */
|
||||||
+ ,"Devel::PatchPerl 1.32"
|
+ ,"Devel::PatchPerl 1.38"
|
||||||
,NULL
|
,NULL
|
||||||
};
|
};
|
||||||
|
|
||||||
|
|
|
@ -36,14 +36,14 @@ index 956adfc..fb5a46e 100644
|
||||||
if ldd $DBLIB | grep pthread >/dev/null
|
if ldd $DBLIB | grep pthread >/dev/null
|
||||||
then
|
then
|
||||||
diff --git a/patchlevel.h b/patchlevel.h
|
diff --git a/patchlevel.h b/patchlevel.h
|
||||||
index f416602..4917564 100644
|
index f416602..e8062d1 100644
|
||||||
--- a/patchlevel.h
|
--- a/patchlevel.h
|
||||||
+++ b/patchlevel.h
|
+++ b/patchlevel.h
|
||||||
@@ -137,6 +137,7 @@ static const char * const local_patches[] = {
|
@@ -137,6 +137,7 @@ static const char * const local_patches[] = {
|
||||||
,"uncommitted-changes"
|
,"uncommitted-changes"
|
||||||
#endif
|
#endif
|
||||||
PERL_GIT_UNPUSHED_COMMITS /* do not remove this line */
|
PERL_GIT_UNPUSHED_COMMITS /* do not remove this line */
|
||||||
+ ,"Devel::PatchPerl 1.32"
|
+ ,"Devel::PatchPerl 1.38"
|
||||||
,NULL
|
,NULL
|
||||||
};
|
};
|
||||||
|
|
||||||
|
|
|
@ -36,14 +36,14 @@ index 956adfc..fb5a46e 100644
|
||||||
if ldd $DBLIB | grep pthread >/dev/null
|
if ldd $DBLIB | grep pthread >/dev/null
|
||||||
then
|
then
|
||||||
diff --git a/patchlevel.h b/patchlevel.h
|
diff --git a/patchlevel.h b/patchlevel.h
|
||||||
index f416602..4917564 100644
|
index f416602..e8062d1 100644
|
||||||
--- a/patchlevel.h
|
--- a/patchlevel.h
|
||||||
+++ b/patchlevel.h
|
+++ b/patchlevel.h
|
||||||
@@ -137,6 +137,7 @@ static const char * const local_patches[] = {
|
@@ -137,6 +137,7 @@ static const char * const local_patches[] = {
|
||||||
,"uncommitted-changes"
|
,"uncommitted-changes"
|
||||||
#endif
|
#endif
|
||||||
PERL_GIT_UNPUSHED_COMMITS /* do not remove this line */
|
PERL_GIT_UNPUSHED_COMMITS /* do not remove this line */
|
||||||
+ ,"Devel::PatchPerl 1.32"
|
+ ,"Devel::PatchPerl 1.38"
|
||||||
,NULL
|
,NULL
|
||||||
};
|
};
|
||||||
|
|
||||||
|
|
|
@ -1,5 +1,5 @@
|
||||||
diff --git a/patchlevel.h b/patchlevel.h
|
diff --git a/patchlevel.h b/patchlevel.h
|
||||||
index bd56612..3d5f668 100644
|
index bfd796b..69d5fb0 100644
|
||||||
--- a/patchlevel.h
|
--- a/patchlevel.h
|
||||||
+++ b/patchlevel.h
|
+++ b/patchlevel.h
|
||||||
@@ -137,6 +137,7 @@ static const char * const local_patches[] = {
|
@@ -137,6 +137,7 @@ static const char * const local_patches[] = {
|
|
@ -9,10 +9,10 @@ RUN mkdir /usr/src/perl
|
||||||
COPY *.patch /usr/src/perl/
|
COPY *.patch /usr/src/perl/
|
||||||
WORKDIR /usr/src/perl
|
WORKDIR /usr/src/perl
|
||||||
|
|
||||||
RUN curl -SL https://cpan.metacpan.org/authors/id/S/SH/SHAY/perl-5.22.1.tar.bz2 -o perl-5.22.1.tar.bz2 \
|
RUN curl -SL https://cpan.metacpan.org/authors/id/S/SH/SHAY/perl-5.22.2.tar.bz2 -o perl-5.22.2.tar.bz2 \
|
||||||
&& echo '29f9b320b0299577a3e1d02e9e8ef8f26f160332 *perl-5.22.1.tar.bz2' | sha1sum -c - \
|
&& echo 'e2f465446dcd45a7fa3da696037f9ebe73e78e55 *perl-5.22.2.tar.bz2' | sha1sum -c - \
|
||||||
&& tar --strip-components=1 -xjf perl-5.22.1.tar.bz2 -C /usr/src/perl \
|
&& tar --strip-components=1 -xjf perl-5.22.2.tar.bz2 -C /usr/src/perl \
|
||||||
&& rm perl-5.22.1.tar.bz2 \
|
&& rm perl-5.22.2.tar.bz2 \
|
||||||
&& cat *.patch | patch -p1 \
|
&& cat *.patch | patch -p1 \
|
||||||
&& ./Configure -Dusethreads -Duse64bitall -Duseshrplib -des \
|
&& ./Configure -Dusethreads -Duse64bitall -Duseshrplib -des \
|
||||||
&& make -j$(nproc) \
|
&& make -j$(nproc) \
|
||||||
|
@ -26,4 +26,4 @@ RUN curl -SL https://cpan.metacpan.org/authors/id/S/SH/SHAY/perl-5.22.1.tar.bz2
|
||||||
|
|
||||||
WORKDIR /root
|
WORKDIR /root
|
||||||
|
|
||||||
CMD ["perl5.22.1","-de0"]
|
CMD ["perl5.22.2","-de0"]
|
|
@ -1,5 +1,5 @@
|
||||||
diff --git a/patchlevel.h b/patchlevel.h
|
diff --git a/patchlevel.h b/patchlevel.h
|
||||||
index bd56612..3d5f668 100644
|
index bfd796b..69d5fb0 100644
|
||||||
--- a/patchlevel.h
|
--- a/patchlevel.h
|
||||||
+++ b/patchlevel.h
|
+++ b/patchlevel.h
|
||||||
@@ -137,6 +137,7 @@ static const char * const local_patches[] = {
|
@@ -137,6 +137,7 @@ static const char * const local_patches[] = {
|
|
@ -9,10 +9,10 @@ RUN mkdir /usr/src/perl
|
||||||
COPY *.patch /usr/src/perl/
|
COPY *.patch /usr/src/perl/
|
||||||
WORKDIR /usr/src/perl
|
WORKDIR /usr/src/perl
|
||||||
|
|
||||||
RUN curl -SL https://cpan.metacpan.org/authors/id/S/SH/SHAY/perl-5.22.1.tar.bz2 -o perl-5.22.1.tar.bz2 \
|
RUN curl -SL https://cpan.metacpan.org/authors/id/S/SH/SHAY/perl-5.22.2.tar.bz2 -o perl-5.22.2.tar.bz2 \
|
||||||
&& echo '29f9b320b0299577a3e1d02e9e8ef8f26f160332 *perl-5.22.1.tar.bz2' | sha1sum -c - \
|
&& echo 'e2f465446dcd45a7fa3da696037f9ebe73e78e55 *perl-5.22.2.tar.bz2' | sha1sum -c - \
|
||||||
&& tar --strip-components=1 -xjf perl-5.22.1.tar.bz2 -C /usr/src/perl \
|
&& tar --strip-components=1 -xjf perl-5.22.2.tar.bz2 -C /usr/src/perl \
|
||||||
&& rm perl-5.22.1.tar.bz2 \
|
&& rm perl-5.22.2.tar.bz2 \
|
||||||
&& cat *.patch | patch -p1 \
|
&& cat *.patch | patch -p1 \
|
||||||
&& ./Configure -Duse64bitall -Duseshrplib -des \
|
&& ./Configure -Duse64bitall -Duseshrplib -des \
|
||||||
&& make -j$(nproc) \
|
&& make -j$(nproc) \
|
||||||
|
@ -26,4 +26,4 @@ RUN curl -SL https://cpan.metacpan.org/authors/id/S/SH/SHAY/perl-5.22.1.tar.bz2
|
||||||
|
|
||||||
WORKDIR /root
|
WORKDIR /root
|
||||||
|
|
||||||
CMD ["perl5.22.1","-de0"]
|
CMD ["perl5.22.2","-de0"]
|
|
@ -39,6 +39,6 @@ releases:
|
||||||
sha1: eedf9e3be3c83bef15911996ed18703cffe4d113
|
sha1: eedf9e3be3c83bef15911996ed18703cffe4d113
|
||||||
pause: SHAY
|
pause: SHAY
|
||||||
|
|
||||||
- version: 5.22.1
|
- version: 5.22.2
|
||||||
sha1: 29f9b320b0299577a3e1d02e9e8ef8f26f160332
|
sha1: e2f465446dcd45a7fa3da696037f9ebe73e78e55
|
||||||
pause: SHAY
|
pause: SHAY
|
||||||
|
|
Loading…
Add table
Reference in a new issue