Hello community, here is the log from the commit of package perl-MCE for openSUSE:Factory checked in at 2019-09-05 12:44:01 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-MCE (Old) and /work/SRC/openSUSE:Factory/.perl-MCE.new.7948 (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-MCE" Thu Sep 5 12:44:01 2019 rev:8 rq:728265 version:1.847 Changes: -------- --- /work/SRC/openSUSE:Factory/perl-MCE/perl-MCE.changes 2019-08-28 18:35:58.349278589 +0200 +++ /work/SRC/openSUSE:Factory/.perl-MCE.new.7948/perl-MCE.changes 2019-09-05 12:44:06.951458179 +0200 @@ -1,0 +2,16 @@ +Wed Sep 4 07:48:26 UTC 2019 - <timueller+p...@suse.de> + +- updated to 1.847 + see /usr/share/doc/packages/perl-MCE/Changes + + 1.847 Mon Sep 02 23:30:00 EST 2019 + + * Obsolete RedHat MCE-1.840-Sereal-deps.patch file. This patch file + is no longer needed and finally resolved with this release. + + * PDL random numbers now unique between threads. Thank you, PerlMonks (vr). + See https://www.perlmonks.org/?node_id=1214439. + + * Replaced "PF_UNIX" with "AF_UNIX" in MCE::Util. + +------------------------------------------------------------------- Old: ---- MCE-1.846.tar.gz New: ---- MCE-1.847.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-MCE.spec ++++++ --- /var/tmp/diff_new_pack.rP57Bd/_old 2019-09-05 12:44:07.643458044 +0200 +++ /var/tmp/diff_new_pack.rP57Bd/_new 2019-09-05 12:44:07.651458042 +0200 @@ -17,7 +17,7 @@ Name: perl-MCE -Version: 1.846 +Version: 1.847 Release: 0 %define cpan_name MCE Summary: Many-Core Engine for Perl providing parallel processing capabilities ++++++ MCE-1.846.tar.gz -> MCE-1.847.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MCE-1.846/Changes new/MCE-1.847/Changes --- old/MCE-1.846/Changes 2019-08-27 03:42:33.000000000 +0200 +++ new/MCE-1.847/Changes 2019-09-03 05:46:27.000000000 +0200 @@ -1,6 +1,16 @@ Revision history for Perl module MCE. +1.847 Mon Sep 02 23:30:00 EST 2019 + + * Obsolete RedHat MCE-1.840-Sereal-deps.patch file. This patch file + is no longer needed and finally resolved with this release. + + * PDL random numbers now unique between threads. Thank you, PerlMonks (vr). + See https://www.perlmonks.org/?node_id=1214439. + + * Replaced "PF_UNIX" with "AF_UNIX" in MCE::Util. + 1.846 Mon Aug 26 21:30:00 EST 2019 * Fixed code tags in documentation. Thank you, Mohammad S Anwar. @@ -135,7 +145,7 @@ * Improved Queue await and dequeue performance on the Windows platform. - * Added chameneos-redux parallel demonstrations on Github: + * Added chameneos-redux parallel demonstrations on GitHub: https://github.com/marioroy/mce-examples/tree/master/chameneos 1.833 Thu Dec 28 16:00:00 EST 2017 @@ -305,7 +315,7 @@ * Improved reliability when running MCE with threads. - * Added parallel Net::Pcap and Ping demonstrations on Github: + * Added parallel Net::Pcap and Ping demonstrations on GitHub: https://github.com/marioroy/mce-examples/tree/master/network * Optimized 'dequeue' method in MCE::Queue. @@ -383,7 +393,7 @@ * Imply posix_exit => 1 if Gearman::XS or Gearman::Util is present during MCE construction. - * Added MCE + Gearman demonstrations (xs and non-xs) on Github: + * Added MCE + Gearman demonstrations (xs and non-xs) on GitHub: https://github.com/marioroy/mce-examples/tree/master/gearman_xs https://github.com/marioroy/mce-examples/tree/master/gearman @@ -526,7 +536,7 @@ * Enabled auto-destroy for MCE objects. * Enabled freeze callbacks for Sereal. - * Switched bug tracking to Github. + * Switched bug tracking to GitHub. * Tweaked test scripts. 1.703 Sat Mar 19 23:00:00 EST 2016 @@ -976,7 +986,7 @@ [ENHANCEMENTS] - * The mce-sandbox demo has been released on Github demonstrating + * The mce-sandbox demo has been released on GitHub demonstrating Perl + MCE + Inline::C. The theme is Prime Numbers. This journey which began 2 years ago has been completed. There is also the mce-sort exercise demonstrating Perl + MCE + External C. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MCE-1.846/META.json new/MCE-1.847/META.json --- old/MCE-1.846/META.json 2019-08-27 03:28:28.000000000 +0200 +++ new/MCE-1.847/META.json 2019-09-03 06:20:46.000000000 +0200 @@ -65,123 +65,123 @@ "provides" : { "MCE" : { "file" : "lib/MCE.pm", - "version" : "1.846" + "version" : "1.847" }, "MCE::Candy" : { "file" : "lib/MCE/Candy.pm", - "version" : "1.846" + "version" : "1.847" }, "MCE::Channel" : { "file" : "lib/MCE/Channel.pm", - "version" : "1.846" + "version" : "1.847" }, "MCE::Channel::Mutex" : { "file" : "lib/MCE/Channel/Mutex.pm", - "version" : "1.846" + "version" : "1.847" }, "MCE::Channel::Simple" : { "file" : "lib/MCE/Channel/Simple.pm", - "version" : "1.846" + "version" : "1.847" }, "MCE::Channel::Threads" : { "file" : "lib/MCE/Channel/Threads.pm", - "version" : "1.846" + "version" : "1.847" }, "MCE::Child" : { "file" : "lib/MCE/Child.pm", - "version" : "1.846" + "version" : "1.847" }, "MCE::Core::Input::Generator" : { "file" : "lib/MCE/Core/Input/Generator.pm", - "version" : "1.846" + "version" : "1.847" }, "MCE::Core::Input::Handle" : { "file" : "lib/MCE/Core/Input/Handle.pm", - "version" : "1.846" + "version" : "1.847" }, "MCE::Core::Input::Iterator" : { "file" : "lib/MCE/Core/Input/Iterator.pm", - "version" : "1.846" + "version" : "1.847" }, "MCE::Core::Input::Request" : { "file" : "lib/MCE/Core/Input/Request.pm", - "version" : "1.846" + "version" : "1.847" }, "MCE::Core::Input::Sequence" : { "file" : "lib/MCE/Core/Input/Sequence.pm", - "version" : "1.846" + "version" : "1.847" }, "MCE::Core::Manager" : { "file" : "lib/MCE/Core/Manager.pm", - "version" : "1.846" + "version" : "1.847" }, "MCE::Core::Validation" : { "file" : "lib/MCE/Core/Validation.pm", - "version" : "1.846" + "version" : "1.847" }, "MCE::Core::Worker" : { "file" : "lib/MCE/Core/Worker.pm", - "version" : "1.846" + "version" : "1.847" }, "MCE::Flow" : { "file" : "lib/MCE/Flow.pm", - "version" : "1.846" + "version" : "1.847" }, "MCE::Grep" : { "file" : "lib/MCE/Grep.pm", - "version" : "1.846" + "version" : "1.847" }, "MCE::Loop" : { "file" : "lib/MCE/Loop.pm", - "version" : "1.846" + "version" : "1.847" }, "MCE::Map" : { "file" : "lib/MCE/Map.pm", - "version" : "1.846" + "version" : "1.847" }, "MCE::Mutex" : { "file" : "lib/MCE/Mutex.pm", - "version" : "1.846" + "version" : "1.847" }, "MCE::Mutex::Channel" : { "file" : "lib/MCE/Mutex/Channel.pm", - "version" : "1.846" + "version" : "1.847" }, "MCE::Mutex::Channel2" : { "file" : "lib/MCE/Mutex/Channel2.pm", - "version" : "1.846" + "version" : "1.847" }, "MCE::Mutex::Flock" : { "file" : "lib/MCE/Mutex/Flock.pm", - "version" : "1.846" + "version" : "1.847" }, "MCE::Queue" : { "file" : "lib/MCE/Queue.pm", - "version" : "1.846" + "version" : "1.847" }, "MCE::Relay" : { "file" : "lib/MCE/Relay.pm", - "version" : "1.846" + "version" : "1.847" }, "MCE::Signal" : { "file" : "lib/MCE/Signal.pm", - "version" : "1.846" + "version" : "1.847" }, "MCE::Step" : { "file" : "lib/MCE/Step.pm", - "version" : "1.846" + "version" : "1.847" }, "MCE::Stream" : { "file" : "lib/MCE/Stream.pm", - "version" : "1.846" + "version" : "1.847" }, "MCE::Subs" : { "file" : "lib/MCE/Subs.pm", - "version" : "1.846" + "version" : "1.847" }, "MCE::Util" : { "file" : "lib/MCE/Util.pm", - "version" : "1.846" + "version" : "1.847" } }, "release_status" : "stable", @@ -197,5 +197,5 @@ "url" : "https://github.com/marioroy/mce-perl.git"; } }, - "version" : "1.846" + "version" : "1.847" } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MCE-1.846/META.yml new/MCE-1.847/META.yml --- old/MCE-1.846/META.yml 2019-08-27 03:28:28.000000000 +0200 +++ new/MCE-1.847/META.yml 2019-09-03 06:20:46.000000000 +0200 @@ -25,94 +25,94 @@ provides: MCE: file: lib/MCE.pm - version: '1.846' + version: '1.847' MCE::Candy: file: lib/MCE/Candy.pm - version: '1.846' + version: '1.847' MCE::Channel: file: lib/MCE/Channel.pm - version: '1.846' + version: '1.847' MCE::Channel::Mutex: file: lib/MCE/Channel/Mutex.pm - version: '1.846' + version: '1.847' MCE::Channel::Simple: file: lib/MCE/Channel/Simple.pm - version: '1.846' + version: '1.847' MCE::Channel::Threads: file: lib/MCE/Channel/Threads.pm - version: '1.846' + version: '1.847' MCE::Child: file: lib/MCE/Child.pm - version: '1.846' + version: '1.847' MCE::Core::Input::Generator: file: lib/MCE/Core/Input/Generator.pm - version: '1.846' + version: '1.847' MCE::Core::Input::Handle: file: lib/MCE/Core/Input/Handle.pm - version: '1.846' + version: '1.847' MCE::Core::Input::Iterator: file: lib/MCE/Core/Input/Iterator.pm - version: '1.846' + version: '1.847' MCE::Core::Input::Request: file: lib/MCE/Core/Input/Request.pm - version: '1.846' + version: '1.847' MCE::Core::Input::Sequence: file: lib/MCE/Core/Input/Sequence.pm - version: '1.846' + version: '1.847' MCE::Core::Manager: file: lib/MCE/Core/Manager.pm - version: '1.846' + version: '1.847' MCE::Core::Validation: file: lib/MCE/Core/Validation.pm - version: '1.846' + version: '1.847' MCE::Core::Worker: file: lib/MCE/Core/Worker.pm - version: '1.846' + version: '1.847' MCE::Flow: file: lib/MCE/Flow.pm - version: '1.846' + version: '1.847' MCE::Grep: file: lib/MCE/Grep.pm - version: '1.846' + version: '1.847' MCE::Loop: file: lib/MCE/Loop.pm - version: '1.846' + version: '1.847' MCE::Map: file: lib/MCE/Map.pm - version: '1.846' + version: '1.847' MCE::Mutex: file: lib/MCE/Mutex.pm - version: '1.846' + version: '1.847' MCE::Mutex::Channel: file: lib/MCE/Mutex/Channel.pm - version: '1.846' + version: '1.847' MCE::Mutex::Channel2: file: lib/MCE/Mutex/Channel2.pm - version: '1.846' + version: '1.847' MCE::Mutex::Flock: file: lib/MCE/Mutex/Flock.pm - version: '1.846' + version: '1.847' MCE::Queue: file: lib/MCE/Queue.pm - version: '1.846' + version: '1.847' MCE::Relay: file: lib/MCE/Relay.pm - version: '1.846' + version: '1.847' MCE::Signal: file: lib/MCE/Signal.pm - version: '1.846' + version: '1.847' MCE::Step: file: lib/MCE/Step.pm - version: '1.846' + version: '1.847' MCE::Stream: file: lib/MCE/Stream.pm - version: '1.846' + version: '1.847' MCE::Subs: file: lib/MCE/Subs.pm - version: '1.846' + version: '1.847' MCE::Util: file: lib/MCE/Util.pm - version: '1.846' + version: '1.847' recommends: Sereal::Decoder: '3.015' Sereal::Encoder: '3.015' @@ -139,4 +139,4 @@ homepage: https://github.com/marioroy/mce-perl license: http://dev.perl.org/licenses/ repository: https://github.com/marioroy/mce-perl.git -version: '1.846' +version: '1.847' diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MCE-1.846/Makefile.PL new/MCE-1.847/Makefile.PL --- old/MCE-1.846/Makefile.PL 2019-08-27 03:28:28.000000000 +0200 +++ new/MCE-1.847/Makefile.PL 2019-09-03 06:20:46.000000000 +0200 @@ -17,7 +17,7 @@ ABSTRACT => 'Many-Core Engine for Perl providing parallel processing capabilities', AUTHOR => 'Mario E. Roy <marioeroy AT gmail DOT com>', NAME => 'MCE', - VERSION => '1.846', + VERSION => '1.847', EXE_FILES => [ @exe_files ], @@ -68,123 +68,123 @@ 'provides' => { 'MCE' => { 'file' => 'lib/MCE.pm', - 'version' => '1.846' + 'version' => '1.847' }, 'MCE::Candy' => { 'file' => 'lib/MCE/Candy.pm', - 'version' => '1.846' + 'version' => '1.847' }, 'MCE::Channel' => { 'file' => 'lib/MCE/Channel.pm', - 'version' => '1.846' + 'version' => '1.847' }, 'MCE::Channel::Mutex' => { 'file' => 'lib/MCE/Channel/Mutex.pm', - 'version' => '1.846' + 'version' => '1.847' }, 'MCE::Channel::Simple' => { 'file' => 'lib/MCE/Channel/Simple.pm', - 'version' => '1.846' + 'version' => '1.847' }, 'MCE::Channel::Threads' => { 'file' => 'lib/MCE/Channel/Threads.pm', - 'version' => '1.846' + 'version' => '1.847' }, 'MCE::Child' => { 'file' => 'lib/MCE/Child.pm', - 'version' => '1.846' + 'version' => '1.847' }, 'MCE::Core::Input::Generator' => { 'file' => 'lib/MCE/Core/Input/Generator.pm', - 'version' => '1.846' + 'version' => '1.847' }, 'MCE::Core::Input::Handle' => { 'file' => 'lib/MCE/Core/Input/Handle.pm', - 'version' => '1.846' + 'version' => '1.847' }, 'MCE::Core::Input::Iterator' => { 'file' => 'lib/MCE/Core/Input/Iterator.pm', - 'version' => '1.846' + 'version' => '1.847' }, 'MCE::Core::Input::Request' => { 'file' => 'lib/MCE/Core/Input/Request.pm', - 'version' => '1.846' + 'version' => '1.847' }, 'MCE::Core::Input::Sequence' => { 'file' => 'lib/MCE/Core/Input/Sequence.pm', - 'version' => '1.846' + 'version' => '1.847' }, 'MCE::Core::Manager' => { 'file' => 'lib/MCE/Core/Manager.pm', - 'version' => '1.846' + 'version' => '1.847' }, 'MCE::Core::Validation' => { 'file' => 'lib/MCE/Core/Validation.pm', - 'version' => '1.846' + 'version' => '1.847' }, 'MCE::Core::Worker' => { 'file' => 'lib/MCE/Core/Worker.pm', - 'version' => '1.846' + 'version' => '1.847' }, 'MCE::Flow' => { 'file' => 'lib/MCE/Flow.pm', - 'version' => '1.846' + 'version' => '1.847' }, 'MCE::Grep' => { 'file' => 'lib/MCE/Grep.pm', - 'version' => '1.846' + 'version' => '1.847' }, 'MCE::Loop' => { 'file' => 'lib/MCE/Loop.pm', - 'version' => '1.846' + 'version' => '1.847' }, 'MCE::Map' => { 'file' => 'lib/MCE/Map.pm', - 'version' => '1.846' + 'version' => '1.847' }, 'MCE::Mutex' => { 'file' => 'lib/MCE/Mutex.pm', - 'version' => '1.846' + 'version' => '1.847' }, 'MCE::Mutex::Channel' => { 'file' => 'lib/MCE/Mutex/Channel.pm', - 'version' => '1.846' + 'version' => '1.847' }, 'MCE::Mutex::Channel2' => { 'file' => 'lib/MCE/Mutex/Channel2.pm', - 'version' => '1.846' + 'version' => '1.847' }, 'MCE::Mutex::Flock' => { 'file' => 'lib/MCE/Mutex/Flock.pm', - 'version' => '1.846' + 'version' => '1.847' }, 'MCE::Queue' => { 'file' => 'lib/MCE/Queue.pm', - 'version' => '1.846' + 'version' => '1.847' }, 'MCE::Relay' => { 'file' => 'lib/MCE/Relay.pm', - 'version' => '1.846' + 'version' => '1.847' }, 'MCE::Signal' => { 'file' => 'lib/MCE/Signal.pm', - 'version' => '1.846' + 'version' => '1.847' }, 'MCE::Step' => { 'file' => 'lib/MCE/Step.pm', - 'version' => '1.846' + 'version' => '1.847' }, 'MCE::Stream' => { 'file' => 'lib/MCE/Stream.pm', - 'version' => '1.846' + 'version' => '1.847' }, 'MCE::Subs' => { 'file' => 'lib/MCE/Subs.pm', - 'version' => '1.846' + 'version' => '1.847' }, 'MCE::Util' => { 'file' => 'lib/MCE/Util.pm', - 'version' => '1.846' + 'version' => '1.847' } }, 'prereqs' => { diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MCE-1.846/README.md new/MCE-1.847/README.md --- old/MCE-1.846/README.md 2019-08-27 03:28:28.000000000 +0200 +++ new/MCE-1.847/README.md 2019-09-03 06:20:45.000000000 +0200 @@ -1,6 +1,6 @@ ## Many-Core Engine for Perl -This document describes MCE version 1.846. +This document describes MCE version 1.847. Many-Core Engine (MCE) for Perl helps enable a new level of performance by maximizing all available cores. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MCE-1.846/lib/MCE/Candy.pm new/MCE-1.847/lib/MCE/Candy.pm --- old/MCE-1.846/lib/MCE/Candy.pm 2019-08-27 03:28:28.000000000 +0200 +++ new/MCE-1.847/lib/MCE/Candy.pm 2019-09-03 06:20:45.000000000 +0200 @@ -11,7 +11,7 @@ no warnings qw( threads recursion uninitialized ); -our $VERSION = '1.846'; +our $VERSION = '1.847'; our @CARP_NOT = qw( MCE ); @@ -240,7 +240,7 @@ =head1 VERSION -This document describes MCE::Candy version 1.846 +This document describes MCE::Candy version 1.847 =head1 DESCRIPTION diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MCE-1.846/lib/MCE/Channel/Mutex.pm new/MCE-1.847/lib/MCE/Channel/Mutex.pm --- old/MCE-1.846/lib/MCE/Channel/Mutex.pm 2019-08-27 03:28:28.000000000 +0200 +++ new/MCE-1.847/lib/MCE/Channel/Mutex.pm 2019-09-03 06:20:45.000000000 +0200 @@ -11,7 +11,7 @@ no warnings qw( uninitialized once ); -our $VERSION = '1.846'; +our $VERSION = '1.847'; use base 'MCE::Channel'; use MCE::Mutex (); @@ -328,7 +328,7 @@ =head1 VERSION -This document describes MCE::Channel::Mutex version 1.846 +This document describes MCE::Channel::Mutex version 1.847 =head1 DESCRIPTION diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MCE-1.846/lib/MCE/Channel/Simple.pm new/MCE-1.847/lib/MCE/Channel/Simple.pm --- old/MCE-1.846/lib/MCE/Channel/Simple.pm 2019-08-27 03:28:28.000000000 +0200 +++ new/MCE-1.847/lib/MCE/Channel/Simple.pm 2019-09-03 06:20:45.000000000 +0200 @@ -11,7 +11,7 @@ no warnings qw( uninitialized once ); -our $VERSION = '1.846'; +our $VERSION = '1.847'; use base 'MCE::Channel'; use bytes; @@ -311,7 +311,7 @@ =head1 VERSION -This document describes MCE::Channel::Simple version 1.846 +This document describes MCE::Channel::Simple version 1.847 =head1 DESCRIPTION diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MCE-1.846/lib/MCE/Channel/Threads.pm new/MCE-1.847/lib/MCE/Channel/Threads.pm --- old/MCE-1.846/lib/MCE/Channel/Threads.pm 2019-08-27 03:28:28.000000000 +0200 +++ new/MCE-1.847/lib/MCE/Channel/Threads.pm 2019-09-03 06:20:45.000000000 +0200 @@ -11,7 +11,7 @@ no warnings qw( uninitialized once ); -our $VERSION = '1.846'; +our $VERSION = '1.847'; use threads; use threads::shared; @@ -326,7 +326,7 @@ =head1 VERSION -This document describes MCE::Channel::Threads version 1.846 +This document describes MCE::Channel::Threads version 1.847 =head1 DESCRIPTION diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MCE-1.846/lib/MCE/Channel.pm new/MCE-1.847/lib/MCE/Channel.pm --- old/MCE-1.846/lib/MCE/Channel.pm 2019-08-27 03:28:28.000000000 +0200 +++ new/MCE-1.847/lib/MCE/Channel.pm 2019-09-03 06:20:45.000000000 +0200 @@ -11,7 +11,7 @@ no warnings qw( uninitialized once ); -our $VERSION = '1.846'; +our $VERSION = '1.847'; ## no critic (BuiltinFunctions::ProhibitStringyEval) ## no critic (TestingAndDebugging::ProhibitNoStrict) @@ -26,17 +26,15 @@ my ( $freeze, $thaw ); BEGIN { - if ( ! defined $INC{'PDL.pm'} ) { - local $@; eval ' - use Sereal::Encoder 3.015 qw( encode_sereal ); - use Sereal::Decoder 3.015 qw( decode_sereal ); - '; + if ( $] ge '5.008008' && ! $INC{'PDL.pm'} ) { + local $@; + eval 'use Sereal::Encoder 3.015; use Sereal::Decoder 3.015;'; if ( ! $@ ) { my $encoder_ver = int( Sereal::Encoder->VERSION() ); my $decoder_ver = int( Sereal::Decoder->VERSION() ); if ( $encoder_ver - $decoder_ver == 0 ) { - $freeze = \&encode_sereal; - $thaw = \&decode_sereal; + $freeze = \&Sereal::Encoder::encode_sereal; + $thaw = \&Sereal::Decoder::decode_sereal; } } } @@ -59,9 +57,9 @@ my ( $class, %argv ) = @_; my $impl = defined( $argv{impl} ) ? ucfirst( lc $argv{impl} ) : 'Mutex'; - $impl = 'Threads' if ( $^O eq 'MSWin32' && $impl eq 'Mutex' ); + $impl = 'Threads' if ( $impl eq 'Mutex' && $^O eq 'MSWin32' ); - eval "require MCE::Channel::$impl; 1" || + eval "require MCE::Channel::$impl; 1;" || Carp::croak("Could not load Channel implementation '$impl': $@"); my $pkg = 'MCE::Channel::'.$impl; @@ -130,7 +128,7 @@ =head1 VERSION -This document describes MCE::Channel version 1.846 +This document describes MCE::Channel version 1.847 =head1 SYNOPSIS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MCE-1.846/lib/MCE/Child.pm new/MCE-1.847/lib/MCE/Child.pm --- old/MCE-1.846/lib/MCE/Child.pm 2019-08-27 03:28:28.000000000 +0200 +++ new/MCE-1.847/lib/MCE/Child.pm 2019-09-03 06:20:45.000000000 +0200 @@ -11,7 +11,7 @@ package MCE::Child; -our $VERSION = '1.846'; +our $VERSION = '1.847'; ## no critic (BuiltinFunctions::ProhibitStringyEval) ## no critic (Subroutines::ProhibitExplicitReturnUndef) @@ -940,7 +940,7 @@ =head1 VERSION -This document describes MCE::Child version 1.846 +This document describes MCE::Child version 1.847 =head1 SYNOPSIS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MCE-1.846/lib/MCE/Core/Input/Generator.pm new/MCE-1.847/lib/MCE/Core/Input/Generator.pm --- old/MCE-1.846/lib/MCE/Core/Input/Generator.pm 2019-08-27 03:28:28.000000000 +0200 +++ new/MCE-1.847/lib/MCE/Core/Input/Generator.pm 2019-09-03 06:20:45.000000000 +0200 @@ -15,7 +15,7 @@ use strict; use warnings; -our $VERSION = '1.846'; +our $VERSION = '1.847'; ## Items below are folded into MCE. @@ -220,7 +220,7 @@ =head1 VERSION -This document describes MCE::Core::Input::Generator version 1.846 +This document describes MCE::Core::Input::Generator version 1.847 =head1 DESCRIPTION diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MCE-1.846/lib/MCE/Core/Input/Handle.pm new/MCE-1.847/lib/MCE/Core/Input/Handle.pm --- old/MCE-1.846/lib/MCE/Core/Input/Handle.pm 2019-08-27 03:28:28.000000000 +0200 +++ new/MCE-1.847/lib/MCE/Core/Input/Handle.pm 2019-09-03 06:20:45.000000000 +0200 @@ -14,7 +14,7 @@ use strict; use warnings; -our $VERSION = '1.846'; +our $VERSION = '1.847'; ## Items below are folded into MCE. @@ -282,7 +282,7 @@ =head1 VERSION -This document describes MCE::Core::Input::Handle version 1.846 +This document describes MCE::Core::Input::Handle version 1.847 =head1 DESCRIPTION diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MCE-1.846/lib/MCE/Core/Input/Iterator.pm new/MCE-1.847/lib/MCE/Core/Input/Iterator.pm --- old/MCE-1.846/lib/MCE/Core/Input/Iterator.pm 2019-08-27 03:28:28.000000000 +0200 +++ new/MCE-1.847/lib/MCE/Core/Input/Iterator.pm 2019-09-03 06:20:45.000000000 +0200 @@ -14,7 +14,7 @@ use strict; use warnings; -our $VERSION = '1.846'; +our $VERSION = '1.847'; ## Items below are folded into MCE. @@ -137,7 +137,7 @@ =head1 VERSION -This document describes MCE::Core::Input::Iterator version 1.846 +This document describes MCE::Core::Input::Iterator version 1.847 =head1 DESCRIPTION diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MCE-1.846/lib/MCE/Core/Input/Request.pm new/MCE-1.847/lib/MCE/Core/Input/Request.pm --- old/MCE-1.846/lib/MCE/Core/Input/Request.pm 2019-08-27 03:28:28.000000000 +0200 +++ new/MCE-1.847/lib/MCE/Core/Input/Request.pm 2019-09-03 06:20:45.000000000 +0200 @@ -14,7 +14,7 @@ use strict; use warnings; -our $VERSION = '1.846'; +our $VERSION = '1.847'; ## Items below are folded into MCE. @@ -206,7 +206,7 @@ =head1 VERSION -This document describes MCE::Core::Input::Request version 1.846 +This document describes MCE::Core::Input::Request version 1.847 =head1 DESCRIPTION diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MCE-1.846/lib/MCE/Core/Input/Sequence.pm new/MCE-1.847/lib/MCE/Core/Input/Sequence.pm --- old/MCE-1.846/lib/MCE/Core/Input/Sequence.pm 2019-08-27 03:28:28.000000000 +0200 +++ new/MCE-1.847/lib/MCE/Core/Input/Sequence.pm 2019-09-03 06:20:45.000000000 +0200 @@ -14,7 +14,7 @@ use strict; use warnings; -our $VERSION = '1.846'; +our $VERSION = '1.847'; ## Items below are folded into MCE. @@ -231,7 +231,7 @@ =head1 VERSION -This document describes MCE::Core::Input::Sequence version 1.846 +This document describes MCE::Core::Input::Sequence version 1.847 =head1 DESCRIPTION diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MCE-1.846/lib/MCE/Core/Manager.pm new/MCE-1.847/lib/MCE/Core/Manager.pm --- old/MCE-1.846/lib/MCE/Core/Manager.pm 2019-08-27 03:28:28.000000000 +0200 +++ new/MCE-1.847/lib/MCE/Core/Manager.pm 2019-09-03 06:20:45.000000000 +0200 @@ -14,7 +14,7 @@ use strict; use warnings; -our $VERSION = '1.846'; +our $VERSION = '1.847'; ## no critic (BuiltinFunctions::ProhibitStringyEval) ## no critic (TestingAndDebugging::ProhibitNoStrict) @@ -1041,7 +1041,7 @@ =head1 VERSION -This document describes MCE::Core::Manager version 1.846 +This document describes MCE::Core::Manager version 1.847 =head1 DESCRIPTION diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MCE-1.846/lib/MCE/Core/Validation.pm new/MCE-1.847/lib/MCE/Core/Validation.pm --- old/MCE-1.846/lib/MCE/Core/Validation.pm 2019-08-27 03:28:28.000000000 +0200 +++ new/MCE-1.847/lib/MCE/Core/Validation.pm 2019-09-03 06:20:45.000000000 +0200 @@ -14,7 +14,7 @@ use strict; use warnings; -our $VERSION = '1.846'; +our $VERSION = '1.847'; ## Items below are folded into MCE. @@ -391,7 +391,7 @@ =head1 VERSION -This document describes MCE::Core::Validation version 1.846 +This document describes MCE::Core::Validation version 1.847 =head1 DESCRIPTION diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MCE-1.846/lib/MCE/Core/Worker.pm new/MCE-1.847/lib/MCE/Core/Worker.pm --- old/MCE-1.846/lib/MCE/Core/Worker.pm 2019-08-27 03:28:28.000000000 +0200 +++ new/MCE-1.847/lib/MCE/Core/Worker.pm 2019-09-03 06:20:45.000000000 +0200 @@ -14,7 +14,7 @@ use strict; use warnings; -our $VERSION = '1.846'; +our $VERSION = '1.847'; my $_has_threads = $INC{'threads.pm'} ? 1 : 0; my $_tid = $_has_threads ? threads->tid() : 0; @@ -743,7 +743,7 @@ =head1 VERSION -This document describes MCE::Core::Worker version 1.846 +This document describes MCE::Core::Worker version 1.847 =head1 DESCRIPTION diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MCE-1.846/lib/MCE/Core.pod new/MCE-1.847/lib/MCE/Core.pod --- old/MCE-1.846/lib/MCE/Core.pod 2019-08-27 03:28:28.000000000 +0200 +++ new/MCE-1.847/lib/MCE/Core.pod 2019-09-03 06:20:45.000000000 +0200 @@ -5,7 +5,7 @@ =head1 VERSION -This document describes MCE::Core version 1.846 +This document describes MCE::Core version 1.847 =head1 SYNOPSIS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MCE-1.846/lib/MCE/Examples.pod new/MCE-1.847/lib/MCE/Examples.pod --- old/MCE-1.846/lib/MCE/Examples.pod 2019-08-27 03:28:28.000000000 +0200 +++ new/MCE-1.847/lib/MCE/Examples.pod 2019-09-03 06:20:45.000000000 +0200 @@ -5,7 +5,7 @@ =head1 VERSION -This document describes MCE::Examples version 1.846 +This document describes MCE::Examples version 1.847 =head1 INCLUDED WITH THE DISTRIBUTION @@ -26,7 +26,7 @@ =head1 MCE EXAMPLES ON GITHUB The examples directory, beginning with 1.700, is maintained separately at a -Github repository L<https://github.com/marioroy/mce-examples> and no longer +GitHub repository L<https://github.com/marioroy/mce-examples> and no longer included with the Perl MCE distribution. =head1 PROCESSING INPUT DATA diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MCE-1.846/lib/MCE/Flow.pm new/MCE-1.847/lib/MCE/Flow.pm --- old/MCE-1.846/lib/MCE/Flow.pm 2019-08-27 03:28:28.000000000 +0200 +++ new/MCE-1.847/lib/MCE/Flow.pm 2019-09-03 06:20:45.000000000 +0200 @@ -11,7 +11,7 @@ no warnings qw( threads recursion uninitialized ); -our $VERSION = '1.846'; +our $VERSION = '1.847'; ## no critic (BuiltinFunctions::ProhibitStringyEval) ## no critic (Subroutines::ProhibitSubroutinePrototypes) @@ -480,7 +480,7 @@ =head1 VERSION -This document describes MCE::Flow version 1.846 +This document describes MCE::Flow version 1.847 =head1 DESCRIPTION diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MCE-1.846/lib/MCE/Grep.pm new/MCE-1.847/lib/MCE/Grep.pm --- old/MCE-1.846/lib/MCE/Grep.pm 2019-08-27 03:28:28.000000000 +0200 +++ new/MCE-1.847/lib/MCE/Grep.pm 2019-09-03 06:20:45.000000000 +0200 @@ -11,7 +11,7 @@ no warnings qw( threads recursion uninitialized ); -our $VERSION = '1.846'; +our $VERSION = '1.847'; ## no critic (BuiltinFunctions::ProhibitStringyEval) ## no critic (Subroutines::ProhibitSubroutinePrototypes) @@ -435,7 +435,7 @@ =head1 VERSION -This document describes MCE::Grep version 1.846 +This document describes MCE::Grep version 1.847 =head1 SYNOPSIS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MCE-1.846/lib/MCE/Loop.pm new/MCE-1.847/lib/MCE/Loop.pm --- old/MCE-1.846/lib/MCE/Loop.pm 2019-08-27 03:28:28.000000000 +0200 +++ new/MCE-1.847/lib/MCE/Loop.pm 2019-09-03 06:20:46.000000000 +0200 @@ -11,7 +11,7 @@ no warnings qw( threads recursion uninitialized ); -our $VERSION = '1.846'; +our $VERSION = '1.847'; ## no critic (BuiltinFunctions::ProhibitStringyEval) ## no critic (Subroutines::ProhibitSubroutinePrototypes) @@ -350,7 +350,7 @@ =head1 VERSION -This document describes MCE::Loop version 1.846 +This document describes MCE::Loop version 1.847 =head1 DESCRIPTION diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MCE-1.846/lib/MCE/Map.pm new/MCE-1.847/lib/MCE/Map.pm --- old/MCE-1.846/lib/MCE/Map.pm 2019-08-27 03:28:28.000000000 +0200 +++ new/MCE-1.847/lib/MCE/Map.pm 2019-09-03 06:20:46.000000000 +0200 @@ -11,7 +11,7 @@ no warnings qw( threads recursion uninitialized ); -our $VERSION = '1.846'; +our $VERSION = '1.847'; ## no critic (BuiltinFunctions::ProhibitStringyEval) ## no critic (Subroutines::ProhibitSubroutinePrototypes) @@ -435,7 +435,7 @@ =head1 VERSION -This document describes MCE::Map version 1.846 +This document describes MCE::Map version 1.847 =head1 SYNOPSIS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MCE-1.846/lib/MCE/Mutex/Channel.pm new/MCE-1.847/lib/MCE/Mutex/Channel.pm --- old/MCE-1.846/lib/MCE/Mutex/Channel.pm 2019-08-27 03:28:28.000000000 +0200 +++ new/MCE-1.847/lib/MCE/Mutex/Channel.pm 2019-09-03 06:20:46.000000000 +0200 @@ -11,7 +11,7 @@ no warnings qw( threads recursion uninitialized once ); -our $VERSION = '1.846'; +our $VERSION = '1.847'; use base 'MCE::Mutex'; use Scalar::Util qw(refaddr weaken); @@ -144,7 +144,7 @@ =head1 VERSION -This document describes MCE::Mutex::Channel version 1.846 +This document describes MCE::Mutex::Channel version 1.847 =head1 DESCRIPTION diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MCE-1.846/lib/MCE/Mutex/Channel2.pm new/MCE-1.847/lib/MCE/Mutex/Channel2.pm --- old/MCE-1.846/lib/MCE/Mutex/Channel2.pm 2019-08-27 03:28:28.000000000 +0200 +++ new/MCE-1.847/lib/MCE/Mutex/Channel2.pm 2019-09-03 06:20:46.000000000 +0200 @@ -11,7 +11,7 @@ no warnings qw( threads recursion uninitialized once ); -our $VERSION = '1.846'; +our $VERSION = '1.847'; use base 'MCE::Mutex::Channel'; use MCE::Util (); @@ -117,7 +117,7 @@ =head1 VERSION -This document describes MCE::Mutex::Channel2 version 1.846 +This document describes MCE::Mutex::Channel2 version 1.847 =head1 DESCRIPTION diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MCE-1.846/lib/MCE/Mutex/Flock.pm new/MCE-1.847/lib/MCE/Mutex/Flock.pm --- old/MCE-1.846/lib/MCE/Mutex/Flock.pm 2019-08-27 03:28:28.000000000 +0200 +++ new/MCE-1.847/lib/MCE/Mutex/Flock.pm 2019-09-03 06:20:46.000000000 +0200 @@ -11,7 +11,7 @@ no warnings qw( threads recursion uninitialized once ); -our $VERSION = '1.846'; +our $VERSION = '1.847'; use base 'MCE::Mutex'; use Fcntl ':flock'; @@ -184,7 +184,7 @@ =head1 VERSION -This document describes MCE::Mutex::Flock version 1.846 +This document describes MCE::Mutex::Flock version 1.847 =head1 DESCRIPTION diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MCE-1.846/lib/MCE/Mutex.pm new/MCE-1.847/lib/MCE/Mutex.pm --- old/MCE-1.846/lib/MCE/Mutex.pm 2019-08-27 03:28:28.000000000 +0200 +++ new/MCE-1.847/lib/MCE/Mutex.pm 2019-09-03 06:20:46.000000000 +0200 @@ -11,7 +11,7 @@ no warnings qw( threads recursion uninitialized ); -our $VERSION = '1.846'; +our $VERSION = '1.847'; ## no critic (BuiltinFunctions::ProhibitStringyEval) ## no critic (TestingAndDebugging::ProhibitNoStrict) @@ -25,7 +25,7 @@ $impl = ucfirst( lc $impl ); - eval "require MCE::Mutex::$impl; 1" || + eval "require MCE::Mutex::$impl; 1;" || Carp::croak("Could not load Mutex implementation '$impl': $@"); my $pkg = 'MCE::Mutex::'.$impl; @@ -45,7 +45,7 @@ local $@; local $SIG{'ALRM'} = sub { alarm 0; die "timed out\n" }; - eval { alarm $timeout || 1; $obj->lock_exclusive }; + eval { alarm $timeout || 1; $obj->lock_exclusive; }; alarm 0; @@ -68,7 +68,7 @@ =head1 VERSION -This document describes MCE::Mutex version 1.846 +This document describes MCE::Mutex version 1.847 =head1 SYNOPSIS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MCE-1.846/lib/MCE/Queue.pm new/MCE-1.847/lib/MCE/Queue.pm --- old/MCE-1.846/lib/MCE/Queue.pm 2019-08-27 03:28:28.000000000 +0200 +++ new/MCE-1.847/lib/MCE/Queue.pm 2019-09-03 06:20:46.000000000 +0200 @@ -11,7 +11,7 @@ no warnings qw( threads recursion uninitialized ); -our $VERSION = '1.846'; +our $VERSION = '1.847'; ## no critic (Subroutines::ProhibitExplicitReturnUndef) ## no critic (TestingAndDebugging::ProhibitNoStrict) @@ -1602,7 +1602,7 @@ =head1 VERSION -This document describes MCE::Queue version 1.846 +This document describes MCE::Queue version 1.847 =head1 SYNOPSIS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MCE-1.846/lib/MCE/Relay.pm new/MCE-1.847/lib/MCE/Relay.pm --- old/MCE-1.846/lib/MCE/Relay.pm 2019-08-27 03:28:28.000000000 +0200 +++ new/MCE-1.847/lib/MCE/Relay.pm 2019-09-03 06:20:46.000000000 +0200 @@ -11,7 +11,7 @@ no warnings qw( threads recursion uninitialized numeric ); -our $VERSION = '1.846'; +our $VERSION = '1.847'; ## no critic (Subroutines::ProhibitSubroutinePrototypes) @@ -370,7 +370,7 @@ =head1 VERSION -This document describes MCE::Relay version 1.846 +This document describes MCE::Relay version 1.847 =head1 SYNOPSIS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MCE-1.846/lib/MCE/Signal.pm new/MCE-1.847/lib/MCE/Signal.pm --- old/MCE-1.846/lib/MCE/Signal.pm 2019-08-27 03:28:28.000000000 +0200 +++ new/MCE-1.847/lib/MCE/Signal.pm 2019-09-03 06:20:46.000000000 +0200 @@ -11,7 +11,7 @@ no warnings qw( threads recursion uninitialized ); -our $VERSION = '1.846'; +our $VERSION = '1.847'; ## no critic (BuiltinFunctions::ProhibitStringyEval) @@ -428,7 +428,7 @@ =head1 VERSION -This document describes MCE::Signal version 1.846 +This document describes MCE::Signal version 1.847 =head1 SYNOPSIS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MCE-1.846/lib/MCE/Step.pm new/MCE-1.847/lib/MCE/Step.pm --- old/MCE-1.846/lib/MCE/Step.pm 2019-08-27 03:28:28.000000000 +0200 +++ new/MCE-1.847/lib/MCE/Step.pm 2019-09-03 06:20:46.000000000 +0200 @@ -11,7 +11,7 @@ no warnings qw( threads recursion uninitialized ); -our $VERSION = '1.846'; +our $VERSION = '1.847'; ## no critic (BuiltinFunctions::ProhibitStringyEval) ## no critic (Subroutines::ProhibitSubroutinePrototypes) @@ -716,7 +716,7 @@ =head1 VERSION -This document describes MCE::Step version 1.846 +This document describes MCE::Step version 1.847 =head1 DESCRIPTION diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MCE-1.846/lib/MCE/Stream.pm new/MCE-1.847/lib/MCE/Stream.pm --- old/MCE-1.846/lib/MCE/Stream.pm 2019-08-27 03:28:28.000000000 +0200 +++ new/MCE-1.847/lib/MCE/Stream.pm 2019-09-03 06:20:46.000000000 +0200 @@ -11,7 +11,7 @@ no warnings qw( threads recursion uninitialized ); -our $VERSION = '1.846'; +our $VERSION = '1.847'; ## no critic (BuiltinFunctions::ProhibitStringyEval) ## no critic (Subroutines::ProhibitSubroutinePrototypes) @@ -672,7 +672,7 @@ =head1 VERSION -This document describes MCE::Stream version 1.846 +This document describes MCE::Stream version 1.847 =head1 SYNOPSIS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MCE-1.846/lib/MCE/Subs.pm new/MCE-1.847/lib/MCE/Subs.pm --- old/MCE-1.846/lib/MCE/Subs.pm 2019-08-27 03:28:28.000000000 +0200 +++ new/MCE-1.847/lib/MCE/Subs.pm 2019-09-03 06:20:46.000000000 +0200 @@ -11,7 +11,7 @@ no warnings qw( threads recursion uninitialized ); -our $VERSION = '1.846'; +our $VERSION = '1.847'; ## no critic (Subroutines::ProhibitSubroutinePrototypes) ## no critic (TestingAndDebugging::ProhibitNoStrict) @@ -204,7 +204,7 @@ =head1 VERSION -This document describes MCE::Subs version 1.846 +This document describes MCE::Subs version 1.847 =head1 SYNOPSIS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MCE-1.846/lib/MCE/Util.pm new/MCE-1.847/lib/MCE/Util.pm --- old/MCE-1.846/lib/MCE/Util.pm 2019-08-27 03:28:28.000000000 +0200 +++ new/MCE-1.847/lib/MCE/Util.pm 2019-09-03 06:20:46.000000000 +0200 @@ -11,12 +11,12 @@ no warnings qw( threads recursion uninitialized numeric ); -our $VERSION = '1.846'; +our $VERSION = '1.847'; ## no critic (BuiltinFunctions::ProhibitStringyEval) use IO::Handle (); -use Socket qw( PF_UNIX PF_UNSPEC SOCK_STREAM SOL_SOCKET SO_SNDBUF SO_RCVBUF ); +use Socket qw( AF_UNIX SOCK_STREAM SOL_SOCKET SO_SNDBUF SO_RCVBUF ); use Time::HiRes qw( sleep time ); use Errno (); use base qw( Exporter ); @@ -230,7 +230,7 @@ ($_i) = $_i =~ /(.*)/; socketpair( $_obj->{$_r_sock}[$_i], $_obj->{$_w_sock}[$_i], - PF_UNIX, SOCK_STREAM, PF_UNSPEC ) or die "socketpair: $!\n"; + AF_UNIX, SOCK_STREAM, 0 ) or die "socketpair: $!\n"; if ($^O ne 'aix' && $^O ne 'linux') { setsockopt($_obj->{$_r_sock}[$_i], SOL_SOCKET, SO_SNDBUF, int $_size); @@ -244,7 +244,7 @@ } else { socketpair( $_obj->{$_r_sock}, $_obj->{$_w_sock}, - PF_UNIX, SOCK_STREAM, PF_UNSPEC ) or die "socketpair: $!\n"; + AF_UNIX, SOCK_STREAM, 0 ) or die "socketpair: $!\n"; if ($^O ne 'aix' && $^O ne 'linux') { setsockopt($_obj->{$_r_sock}, SOL_SOCKET, SO_SNDBUF, int $_size); @@ -374,7 +374,7 @@ =head1 VERSION -This document describes MCE::Util version 1.846 +This document describes MCE::Util version 1.847 =head1 SYNOPSIS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MCE-1.846/lib/MCE.pm new/MCE-1.847/lib/MCE.pm --- old/MCE-1.846/lib/MCE.pm 2019-08-27 03:28:28.000000000 +0200 +++ new/MCE-1.847/lib/MCE.pm 2019-09-03 06:20:46.000000000 +0200 @@ -11,7 +11,7 @@ no warnings qw( threads recursion uninitialized ); -our $VERSION = '1.846'; +our $VERSION = '1.847'; ## no critic (BuiltinFunctions::ProhibitStringyEval) ## no critic (Subroutines::ProhibitSubroutinePrototypes) @@ -24,39 +24,34 @@ BEGIN { local $@; - if ($^O eq 'MSWin32' && !$INC{'threads.pm'}) { - eval 'use threads; use threads::shared'; + if ( $^O eq 'MSWin32' && ! $INC{'threads.pm'} ) { + eval 'use threads; use threads::shared;'; } - elsif ($INC{'threads.pm'} && !$INC{'threads/shared.pm'}) { - eval 'use threads::shared'; + elsif ( $INC{'threads.pm'} && ! $INC{'threads/shared.pm'} ) { + eval 'use threads::shared;'; } $_has_threads = $INC{'threads.pm'} ? 1 : 0; $_tid = $_has_threads ? threads->tid() : 0; $_oid = "$$.$_tid"; - if ($] ge '5.008008' && !$INC{'PDL.pm'}) { - eval ' - use Sereal::Encoder 3.015 qw( encode_sereal ); - use Sereal::Decoder 3.015 qw( decode_sereal ); - '; - if ( !$@ ) { + if ( $] ge '5.008008' && ! $INC{'PDL.pm'} ) { + eval 'use Sereal::Encoder 3.015; use Sereal::Decoder 3.015;'; + if ( ! $@ ) { my $_encoder_ver = int( Sereal::Encoder->VERSION() ); my $_decoder_ver = int( Sereal::Decoder->VERSION() ); if ( $_encoder_ver - $_decoder_ver == 0 ) { - $_freeze = \&encode_sereal, - $_thaw = \&decode_sereal; + $_freeze = \&Sereal::Encoder::encode_sereal; + $_thaw = \&Sereal::Decoder::decode_sereal; } } } - if (!defined $_freeze) { + if ( ! defined $_freeze ) { require Storable; - $_freeze = \&Storable::freeze, + $_freeze = \&Storable::freeze; $_thaw = \&Storable::thaw; } - - return; } use IO::Handle (); @@ -1988,17 +1983,19 @@ ## results (non-thread workers only). Ditto for Math::Prime::Util, ## Math::Random, and Math::Random::MT::Auto. - if (!$self->{use_threads}) { + { my ($_wid, $_seed) = ($_args[1], $self->{_seed}); srand(abs($_seed - ($_wid * 100000)) % 2147483560); - Math::Prime::Util::srand(abs($_seed - ($_wid * 100000)) % 2147483560) - if ( $INC{'Math/Prime/Util.pm'} ); + if (!$self->{use_threads}) { + Math::Prime::Util::srand(abs($_seed - ($_wid * 100000)) % 2147483560) + if ( $INC{'Math/Prime/Util.pm'} ); - MCE::Hobo->_clear() - if ( $INC{'MCE/Hobo.pm'} && MCE::Hobo->can('_clear') ); + MCE::Hobo->_clear() + if ( $INC{'MCE/Hobo.pm'} && MCE::Hobo->can('_clear') ); - MCE::Child->_clear() if $INC{'MCE/Child.pm'}; + MCE::Child->_clear() if $INC{'MCE/Child.pm'}; + } } if (!$self->{use_threads} && $INC{'Math/Random.pm'}) { diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MCE-1.846/lib/MCE.pod new/MCE-1.847/lib/MCE.pod --- old/MCE-1.846/lib/MCE.pod 2019-08-27 03:28:28.000000000 +0200 +++ new/MCE-1.847/lib/MCE.pod 2019-09-03 06:20:46.000000000 +0200 @@ -5,7 +5,7 @@ =head1 VERSION -This document describes MCE version 1.846 +This document describes MCE version 1.847 Many-Core Engine (MCE) for Perl helps enable a new level of performance by maximizing all available cores.
