Hello community, here is the log from the commit of package perl-Data-Util for openSUSE:Factory checked in at 2014-03-09 18:37:29 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-Data-Util (Old) and /work/SRC/openSUSE:Factory/.perl-Data-Util.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Data-Util" Changes: -------- --- /work/SRC/openSUSE:Factory/perl-Data-Util/perl-Data-Util.changes 2013-06-05 17:50:59.000000000 +0200 +++ /work/SRC/openSUSE:Factory/.perl-Data-Util.new/perl-Data-Util.changes 2014-03-09 18:37:30.000000000 +0100 @@ -1,0 +2,6 @@ +Fri Mar 7 09:05:32 UTC 2014 - [email protected] + +- updated to 0.63 + - Fix a crash on perl 5.19.x (tokuhirom) + +------------------------------------------------------------------- Old: ---- Data-Util-0.62.tar.gz New: ---- Data-Util-0.63.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-Data-Util.spec ++++++ --- /var/tmp/diff_new_pack.2AZfam/_old 2014-03-09 18:37:30.000000000 +0100 +++ /var/tmp/diff_new_pack.2AZfam/_new 2014-03-09 18:37:30.000000000 +0100 @@ -1,7 +1,7 @@ # # spec file for package perl-Data-Util # -# Copyright (c) 2013 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-Data-Util -Version: 0.62 +Version: 0.63 Release: 0 %define cpan_name Data-Util Summary: A selection of utilities for data and data types @@ -29,35 +29,10 @@ BuildRequires: perl BuildRequires: perl-macros BuildRequires: perl(Devel::PPPort) >= 3.19 -BuildRequires: perl(ExtUtils::ParseXS) >= 2.21 +BuildRequires: perl(ExtUtils::ParseXS) >= 3.18 BuildRequires: perl(Hash::Util::FieldHash::Compat) BuildRequires: perl(Scope::Guard) BuildRequires: perl(Test::Exception) >= 0.27 -#BuildRequires: perl(Bar) -#BuildRequires: perl(Base) -#BuildRequires: perl(Class::Method::Modifiers) -#BuildRequires: perl(Common) -#BuildRequires: perl(Data::OptList) -#BuildRequires: perl(Data::Util) -#BuildRequires: perl(Data::Util::Error) -#BuildRequires: perl(feature) -#BuildRequires: perl(Foo) -#BuildRequires: perl(inc::Module::Install) >= 1.06 -#BuildRequires: perl(JSON) -#BuildRequires: perl(Method::Modifiers) -#BuildRequires: perl(Module::Build) -#BuildRequires: perl(Module::Install::Base) -#BuildRequires: perl(Module::Install::XSUtil) >= 0.41 -#BuildRequires: perl(Moose) -#BuildRequires: perl(mro) -#BuildRequires: perl(MRO::Compat) -#BuildRequires: perl(NSClean) -#BuildRequires: perl(Params::Util) -#BuildRequires: perl(parent) -#BuildRequires: perl(Parse::CPAN::Meta) -#BuildRequires: perl(Sub::Exporter) -#BuildRequires: perl(Sub::Exporter::Lexical) -#BuildRequires: perl(YAML::Tiny) %{perl_requires} %description ++++++ Data-Util-0.62.tar.gz -> Data-Util-0.63.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Data-Util-0.62/Changes new/Data-Util-0.63/Changes --- old/Data-Util-0.62/Changes 2013-04-03 09:07:39.000000000 +0200 +++ new/Data-Util-0.63/Changes 2014-03-05 23:42:17.000000000 +0100 @@ -1,5 +1,8 @@ Revision history for Data-Util +0.63 2014-03-06 07:42:05+0900 + - Fix a crash on perl 5.19.x (tokuhirom) + 0.62 2013-04-03 16:06:46 - Fix a crash on perl 5.17.x (tokuhirom) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Data-Util-0.62/META.yml new/Data-Util-0.63/META.yml --- old/Data-Util-0.62/META.yml 2013-04-03 09:08:06.000000000 +0200 +++ new/Data-Util-0.63/META.yml 2014-03-05 23:44:15.000000000 +0100 @@ -12,7 +12,7 @@ configure_requires: Devel::PPPort: 3.19 ExtUtils::MakeMaker: 6.59 - ExtUtils::ParseXS: 2.21 + ExtUtils::ParseXS: 3.18 distribution_type: module dynamic_config: 1 generated_by: 'Module::Install version 1.06' @@ -34,4 +34,4 @@ resources: license: http://dev.perl.org/licenses/ repository: git://github.com/gfx/Perl-Data-Util.git -version: 0.62 +version: 0.63 diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Data-Util-0.62/inc/Module/Install/XSUtil.pm new/Data-Util-0.63/inc/Module/Install/XSUtil.pm --- old/Data-Util-0.62/inc/Module/Install/XSUtil.pm 2013-04-03 09:08:06.000000000 +0200 +++ new/Data-Util-0.63/inc/Module/Install/XSUtil.pm 2014-03-05 23:44:14.000000000 +0100 @@ -3,7 +3,7 @@ use 5.005_03; -$VERSION = '0.43'; +$VERSION = '0.45'; use Module::Install::Base; @ISA = qw(Module::Install::Base); @@ -18,7 +18,7 @@ use constant _VERBOSE => $ENV{MI_VERBOSE} ? 1 : 0; my %ConfigureRequires = ( - 'ExtUtils::ParseXS' => 2.21, + 'ExtUtils::ParseXS' => 3.18, # shipped with Perl 5.18.0 ); my %BuildRequires = ( @@ -94,6 +94,7 @@ ; } + # cf. https://github.com/sjn/toolchain-site/blob/219db464af9b2f19b04fec05547ac10180a469f3/lancaster-consensus.md my $want_xs; sub want_xs { my($self, $default) = @_; @@ -104,13 +105,26 @@ $default = !$ENV{PERL_ONLY} if not defined $default; foreach my $arg(@ARGV){ - if($arg eq '--pp'){ + + my ($k, $v) = split '=', $arg; # MM-style named args + if ($k eq 'PUREPERL_ONLY' && defined $v) { + return $want_xs = !$v; + } + elsif($arg eq '--pp'){ # old-style return $want_xs = 0; } elsif($arg eq '--xs'){ return $want_xs = 1; } } + + if ($ENV{PERL_MM_OPT}) { + my($v) = $ENV{PERL_MM_OPT} =~ /\b PUREPERL_ONLY = (\S+) /xms; + if (defined $v) { + return $want_xs = !$v; + } + } + return $want_xs = $default; } } @@ -802,4 +816,4 @@ 1; __END__ -#line 1016 +#line 1030 diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Data-Util-0.62/lib/Data/Util/JA.pod new/Data-Util-0.63/lib/Data/Util/JA.pod --- old/Data-Util-0.62/lib/Data/Util/JA.pod 2013-04-03 09:07:47.000000000 +0200 +++ new/Data-Util-0.63/lib/Data/Util/JA.pod 2014-03-05 23:43:56.000000000 +0100 @@ -7,7 +7,7 @@ =head1 VERSION -This document describes Data::Util version 0.62 +This document describes Data::Util version 0.63 =for test_synopsis no warnings 'redefine'; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Data-Util-0.62/lib/Data/Util.pm new/Data-Util-0.63/lib/Data/Util.pm --- old/Data-Util-0.62/lib/Data/Util.pm 2013-04-03 09:07:47.000000000 +0200 +++ new/Data-Util-0.63/lib/Data/Util.pm 2014-03-05 23:43:56.000000000 +0100 @@ -4,7 +4,7 @@ use strict; #use warnings; -our $VERSION = '0.62'; +our $VERSION = '0.63'; use Exporter; our @ISA = qw(Exporter); @@ -79,7 +79,7 @@ =head1 VERSION -This document describes Data::Util version 0.62 +This document describes Data::Util version 0.63 =head1 SYNOPSIS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Data-Util-0.62/subs.c new/Data-Util-0.63/subs.c --- old/Data-Util-0.62/subs.c 2012-10-20 13:54:44.000000000 +0200 +++ new/Data-Util-0.63/subs.c 2014-03-05 23:41:29.000000000 +0100 @@ -62,6 +62,9 @@ /* fill in params */ for(i = 0; i < len; i++){ SV* const ph = phs_ary[i]; + if (!ph){ + continue; + } if(isGV(ph)){ /* symbolic placeholder *_ */ if(!sph){ @@ -128,7 +131,7 @@ } for(/* i is initialized above */; i < len; i++){ - if(isGV(phs_ary[i])){ + if(phs_ary[i] && isGV(phs_ary[i])){ /* warn("#sph %d - %d", (int)max_ph+1, (int)min_ph); //*/ PUSHary(sph, max_ph + 1, min_ph); } @@ -140,7 +143,7 @@ /* NOTE: need to clean up params before call_sv(), because call_sv() might die */ for(i = 0; i < len; i++){ - if(SvIOKp(phs_ary[i])){ + if(phs_ary[i] && SvIOKp(phs_ary[i])){ /* NOTE: no need to SvREFCNT_dec(params_ary[i]) */ params_ary[i] = &PL_sv_undef; } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Data-Util-0.62/xshelper.h new/Data-Util-0.63/xshelper.h --- old/Data-Util-0.62/xshelper.h 2013-04-03 09:08:06.000000000 +0200 +++ new/Data-Util-0.63/xshelper.h 2014-03-05 23:44:15.000000000 +0100 @@ -1,4 +1,4 @@ -/* THIS FILE IS AUTOMATICALLY GENERATED BY Module::Install::XSUtil 0.43. */ +/* THIS FILE IS AUTOMATICALLY GENERATED BY Module::Install::XSUtil 0.45. */ /* =head1 NAME -- To unsubscribe, e-mail: [email protected] For additional commands, e-mail: [email protected]
