SHA256
1
0
forked from pool/perl

Accepting request 844542 from devel:languages:perl

- update to perl-5.32.0

OBS-URL: https://build.opensuse.org/request/show/844542
OBS-URL: https://build.opensuse.org/package/show/openSUSE:Factory/perl?expand=0&rev=119
This commit is contained in:
Dominique Leuenberger 2020-11-03 14:15:14 +00:00 committed by Git OBS Bridge
commit 3197aa69c0
9 changed files with 87 additions and 107 deletions

View File

@ -1,3 +0,0 @@
version https://git-lfs.github.com/spec/v1
oid sha256:6967595f2e3f3a94544c35152f9a25e0cb8ea24ae45f4bf1882f2e33f4a400f4
size 12375128

3
perl-5.32.0.tar.xz Normal file
View File

@ -0,0 +1,3 @@
version https://git-lfs.github.com/spec/v1
oid sha256:6f436b447cf56d22464f980fac1916e707a040e96d52172984c5d184c09b859b
size 12717336

View File

@ -1,5 +1,5 @@
--- ./dist/Time-HiRes/t/alarm.t.orig 2017-04-19 13:37:05.000000000 +0000
+++ ./dist/Time-HiRes/t/alarm.t 2017-08-30 12:15:18.729183834 +0000
--- ./dist/Time-HiRes/t/alarm.t.orig 2020-06-14 23:01:25.000000000 +0000
+++ ./dist/Time-HiRes/t/alarm.t 2020-10-27 10:52:36.824741858 +0000
@@ -8,7 +8,7 @@ BEGIN { require_ok "Time::HiRes"; }
use Config;
@ -7,10 +7,10 @@
-my $limit = 0.25; # 25% is acceptable slosh for testing timers
+my $limit = 0.60; # 25% is acceptable slosh for testing timers
my $xdefine = '';
my $xdefine = '';
if (open(XDEFINE, "<", "xdefine")) {
--- ./dist/Time-HiRes/t/clock.t.orig 2017-04-19 13:37:05.000000000 +0000
+++ ./dist/Time-HiRes/t/clock.t 2017-08-30 12:15:18.729183834 +0000
--- ./dist/Time-HiRes/t/clock.t.orig 2020-06-14 23:01:25.000000000 +0000
+++ ./dist/Time-HiRes/t/clock.t 2020-10-27 10:52:36.824741858 +0000
@@ -29,7 +29,7 @@ printf("# have_clock = %d\n",
# completes fine with (say) 30% slosh, and fail otherwise. If you do that,
# consider changing over to test.pl at the same time.
@ -20,8 +20,8 @@
SKIP: {
skip "no clock_gettime", 1
--- ./dist/Time-HiRes/t/itimer.t.orig 2017-04-19 13:37:05.000000000 +0000
+++ ./dist/Time-HiRes/t/itimer.t 2017-08-30 12:15:18.729183834 +0000
--- ./dist/Time-HiRes/t/itimer.t.orig 2020-06-14 23:01:25.000000000 +0000
+++ ./dist/Time-HiRes/t/itimer.t 2020-10-27 10:52:36.824741858 +0000
@@ -29,7 +29,7 @@ use Test::More tests => 2;
BEGIN { push @INC, '.' }
use t::Watchdog;
@ -31,11 +31,11 @@
my $i = 3;
my $r = [Time::HiRes::gettimeofday()];
--- ./dist/Time-HiRes/t/usleep.t.orig 2017-04-19 13:37:05.000000000 +0000
+++ ./dist/Time-HiRes/t/usleep.t 2017-08-30 12:15:18.730183834 +0000
--- ./dist/Time-HiRes/t/usleep.t.orig 2020-06-14 23:01:25.000000000 +0000
+++ ./dist/Time-HiRes/t/usleep.t 2020-10-27 10:52:36.824741858 +0000
@@ -16,7 +16,7 @@ eval { Time::HiRes::usleep(-2) };
like $@, qr/::usleep\(-2\): negative time not invented yet/,
"negative time error";
"negative time error";
-my $limit = 0.25; # 25% is acceptable slosh for testing timers
+my $limit = 0.60; # 25% is acceptable slosh for testing timers

View File

@ -72,14 +72,3 @@ https://rt.perl.org/Ticket/Display.html?id=132897 perl doc
: undef;
}
--- ./pod/perlport.pod.orig 2019-11-19 13:48:45.327065973 +0000
+++ ./pod/perlport.pod 2019-11-19 13:48:49.983054613 +0000
@@ -670,7 +670,7 @@ When calculating specific times, such as
it may be appropriate to calculate an offset for the epoch.
use Time::Local qw(timegm);
- my $offset = timegm(0, 0, 0, 1, 0, 70);
+ my $offset = timegm(0, 0, 0, 1, 0, 1970);
The value for C<$offset> in Unix will be C<0>, but in Mac OS Classic
will be some large number. C<$offset> can then be added to a Unix time

View File

@ -1,26 +1,7 @@
commit 3b3217087ecdc7a51bfeba5233e1a4612da9ea5b
Author: Bernhard M. Wiedemann <bwiedemann@suse.de>
Date: Thu Dec 27 11:24:43 2018 +0100
Avoid recursion depth variations across builds
See https://reproducible-builds.org/ for why this is good.
Variations are likely coming from ASLR.
On an openSUSE Linux system, this changed
$Storable::recursion_limit
from varying between 14265 and 14267 to a constant 14256
There could be a chance for remaining variations.
---
Better fixes welcome.
--- ./dist/Storable/stacksize.orig 2019-11-19 13:55:21.210100584 +0000
+++ ./dist/Storable/stacksize 2019-11-19 13:56:37.537914451 +0000
--- ./dist/Storable/stacksize.orig 2020-06-14 23:01:25.000000000 +0000
+++ ./dist/Storable/stacksize 2020-10-27 10:57:33.147900085 +0000
@@ -164,8 +164,8 @@ my $max_depth_hash = $n;
# be fairly aggressive in trimming this, smoke testing showed several
# be fairly aggressive in trimming this, smoke testing showed
# several apparently random failures here, eg. working in one
# configuration, but not in a very similar configuration.
-$max_depth = int(0.6 * $max_depth);

View File

@ -1,3 +1,17 @@
-------------------------------------------------------------------
Tue Oct 27 11:38:55 CET 2020 - mls@suse.de
- update to perl-5.32.0
* new experimental infix "isa" operator
* support of unicode 13.0
* chained comparisons capability
- updated patches:
* perl-HiRes.t-timeout.diff
* posix-sigaction.patch
* perl-fix2020.patch
* perl-reproducible2.patch
* perl_skip_flaky_tests_powerpc.patch
-------------------------------------------------------------------
Fri Sep 11 15:35:00 UTC 2020 - Dirk Mueller <dmueller@suse.com>

View File

@ -16,10 +16,10 @@
#
%define pversion 5.30.3
%global versionlist 5.30.1
%define pversion 5.32.0
%global versionlist %nil
Name: perl
Version: 5.30.3
Version: 5.32.0
Release: 0
Summary: The Perl interpreter
License: Artistic-1.0 OR GPL-2.0-or-later
@ -58,58 +58,57 @@ BuildRequires: zlib-devel
Requires: perl-base = %{version}
Suggests: perl-doc = %{version}
Provides: perl-500
Provides: perl-Filter-Simple = 0.95
Provides: perl-Filter-Simple = 0.96
Provides: perl(:MODULE_COMPAT_%{pversion})
Provides: perl(:MODULE_COMPAT_5.30.1)
Obsoletes: perl-Filter-Simple <= 0.95
Provides: perl-I18N-LangTags = 0.43
Obsoletes: perl-I18N-LangTags <= 0.43
Obsoletes: perl-Filter-Simple <= 0.96
Provides: perl-I18N-LangTags = 0.44
Obsoletes: perl-I18N-LangTags <= 0.44
Provides: perl-MIME-Base64 = 3.15
Obsoletes: perl-MIME-Base64 <= 3.15
Provides: perl-Storable = 3.15
Obsoletes: perl-Storable <= 3.15
Provides: perl-Test-Simple = 1.302162
Obsoletes: perl-Test-Simple <= 1.302162
Provides: perl-Storable = 3.21
Obsoletes: perl-Storable <= 3.21
Provides: perl-Test-Simple = 1.302175
Obsoletes: perl-Test-Simple <= 1.302175
Provides: perl-Text-Balanced = 2.03
Obsoletes: perl-Text-Balanced <= 2.03
Provides: perl-Time-HiRes = 1.9760
Obsoletes: perl-Time-HiRes <= 1.9760
Provides: perl-Time-HiRes = 1.9764
Obsoletes: perl-Time-HiRes <= 1.9764
Provides: perl-libnet = 3.11
Obsoletes: perl-libnet <= 3.11
Provides: perl-Compress-Raw-Zlib = 2.084
Obsoletes: perl-Compress-Raw-Zlib <= 2.084
Provides: perl-Compress-Zlib = 2.084
Obsoletes: perl-Compress-Zlib <= 2.084
Provides: perl-IO-Compress-Base = 2.084
Obsoletes: perl-IO-Compress-Base <= 2.084
Provides: perl-IO-Compress-Zlib = 2.084
Obsoletes: perl-IO-Compress-Zlib <= 2.084
Provides: perl-Compress-Raw-Zlib = 2.093
Obsoletes: perl-Compress-Raw-Zlib <= 2.093
Provides: perl-Compress-Zlib = 2.093
Obsoletes: perl-Compress-Zlib <= 2.093
Provides: perl-IO-Compress-Base = 2.093
Obsoletes: perl-IO-Compress-Base <= 2.093
Provides: perl-IO-Compress-Zlib = 2.093
Obsoletes: perl-IO-Compress-Zlib <= 2.093
Provides: perl-IO-Zlib = 1.10
Obsoletes: perl-IO-Zlib <= 1.10
Provides: perl-Archive-Tar = 2.32
Obsoletes: perl-Archive-Tar <= 2.32
Provides: perl-Archive-Tar = 2.36
Obsoletes: perl-Archive-Tar <= 2.36
Provides: perl-Locale-Maketext-Simple = 0.21
Obsoletes: perl-Locale-Maketext-Simple <= 0.21
Provides: perl-Pod-Escapes = 1.07
Obsoletes: perl-Pod-Escapes <= 1.07
Provides: perl-Pod-Simple = 3.35
Obsoletes: perl-Pod-Simple <= 3.35
Provides: perl-Pod-Simple = 3.40
Obsoletes: perl-Pod-Simple <= 3.40
Provides: perl-ExtUtils-ParseXS = 3.40
Obsoletes: perl-ExtUtils-ParseXS <= 3.40
Provides: perl-CPAN-Meta = 2.150010
Obsoletes: perl-CPAN-Meta <= 2.150010
Provides: perl-CPAN-Meta-YAML = 0.018
Obsoletes: perl-CPAN-Meta-YAML <= 0.018
Provides: perl-ExtUtils-CBuilder = 0.280231
Obsoletes: perl-ExtUtils-CBuilder <= 0.280231
Provides: perl-ExtUtils-CBuilder = 0.280234
Obsoletes: perl-ExtUtils-CBuilder <= 0.280234
Provides: perl-IO-Socket-IP = 0.39
Obsoletes: perl-IO-Socket-IP <= 0.39
Provides: perl-Parse-CPAN-Meta = 2.150010
Obsoletes: perl-Parse-CPAN-Meta <= 2.150010
Provides: perl-PathTools = 3.75
Obsoletes: perl-PathTools <= 3.75
Provides: perl-autodie = 2.29
Obsoletes: perl-autodie <= 2.29
Provides: perl-autodie = 2.32
Obsoletes: perl-autodie <= 2.32
Provides: perl-Test-Harness = 3.42
Obsoletes: perl-Test-Harness <= 3.42
Provides: perl-version = 0.9924
@ -180,7 +179,7 @@ cp -p %{SOURCE3} .
%patch9
%patch11
%patch12 -p1
%patch14 -p1
%patch14
%patch15
%patch17
%patch18
@ -296,9 +295,7 @@ cat << EOF > perl-base-filelist
/usr/lib/perl5/%{pversion}/overloading.pm
/usr/lib/perl5/%{pversion}/parent.pm
/usr/lib/perl5/%{pversion}/strict.pm
/usr/lib/perl5/%{pversion}/unicore/Heavy.pl
/usr/lib/perl5/%{pversion}/utf8.pm
/usr/lib/perl5/%{pversion}/utf8_heavy.pl
/usr/lib/perl5/%{pversion}/vars.pm
/usr/lib/perl5/%{pversion}/version.pm
/usr/lib/perl5/%{pversion}/*-linux-thread-multi*/Data/

View File

@ -7,17 +7,18 @@ as bypass https://bugzilla.suse.com/show_bug.cgi?id=1063176
Signed-off-by: Michel Normand <normand@linux.vnet.ibm.com>
--- ./cpan/Memoize/t/expmod_t.t.orig 2018-03-20 20:06:35.000000000 +0000
+++ ./cpan/Memoize/t/expmod_t.t 2018-09-26 11:05:08.908018123 +0000
@@ -1,5 +1,6 @@
#!/usr/bin/perl
--- ./cpan/Memoize/t/expmod_t.t.orig 2020-06-14 23:01:25.000000000 +0000
+++ ./cpan/Memoize/t/expmod_t.t 2020-10-27 15:29:28.166018437 +0000
@@ -2,6 +2,7 @@
# test caching timeout
+use Test::More skip_all => "ppc workers are too busy";
use lib '..';
use Memoize;
BEGIN {
--- ./dist/Time-HiRes/t/alarm.t.orig 2018-09-26 11:04:59.936040917 +0000
+++ ./dist/Time-HiRes/t/alarm.t 2018-09-26 11:05:08.908018123 +0000
--- ./dist/Time-HiRes/t/alarm.t.orig 2020-10-27 15:29:07.838063807 +0000
+++ ./dist/Time-HiRes/t/alarm.t 2020-10-27 15:29:28.166018437 +0000
@@ -1,6 +1,6 @@
use strict;
@ -26,8 +27,8 @@ Signed-off-by: Michel Normand <normand@linux.vnet.ibm.com>
BEGIN { push @INC, '.' }
use t::Watchdog;
--- ./dist/Time-HiRes/t/clock.t.orig 2018-09-26 11:04:59.936040917 +0000
+++ ./dist/Time-HiRes/t/clock.t 2018-09-26 11:05:08.908018123 +0000
--- ./dist/Time-HiRes/t/clock.t.orig 2020-10-27 15:29:07.838063807 +0000
+++ ./dist/Time-HiRes/t/clock.t 2020-10-27 15:29:28.166018437 +0000
@@ -1,6 +1,6 @@
use strict;
@ -36,8 +37,8 @@ Signed-off-by: Michel Normand <normand@linux.vnet.ibm.com>
BEGIN { push @INC, '.' }
use t::Watchdog;
--- ./dist/Time-HiRes/t/nanosleep.t.orig 2018-09-26 11:05:08.908018123 +0000
+++ ./dist/Time-HiRes/t/nanosleep.t 2018-09-26 11:06:17.203844610 +0000
--- ./dist/Time-HiRes/t/nanosleep.t.orig 2020-06-14 23:01:25.000000000 +0000
+++ ./dist/Time-HiRes/t/nanosleep.t 2020-10-27 15:29:28.166018437 +0000
@@ -8,7 +8,7 @@ BEGIN {
}
}
@ -47,8 +48,8 @@ Signed-off-by: Michel Normand <normand@linux.vnet.ibm.com>
BEGIN { push @INC, '.' }
use t::Watchdog;
--- ./dist/Time-HiRes/t/usleep.t.orig 2018-09-26 11:04:59.936040917 +0000
+++ ./dist/Time-HiRes/t/usleep.t 2018-09-26 11:05:08.908018123 +0000
--- ./dist/Time-HiRes/t/usleep.t.orig 2020-10-27 15:29:07.838063807 +0000
+++ ./dist/Time-HiRes/t/usleep.t 2020-10-27 15:29:28.166018437 +0000
@@ -8,7 +8,7 @@ BEGIN {
}
}
@ -58,8 +59,8 @@ Signed-off-by: Michel Normand <normand@linux.vnet.ibm.com>
BEGIN { push @INC, '.' }
use t::Watchdog;
--- ./t/op/alarm.t.orig 2018-05-21 10:44:04.000000000 +0000
+++ ./t/op/alarm.t 2018-09-26 11:05:08.908018123 +0000
--- ./t/op/alarm.t.orig 2020-06-14 23:01:25.000000000 +0000
+++ ./t/op/alarm.t 2020-10-27 15:29:28.170018428 +0000
@@ -11,6 +11,7 @@ use Config;
if ( !$Config{d_alarm} ) {
skip_all("alarm() not implemented on this platform");
@ -68,8 +69,8 @@ Signed-off-by: Michel Normand <normand@linux.vnet.ibm.com>
plan tests => 5;
my $Perl = which_perl();
--- ./t/op/sigsystem.t.orig 2018-03-20 20:06:37.000000000 +0000
+++ ./t/op/sigsystem.t 2018-09-26 11:05:08.908018123 +0000
--- ./t/op/sigsystem.t.orig 2020-06-14 23:01:25.000000000 +0000
+++ ./t/op/sigsystem.t 2020-10-27 15:29:28.170018428 +0000
@@ -11,6 +11,7 @@ use strict;
use constant TRUE => ($^X, '-e', 'exit 0');
use Data::Dumper;
@ -78,8 +79,8 @@ Signed-off-by: Michel Normand <normand@linux.vnet.ibm.com>
plan tests => 4;
SKIP: {
--- ./t/op/sselect.t.orig 2018-05-21 12:29:23.000000000 +0000
+++ ./t/op/sselect.t 2018-09-26 11:05:08.908018123 +0000
--- ./t/op/sselect.t.orig 2020-06-14 23:01:25.000000000 +0000
+++ ./t/op/sselect.t 2020-10-27 15:29:28.170018428 +0000
@@ -13,6 +13,8 @@ BEGIN {
skip_all("Win32 miniperl has no socket select")
if $^O eq "MSWin32" && is_miniperl();
@ -89,8 +90,8 @@ Signed-off-by: Michel Normand <normand@linux.vnet.ibm.com>
plan (16);
my $blank = "";
--- ./t/op/stat.t.orig 2018-05-21 12:29:23.000000000 +0000
+++ ./t/op/stat.t 2018-09-26 11:05:08.908018123 +0000
--- ./t/op/stat.t.orig 2020-06-14 23:01:25.000000000 +0000
+++ ./t/op/stat.t 2020-10-27 15:29:28.170018428 +0000
@@ -9,6 +9,7 @@ BEGIN {
use strict;
use warnings;

View File

@ -1,8 +1,6 @@
Index: perl-5.26.1/ext/POSIX/POSIX.xs
===================================================================
--- perl-5.26.1.orig/ext/POSIX/POSIX.xs
+++ perl-5.26.1/ext/POSIX/POSIX.xs
@@ -3158,6 +3158,10 @@ sigaction(sig, optaction, oldaction = 0)
--- ./ext/POSIX/POSIX.xs.orig 2020-06-14 23:01:25.000000000 +0000
+++ ./ext/POSIX/POSIX.xs 2020-10-27 10:53:50.744531872 +0000
@@ -3110,6 +3110,10 @@ sigaction(sig, optaction, oldaction = 0)
/* Set up any desired flags. */
svp = hv_fetchs(action, "FLAGS", FALSE);
act.sa_flags = svp ? SvIV(*svp) : 0;
@ -11,5 +9,5 @@ Index: perl-5.26.1/ext/POSIX/POSIX.xs
+ act.sa_flags |= SA_SIGINFO;
+#endif
/* Don't worry about cleaning up *sigsvp if this fails,
* because that means we tried to disposition a
/* Safe signals use "csighandler", which vectors through the
PL_sighandlerp pointer when it's safe to do so.