Script 'mail_helper' called by obssrc
Hello community,
here is the log from the commit of package perl-Set-Object for openSUSE:Factory
checked in at 2022-01-28 22:12:38
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-Set-Object (Old)
and /work/SRC/openSUSE:Factory/.perl-Set-Object.new.1898 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Set-Object"
Fri Jan 28 22:12:38 2022 rev:34 rq:949648 version:1.42
Changes:
--------
--- /work/SRC/openSUSE:Factory/perl-Set-Object/perl-Set-Object.changes
2021-01-19 16:04:11.351560261 +0100
+++
/work/SRC/openSUSE:Factory/.perl-Set-Object.new.1898/perl-Set-Object.changes
2022-01-28 22:13:22.258547177 +0100
@@ -1,0 +2,14 @@
+Sat Jan 22 03:08:30 UTC 2022 - Tina M??ller <[email protected]>
+
+- updated to 1.42
+ see /usr/share/doc/packages/perl-Set-Object/Changes.pod
+
+ =head1 1.42, 2022-01-21
+ =over
+ =item *
+ Fix C<%h={}> warning, by Pauwel Coppieters
+ =item *
+ add F<examples/slow-sort.pl>. see RT #90070
+ =back
+
+-------------------------------------------------------------------
Old:
----
Set-Object-1.41.tar.gz
New:
----
Set-Object-1.42.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ perl-Set-Object.spec ++++++
--- /var/tmp/diff_new_pack.MSk5tX/_old 2022-01-28 22:13:22.706544112 +0100
+++ /var/tmp/diff_new_pack.MSk5tX/_new 2022-01-28 22:13:22.706544112 +0100
@@ -1,7 +1,7 @@
#
# spec file for package perl-Set-Object
#
-# Copyright (c) 2021 SUSE LLC
+# Copyright (c) 2022 SUSE LLC
#
# All modifications and additions to the file contributed by third parties
# remain the property of their copyright owners, unless otherwise agreed
@@ -18,7 +18,7 @@
%define cpan_name Set-Object
Name: perl-Set-Object
-Version: 1.41
+Version: 1.42
Release: 0
Summary: Set of objects and strings
License: Artistic-2.0
@@ -60,7 +60,7 @@
%perl_gen_filelist
%files -f %{name}.files
-%doc README
+%doc examples README
%license LICENSE
%changelog
++++++ Set-Object-1.41.tar.gz -> Set-Object-1.42.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Set-Object-1.41/Changes.pod
new/Set-Object-1.42/Changes.pod
--- old/Set-Object-1.41/Changes.pod 2021-01-17 20:12:04.000000000 +0100
+++ new/Set-Object-1.42/Changes.pod 2022-01-21 14:05:25.000000000 +0100
@@ -5,6 +5,20 @@
REVISION HISTORY - Set::Object
+=head1 1.42, 2022-01-21
+
+=over
+
+=item *
+
+Fix C<%h={}> warning, by Pauwel Coppieters
+
+=item *
+
+add F<examples/slow-sort.pl>. see RT #90070
+
+=back
+
=head1 1.41, 2021-01-17
=over
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Set-Object-1.41/MANIFEST new/Set-Object-1.42/MANIFEST
--- old/Set-Object-1.41/MANIFEST 2021-01-17 20:13:48.000000000 +0100
+++ new/Set-Object-1.42/MANIFEST 2022-01-21 14:18:47.000000000 +0100
@@ -1,4 +1,5 @@
Changes.pod
+examples/slow-sort.pl
INSTALL.SKIP
LICENSE
lib/Set/Object.pm
@@ -62,5 +63,6 @@
t/scalar/symmdiff.t
t/scalar/union.t
t/scalar/unique.t
+META.yml Module YAML meta-data (added by
MakeMaker)
+META.json Module JSON meta-data (added by
MakeMaker)
SIGNATURE Public-key signature (added by
MakeMaker)
-META.yml Module meta-data (added by MakeMaker)
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Set-Object-1.41/META.json
new/Set-Object-1.42/META.json
--- old/Set-Object-1.41/META.json 1970-01-01 01:00:00.000000000 +0100
+++ new/Set-Object-1.42/META.json 2022-01-21 14:18:46.000000000 +0100
@@ -0,0 +1,59 @@
+{
+ "abstract" : "Unordered collections (sets) of Perl Objects",
+ "author" : [
+ "Jean-Louis Leroy, Sam Vilain and Reini Urban"
+ ],
+ "dynamic_config" : 0,
+ "generated_by" : "ExtUtils::MakeMaker version 7.38, CPAN::Meta::Converter
version 2.150010",
+ "license" : [
+ "artistic_2"
+ ],
+ "meta-spec" : {
+ "url" : "http://search.cpan.org/perldoc?CPAN::Meta::Spec";,
+ "version" : 2
+ },
+ "name" : "Set-Object",
+ "no_index" : {
+ "directory" : [
+ "t",
+ "inc"
+ ]
+ },
+ "prereqs" : {
+ "build" : {
+ "requires" : {
+ "ExtUtils::MakeMaker" : "0"
+ }
+ },
+ "configure" : {
+ "requires" : {
+ "ExtUtils::MakeMaker" : "0"
+ }
+ },
+ "develop" : {
+ "requires" : {
+ "Moose" : "0",
+ "Test::LeakTrace" : "0"
+ }
+ },
+ "runtime" : {
+ "requires" : {
+ "Scalar::Util" : "0",
+ "Test::More" : "0"
+ }
+ }
+ },
+ "release_status" : "stable",
+ "resources" : {
+ "license" : [
+ "http://dev.perl.org/licenses/";
+ ],
+ "repository" : {
+ "type" : "git",
+ "url" : "git://github.com/rurban/Set-Object.git",
+ "web" : "https://github.com/rurban/Set-Object";
+ }
+ },
+ "version" : "1.42",
+ "x_serialization_backend" : "JSON::PP version 2.97001"
+}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Set-Object-1.41/META.yml new/Set-Object-1.42/META.yml
--- old/Set-Object-1.41/META.yml 2021-01-17 20:13:48.000000000 +0100
+++ new/Set-Object-1.42/META.yml 2022-01-21 14:18:46.000000000 +0100
@@ -1,36 +1,27 @@
---- #YAML:1.0
-name: Set-Object
-version: 1.41
-abstract: Unordered collections (sets) of Perl Objects
+---
+abstract: 'Unordered collections (sets) of Perl Objects'
author:
- - Jean-Louis Leroy, Sam Vilain and Reini Urban
-license: Artistic_2
-distribution_type: module
-configure_requires:
- ExtUtils::MakeMaker: 0
+ - 'Jean-Louis Leroy, Sam Vilain and Reini Urban'
build_requires:
- ExtUtils::MakeMaker: 0
+ ExtUtils::MakeMaker: '0'
+configure_requires:
+ ExtUtils::MakeMaker: '0'
+dynamic_config: 0
+generated_by: 'ExtUtils::MakeMaker version 7.38, CPAN::Meta::Converter version
2.150010'
+license: artistic_2
+meta-spec:
+ url: http://module-build.sourceforge.net/META-spec-v1.4.html
+ version: '1.4'
+name: Set-Object
+no_index:
+ directory:
+ - t
+ - inc
requires:
- Scalar::Util: 0
- Test::More: 0
+ Scalar::Util: '0'
+ Test::More: '0'
resources:
- license:
- - http://dev.perl.org/licenses/
- repository:
- type: git
- url: git://github.com/rurban/Set-Object.git
- web: https://github.com/rurban/Set-Object
-no_index:
- directory:
- - t
- - inc
-generated_by: ExtUtils::MakeMaker version 6.55_02
-meta-spec:
- url: http://module-build.sourceforge.net/META-spec-v1.4.html
- version: 2
-dynamic_config: 0
-prereqs:
- develop:
- requires:
- Moose: 0
- Test::LeakTrace: 0
+ license: http://dev.perl.org/licenses/
+ repository: git://github.com/rurban/Set-Object.git
+version: '1.42'
+x_serialization_backend: 'CPAN::Meta::YAML version 0.018'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Set-Object-1.41/SIGNATURE
new/Set-Object-1.42/SIGNATURE
--- old/Set-Object-1.41/SIGNATURE 2021-01-17 20:13:50.000000000 +0100
+++ new/Set-Object-1.42/SIGNATURE 2022-01-21 14:18:48.000000000 +0100
@@ -14,15 +14,17 @@
-----BEGIN PGP SIGNED MESSAGE-----
Hash: RIPEMD160
-SHA256 a9a9813c900274a41321387a26f5a8aff0825047f491c9931d5ab9beef55cee5
Changes.pod
+SHA256 c136dd9d7c4c1deb75512905d1bd79767ee0565dbbc7dae79540086fb48969dc
Changes.pod
SHA256 9659bf9325c647b998f10fc0534e1ab59655fa7315c92cee85aefcbfeeaf855b
INSTALL.SKIP
SHA256 59752181339961205d48a3609d320ef4238ebdb7086bd1293985dba4c2bf5c92 LICENSE
-SHA256 5a4611f82bafce31b73ecaa7086a31c1c8ff6c5afb0ed2499e6313aec537a4c5
MANIFEST
-SHA256 4692d20356c3cc890d083d604d4de74dadd9136104007120a42208a0f66c3a15
META.yml
+SHA256 18aec9cd6b74a68ba074e48dcd4036e02c88b937dc6ed97f265b595b04b0c937
MANIFEST
+SHA256 e2077fedf51577069b8a97a3b51e97961530fde534ce68802454c781714657da
META.json
+SHA256 2e6ca76a97b09c9df576ff172ef94a6095acf833617214d8b6019d845319060b
META.yml
SHA256 c0b6d4286272e619c627e65268803c68001d06ece90603a832eacb3276af0ccb
Makefile.PL
SHA256 53901adffbdbfe423df155889ad74a45267d0789edd75b9f1ea428a7834438db
Object.xs
SHA256 9bc53b65ce28f72fcce7b04869313935783e02d3411a0e739106c4e32b5474cc README
-SHA256 70d942ec6a56ad8f712f825356b0e92d5ee5d67c8491f97c68b06c6dd0a02a72
lib/Set/Object.pm
+SHA256 bf0db74611cf75fe8ded4d81dae7150b6b37ad3935209390310885726ad8a7aa
examples/slow-sort.pl
+SHA256 4770e607a654734be416b16585b0e22b2e81897986795aae08bac9e951cc6649
lib/Set/Object.pm
SHA256 4dfcd71401b31614aca18e8e2ffbcebc654c143aa40b5bbdcb42091e34c6315c
lib/Set/Object/Weak.pm
SHA256 b11d60d5d91f0082736c519bf98679969308bdd02129f4051f9f3b35b70b225d
ppport.h
SHA256 4fe1c9d0343bd3a2838ab531ecbeabedde55e89a955df7de8df1500176e913b6
t/ingy/arrayref.t
@@ -81,12 +83,12 @@
SHA256 09efd5c9e09051dfa745bc05bf2dd5a8d674fa417eaf1a5e3976ce36558051c4 typemap
-----BEGIN PGP SIGNATURE-----
-iQEzBAEBAwAdFiEEKJWogdNCcPq/6PdHtPYzOeZdZBQFAmAEjG4ACgkQtPYzOeZd
-ZBTOewf/UENyWZGN1rjPdy+bctwvN6g4MCRhGuY7x72n0q9/3bgG3PE4NCKVkeHH
-7v3EyygvhpXhGRQFP/xL/45htQDZPcm0uEy2InfsIZDlq/fkeIxdQ/SvjNE/5qAV
-ZT/7tMhPWbm3rjVatF2J6cgIZG0C0zIgExuzhkje1oFX9ZZmZ11dBIMeaDvFHX1G
-t4z7JebelvUAlsDku/HRXwz1/aem+8r9juCmTEDS/AkvpSUhICVsgxvXidhjeUgJ
-+3INqnqa/7ng5sQVzP9COWlpyuE02l+vwPt/EylpLZN0FLeY19auPRxe+CoodPU6
-x/Vp+Opnbq1SATrQzgLDNsJ68XRDcg==
-=JSRi
+iQEzBAEBAwAdFiEEKJWogdNCcPq/6PdHtPYzOeZdZBQFAmHqsrcACgkQtPYzOeZd
+ZBQPSAgAm3ZHT/4d4ZkVtV8bfdyNaVdgyQT6tcfGTGW8rq7lamtTMRJJPg2WplpG
+bjZfn7IfBi10BCmNUZUWNi70vAK6reqtdnXRmO87bNUWFLMCcD7LGI6h0gXXcmVg
+5ci9NH1KeKB9tYnaVDXDWbhrYGXSccQrH8WtOFr9tGCAyB/sW3wApXxXhwQxA0Ho
+cZwJ/Sd0h9VQbCSDNEXSMSoLZlyxtsMYq2bJ0PbCl9n07L2MU976hxjNhZzybbxU
+4IP4uOJn/gYeAGnwDXlrzthGiZ+mxaod2N0DHOSU8HGxsZFM8CtUIEus4vfT478L
+iWO9xTtcOqTMC1EJ2BM7WQIJRQG1ow==
+=VUNv
-----END PGP SIGNATURE-----
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Set-Object-1.41/examples/slow-sort.pl
new/Set-Object-1.42/examples/slow-sort.pl
--- old/Set-Object-1.41/examples/slow-sort.pl 1970-01-01 01:00:00.000000000
+0100
+++ new/Set-Object-1.42/examples/slow-sort.pl 2021-01-17 20:47:18.000000000
+0100
@@ -0,0 +1,31 @@
+#!/bin/env perl
+use strict;
+use warnings;
+use List::Util qw/shuffle/;
+use Set::Object 1.35 qw/set/;
+my @list = shuffle(1..1000);
+use Benchmark 'cmpthese';
+
+my $lil_set = set(@list);
+my $x = 0;
+cmpthese(-3,
+ {
+ 'Fast set->members' =>
+ sub {
+ foreach my $item ($lil_set->members()) {
+ $x += $item;
+ $x += $item;
+ $x += $item;
+ $x += $item;
+ $x += $item;
+ }},
+ 'Slow @$set' =>
+ sub {
+ foreach my $item (@{$lil_set}) {
+ $x += $item;
+ $x += $item;
+ $x += $item;
+ $x += $item;
+ $x += $item;
+ }}});
+__END__
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Set-Object-1.41/lib/Set/Object.pm
new/Set-Object-1.42/lib/Set/Object.pm
--- old/Set-Object-1.41/lib/Set/Object.pm 2021-01-17 20:12:23.000000000
+0100
+++ new/Set-Object-1.42/lib/Set/Object.pm 2022-01-21 14:03:36.000000000
+0100
@@ -475,6 +475,19 @@
H lookup: 7 secs ( 7.14 usr 0.00 sys = 7.14 cpu)
S lookup: 6 secs ( 5.94 usr 0.00 sys = 5.94 cpu)
+This benchmark compares the unsorted members method, against the sorted @$
list context.
+
+ perl -MBenchmark -mList::Util -mSet::Object -e'
+ $set = Set::Object::set (List::Util::shuffle(1..1000));
+ Benchmark::timethese(-3, {
+ "Slow \@\$set " => sub { $i++ for @$set; },
+ "Fast set->members" => sub { $i++ for $set->members(); },
+ });'
+
+ Benchmark: running Fast set->members, Slow @$set for at least 3 CPU
seconds...
+ Fast set->members: 4 wallclock secs ( 3.17 usr + 0.00 sys = 3.17 CPU) @
9104.42/s (n=28861)
+ Slow @$set : 4 wallclock secs ( 3.23 usr + 0.00 sys = 3.23 CPU) @
1689.16/s (n=5456)
+
=head1 THREAD SAFETY
This module is not thread-safe.
@@ -529,7 +542,7 @@
@EXPORT_OK = qw( ish_int is_int is_string is_double blessed reftype
refaddr is_overloaded is_object is_key set weak_set );
-$VERSION = '1.41';
+$VERSION = '1.42';
bootstrap Set::Object $VERSION;
@@ -742,7 +755,7 @@
'<=' => \&subset,
'>=' => \&superset,
'%{}' => sub { my $self = shift;
- my %h = {};
+ my %h = ();
tie %h, $self->tie_hash_pkg, [], $self;
\%h },
'@{}' => sub { my $self = shift;
