Hello community, here is the log from the commit of package perl-Want for openSUSE:Factory checked in at 2014-02-28 19:17:00 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-Want (Old) and /work/SRC/openSUSE:Factory/.perl-Want.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Want" Changes: -------- --- /work/SRC/openSUSE:Factory/perl-Want/perl-Want.changes 2012-05-31 17:08:57.000000000 +0200 +++ /work/SRC/openSUSE:Factory/.perl-Want.new/perl-Want.changes 2014-02-28 19:17:01.000000000 +0100 @@ -1,0 +2,8 @@ +Mon Feb 24 06:10:28 UTC 2014 - [email protected] + +- updated to 0.22 + - Prevent return from being optimised away by newer (>= 5.19.7) Perls. + This is a patch supplied by @wolfsage: see + https://github.com/robinhouston/Want/pull/1 + +------------------------------------------------------------------- Old: ---- Want-0.21.tar.gz New: ---- Want-0.22.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-Want.spec ++++++ --- /var/tmp/diff_new_pack.UMqMZL/_old 2014-02-28 19:17:01.000000000 +0100 +++ /var/tmp/diff_new_pack.UMqMZL/_new 2014-02-28 19:17:01.000000000 +0100 @@ -1,7 +1,7 @@ # # spec file for package perl-Want # -# Copyright (c) 2012 SUSE LINUX Products GmbH, Nuernberg, Germany. +# Copyright (c) 2014 SUSE LINUX Products GmbH, Nuernberg, Germany. # # All modifications and additions to the file contributed by third parties # remain the property of their copyright owners, unless otherwise agreed @@ -17,7 +17,7 @@ Name: perl-Want -Version: 0.21 +Version: 0.22 Release: 0 %define cpan_name Want Summary: A generalisation of C<wantarray> @@ -28,7 +28,6 @@ BuildRoot: %{_tmppath}/%{name}-%{version}-build BuildRequires: perl BuildRequires: perl-macros -#BuildRequires: perl(Want) %{perl_requires} %description ++++++ Want-0.21.tar.gz -> Want-0.22.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Want-0.21/Changes new/Want-0.22/Changes --- old/Want-0.21/Changes 2012-02-29 17:54:37.000000000 +0100 +++ new/Want-0.22/Changes 2013-12-15 18:10:14.000000000 +0100 @@ -106,3 +106,8 @@ 0.21 Wed 29 Feb 2012 16:47:58 GMT - Avoid leaking the RHS of an lnoreturn lvalue sub, thanks to Father Chrysostomos https://rt.cpan.org/Public/Bug/Display.html?id=72083 + +0.22 Sun 15 Dec 2013 17:08:35 GMT + - Prevent return from being optimised away by newer (>= 5.19.7) Perls. + This is a patch supplied by @wolfsage: see + https://github.com/robinhouston/Want/pull/1 diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Want-0.21/META.json new/Want-0.22/META.json --- old/Want-0.21/META.json 2012-03-01 00:08:24.000000000 +0100 +++ new/Want-0.22/META.json 2013-12-15 18:12:55.000000000 +0100 @@ -4,7 +4,7 @@ "unknown" ], "dynamic_config" : 1, - "generated_by" : "ExtUtils::MakeMaker version 6.58, CPAN::Meta::Converter version 2.110930001", + "generated_by" : "ExtUtils::MakeMaker version 6.6302, CPAN::Meta::Converter version 2.120921", "license" : [ "unknown" ], @@ -22,12 +22,12 @@ "prereqs" : { "build" : { "requires" : { - "ExtUtils::MakeMaker" : 0 + "ExtUtils::MakeMaker" : "0" } }, "configure" : { "requires" : { - "ExtUtils::MakeMaker" : 0 + "ExtUtils::MakeMaker" : "0" } }, "runtime" : { @@ -35,5 +35,5 @@ } }, "release_status" : "stable", - "version" : "0.21" + "version" : "0.22" } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Want-0.21/META.yml new/Want-0.22/META.yml --- old/Want-0.21/META.yml 2012-03-01 00:08:23.000000000 +0100 +++ new/Want-0.22/META.yml 2013-12-15 18:12:55.000000000 +0100 @@ -7,7 +7,7 @@ configure_requires: ExtUtils::MakeMaker: 0 dynamic_config: 1 -generated_by: 'ExtUtils::MakeMaker version 6.58, CPAN::Meta::Converter version 2.110930001' +generated_by: 'ExtUtils::MakeMaker version 6.6302, CPAN::Meta::Converter version 2.120921' license: unknown meta-spec: url: http://module-build.sourceforge.net/META-spec-v1.4.html @@ -18,4 +18,4 @@ - t - inc requires: {} -version: 0.21 +version: 0.22 diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Want-0.21/Makefile.PL new/Want-0.22/Makefile.PL --- old/Want-0.21/Makefile.PL 2011-07-28 09:00:02.000000000 +0200 +++ new/Want-0.22/Makefile.PL 2013-12-15 18:12:24.000000000 +0100 @@ -9,5 +9,4 @@ 'LIBS' => [''], # e.g., '-lm' 'DEFINE' => '', # e.g., '-DHAVE_SOMETHING' 'INC' => '', # e.g., '-I/usr/include/other' - dist => {TAR => 'gnutar'}, # Used by 'make dist' ); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Want-0.21/README new/Want-0.22/README --- old/Want-0.21/README 2012-02-29 19:43:15.000000000 +0100 +++ new/Want-0.22/README 2013-12-15 18:09:45.000000000 +0100 @@ -1,5 +1,5 @@ ----------------------------------------------------------------------------- -| Want v0.21 - Robin Houston, 2012-02-29 +| Want v0.22 - Robin Houston, 2013-12-15 ----------------------------------------------------------------------------- For full documentation, see the POD included with the module. @@ -94,7 +94,8 @@ Robin Houston, <[email protected]> Thanks to Damian Conway for encouragement and good - suggestions, and Father Chrysostomos for a patch. + suggestions, and to Father Chrysostomos and Andrew + Horsfall for patches. SEE ALSO o the wantarray entry in the perlfunc manpage diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Want-0.21/Want.pm new/Want-0.22/Want.pm --- old/Want-0.21/Want.pm 2012-02-29 19:54:14.000000000 +0100 +++ new/Want-0.22/Want.pm 2013-12-15 18:10:56.000000000 +0100 @@ -12,7 +12,7 @@ our @EXPORT = qw(want rreturn lnoreturn); our @EXPORT_OK = qw(howmany wantref); -our $VERSION = '0.21'; +our $VERSION = '0.22'; bootstrap Want $VERSION; @@ -169,7 +169,14 @@ croak "Can't rreturn in lvalue context"; } double_return(); - return wantarray ? @_ : $_[$#_]; + + # Extra scope needed to work with perl-5.19.7 or greater. + # Prevents the return being optimised out, which is needed + # since it's actually going to be used a stack level above + # this sub. + { + return wantarray ? @_ : $_[$#_]; + } } sub lnoreturn () { @@ -177,7 +184,14 @@ croak "Can't lnoreturn except in ASSIGN context"; } double_return(); - return disarm_temp(my $undef); + + # Extra scope needed to work with perl-5.19.7 or greater. + # Prevents the return being optimised out, which is needed + # since it's actually going to be used a stack level above + # this sub. + { + return disarm_temp(my $undef); + } } # Some naughty people were relying on these internal methods. -- To unsubscribe, e-mail: [email protected] For additional commands, e-mail: [email protected]
