Script 'mail_helper' called by obssrc
Hello community,
here is the log from the commit of package perl-XS-Parse-Keyword for
openSUSE:Factory checked in at 2023-07-12 17:26:29
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-XS-Parse-Keyword (Old)
and /work/SRC/openSUSE:Factory/.perl-XS-Parse-Keyword.new.8922 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-XS-Parse-Keyword"
Wed Jul 12 17:26:29 2023 rev:14 rq:1098151 version:0.34
Changes:
--------
---
/work/SRC/openSUSE:Factory/perl-XS-Parse-Keyword/perl-XS-Parse-Keyword.changes
2023-02-21 15:35:45.572189587 +0100
+++
/work/SRC/openSUSE:Factory/.perl-XS-Parse-Keyword.new.8922/perl-XS-Parse-Keyword.changes
2023-07-12 17:26:38.802247928 +0200
@@ -1,0 +2,14 @@
+Thu Jun 15 03:11:03 UTC 2023 - Tina Müller <[email protected]>
+
+- updated to 0.34
+ see /usr/share/doc/packages/perl-XS-Parse-Keyword/Changes
+
+ 0.34 2023-06-14
+ [CHANGES]
+ * Swap all unit tests from Test::More to Test2::V0
+
+ [BUGFIXES]
+ * Remember to set `-std=c99` compiler flag on Perls before v5.36
+ * Skip whitespace between pieces of SEQUENCE or SEPARATEDLIST
+
+-------------------------------------------------------------------
Old:
----
XS-Parse-Keyword-0.33.tar.gz
New:
----
XS-Parse-Keyword-0.34.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ perl-XS-Parse-Keyword.spec ++++++
--- /var/tmp/diff_new_pack.rb49p7/_old 2023-07-12 17:26:39.478251869 +0200
+++ /var/tmp/diff_new_pack.rb49p7/_new 2023-07-12 17:26:39.482251893 +0200
@@ -18,7 +18,7 @@
%define cpan_name XS-Parse-Keyword
Name: perl-XS-Parse-Keyword
-Version: 0.33
+Version: 0.34
Release: 0
License: Artistic-1.0 OR GPL-1.0-or-later
Summary: XS functions to assist in parsing keyword syntax
@@ -31,7 +31,7 @@
BuildRequires: perl(ExtUtils::CChecker) >= 0.11
BuildRequires: perl(ExtUtils::ParseXS) >= 3.16
BuildRequires: perl(Module::Build) >= 0.400400
-BuildRequires: perl(Test::More) >= 0.88
+BuildRequires: perl(Test2::V0)
%{perl_requires}
%description
@@ -50,14 +50,14 @@
%autosetup -n %{cpan_name}-%{version}
%build
-perl Build.PL installdirs=vendor optimize="%{optflags}"
-./Build build flags=%{?_smp_mflags}
+perl Build.PL --installdirs=vendor optimize="%{optflags}"
+./Build build --flags=%{?_smp_mflags}
%check
./Build test
%install
-./Build install destdir=%{buildroot} create_packlist=0
+./Build install --destdir=%{buildroot} --create_packlist=0
%perl_gen_filelist
%files -f %{name}.files
++++++ XS-Parse-Keyword-0.33.tar.gz -> XS-Parse-Keyword-0.34.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XS-Parse-Keyword-0.33/.editorconfig
new/XS-Parse-Keyword-0.34/.editorconfig
--- old/XS-Parse-Keyword-0.33/.editorconfig 1970-01-01 01:00:00.000000000
+0100
+++ new/XS-Parse-Keyword-0.34/.editorconfig 2023-06-14 18:44:30.000000000
+0200
@@ -0,0 +1,4 @@
+root = true
+
+[*.{pm,pl,t}]
+indent_size = 3
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XS-Parse-Keyword-0.33/Build.PL
new/XS-Parse-Keyword-0.34/Build.PL
--- old/XS-Parse-Keyword-0.33/Build.PL 2023-02-19 00:02:29.000000000 +0100
+++ new/XS-Parse-Keyword-0.34/Build.PL 2023-06-14 18:44:30.000000000 +0200
@@ -1,3 +1,4 @@
+use v5;
use strict;
use warnings;
@@ -5,6 +6,13 @@
use ExtUtils::CChecker 0.11;
use Module::Build::with::XSTests;
+my @extra_compiler_flags = qw( -I. -Ihax );
+
+# Perl 5.36 made -std=c99 standard; before then we'll have to request it
specially
+push @extra_compiler_flags, qw( -std=c99 ) if $^V lt v5.36.0;
+
+push @extra_compiler_flags, qw( -DDEBUGGING=-g ) if $^X =~ m|/debugperl|;
+
my $MIN_PERL = '5.014'; # PL_keyword_plugin
# MSWin32 needs at least perl 5.22
@@ -82,7 +90,7 @@
'ExtUtils::ParseXS' => '3.16',
},
test_requires => {
- 'Test::More' => '0.88', # done_testing
+ 'Test2::V0' => 0,
},
configure_requires => {
'ExtUtils::CChecker' => '0.11',
@@ -92,7 +100,7 @@
create_license => 1,
create_readme => 1,
- extra_compiler_flags => [qw( -I. -Ihax )],
+ extra_compiler_flags => \@extra_compiler_flags,
c_source => [ "src/" ],
);
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XS-Parse-Keyword-0.33/Changes
new/XS-Parse-Keyword-0.34/Changes
--- old/XS-Parse-Keyword-0.33/Changes 2023-02-19 00:02:29.000000000 +0100
+++ new/XS-Parse-Keyword-0.34/Changes 2023-06-14 18:44:30.000000000 +0200
@@ -1,5 +1,13 @@
Revision history for XS-Parse-Keyword
+0.34 2023-06-14
+ [CHANGES]
+ * Swap all unit tests from Test::More to Test2::V0
+
+ [BUGFIXES]
+ * Remember to set `-std=c99` compiler flag on Perls before v5.36
+ * Skip whitespace between pieces of SEQUENCE or SEPARATEDLIST
+
0.33 2023-02-18
[CHANGES]
* Added XPK_LEXVAR, a non `my`-alike variant
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XS-Parse-Keyword-0.33/MANIFEST
new/XS-Parse-Keyword-0.34/MANIFEST
--- old/XS-Parse-Keyword-0.33/MANIFEST 2023-02-19 00:02:29.000000000 +0100
+++ new/XS-Parse-Keyword-0.34/MANIFEST 2023-06-14 18:44:30.000000000 +0200
@@ -1,3 +1,4 @@
+.editorconfig
Build.PL
Changes
hax/force_list_keeping_pushmark.c.inc
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XS-Parse-Keyword-0.33/META.json
new/XS-Parse-Keyword-0.34/META.json
--- old/XS-Parse-Keyword-0.33/META.json 2023-02-19 00:02:29.000000000 +0100
+++ new/XS-Parse-Keyword-0.34/META.json 2023-06-14 18:44:30.000000000 +0200
@@ -33,26 +33,26 @@
},
"test" : {
"requires" : {
- "Test::More" : "0.88"
+ "Test2::V0" : "0"
}
}
},
"provides" : {
"XS::Parse::Infix" : {
"file" : "lib/XS/Parse/Infix.pm",
- "version" : "0.33"
+ "version" : "0.34"
},
"XS::Parse::Infix::Builder" : {
"file" : "lib/XS/Parse/Infix/Builder.pm",
- "version" : "0.33"
+ "version" : "0.34"
},
"XS::Parse::Keyword" : {
"file" : "lib/XS/Parse/Keyword.pm",
- "version" : "0.33"
+ "version" : "0.34"
},
"XS::Parse::Keyword::Builder" : {
"file" : "lib/XS/Parse/Keyword/Builder.pm",
- "version" : "0.33"
+ "version" : "0.34"
}
},
"release_status" : "stable",
@@ -61,6 +61,6 @@
"http://dev.perl.org/licenses/"
]
},
- "version" : "0.33",
+ "version" : "0.34",
"x_serialization_backend" : "JSON::PP version 4.07"
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XS-Parse-Keyword-0.33/META.yml
new/XS-Parse-Keyword-0.34/META.yml
--- old/XS-Parse-Keyword-0.33/META.yml 2023-02-19 00:02:29.000000000 +0100
+++ new/XS-Parse-Keyword-0.34/META.yml 2023-06-14 18:44:30.000000000 +0200
@@ -5,7 +5,7 @@
build_requires:
ExtUtils::CBuilder: '0'
ExtUtils::ParseXS: '3.16'
- Test::More: '0.88'
+ Test2::V0: '0'
configure_requires:
ExtUtils::CChecker: '0.11'
Module::Build: '0.4004'
@@ -19,19 +19,19 @@
provides:
XS::Parse::Infix:
file: lib/XS/Parse/Infix.pm
- version: '0.33'
+ version: '0.34'
XS::Parse::Infix::Builder:
file: lib/XS/Parse/Infix/Builder.pm
- version: '0.33'
+ version: '0.34'
XS::Parse::Keyword:
file: lib/XS/Parse/Keyword.pm
- version: '0.33'
+ version: '0.34'
XS::Parse::Keyword::Builder:
file: lib/XS/Parse/Keyword/Builder.pm
- version: '0.33'
+ version: '0.34'
requires:
perl: '5.014'
resources:
license: http://dev.perl.org/licenses/
-version: '0.33'
+version: '0.34'
x_serialization_backend: 'CPAN::Meta::YAML version 0.018'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/XS-Parse-Keyword-0.33/inc/Module/Build/with/XSTests.pm
new/XS-Parse-Keyword-0.34/inc/Module/Build/with/XSTests.pm
--- old/XS-Parse-Keyword-0.33/inc/Module/Build/with/XSTests.pm 2023-02-19
00:02:30.000000000 +0100
+++ new/XS-Parse-Keyword-0.34/inc/Module/Build/with/XSTests.pm 2023-06-14
18:44:30.000000000 +0200
@@ -1,6 +1,6 @@
package Module::Build::with::XSTests;
-use strict;
+use v5.14;
use warnings;
use base qw( Module::Build );
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XS-Parse-Keyword-0.33/lib/XS/Parse/Infix/Builder.pm
new/XS-Parse-Keyword-0.34/lib/XS/Parse/Infix/Builder.pm
--- old/XS-Parse-Keyword-0.33/lib/XS/Parse/Infix/Builder.pm 2023-02-19
00:02:30.000000000 +0100
+++ new/XS-Parse-Keyword-0.34/lib/XS/Parse/Infix/Builder.pm 2023-06-14
18:44:30.000000000 +0200
@@ -3,7 +3,7 @@
#
# (C) Paul Evans, 2021 -- [email protected]
-package XS::Parse::Infix::Builder 0.33;
+package XS::Parse::Infix::Builder 0.34;
use v5.14;
use warnings;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/XS-Parse-Keyword-0.33/lib/XS/Parse/Infix/Builder_data.pm.PL
new/XS-Parse-Keyword-0.34/lib/XS/Parse/Infix/Builder_data.pm.PL
--- old/XS-Parse-Keyword-0.33/lib/XS/Parse/Infix/Builder_data.pm.PL
2023-02-19 00:02:30.000000000 +0100
+++ new/XS-Parse-Keyword-0.34/lib/XS/Parse/Infix/Builder_data.pm.PL
2023-06-14 18:44:30.000000000 +0200
@@ -28,7 +28,7 @@
<$in_h> } );
__DATA__
-package XS::Parse::Infix::Builder_data 0.33;
+package XS::Parse::Infix::Builder_data 0.34;
use v5.14;
use warnings;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XS-Parse-Keyword-0.33/lib/XS/Parse/Infix.pm
new/XS-Parse-Keyword-0.34/lib/XS/Parse/Infix.pm
--- old/XS-Parse-Keyword-0.33/lib/XS/Parse/Infix.pm 2023-02-19
00:02:30.000000000 +0100
+++ new/XS-Parse-Keyword-0.34/lib/XS/Parse/Infix.pm 2023-06-14
18:44:30.000000000 +0200
@@ -3,7 +3,7 @@
#
# (C) Paul Evans, 2021-2022 -- [email protected]
-package XS::Parse::Infix 0.33;
+package XS::Parse::Infix 0.34;
use v5.14;
use warnings;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/XS-Parse-Keyword-0.33/lib/XS/Parse/Keyword/Builder.pm
new/XS-Parse-Keyword-0.34/lib/XS/Parse/Keyword/Builder.pm
--- old/XS-Parse-Keyword-0.33/lib/XS/Parse/Keyword/Builder.pm 2023-02-19
00:02:30.000000000 +0100
+++ new/XS-Parse-Keyword-0.34/lib/XS/Parse/Keyword/Builder.pm 2023-06-14
18:44:30.000000000 +0200
@@ -3,7 +3,7 @@
#
# (C) Paul Evans, 2021 -- [email protected]
-package XS::Parse::Keyword::Builder 0.33;
+package XS::Parse::Keyword::Builder 0.34;
use v5.14;
use warnings;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/XS-Parse-Keyword-0.33/lib/XS/Parse/Keyword/Builder_data.pm.PL
new/XS-Parse-Keyword-0.34/lib/XS/Parse/Keyword/Builder_data.pm.PL
--- old/XS-Parse-Keyword-0.33/lib/XS/Parse/Keyword/Builder_data.pm.PL
2023-02-19 00:02:30.000000000 +0100
+++ new/XS-Parse-Keyword-0.34/lib/XS/Parse/Keyword/Builder_data.pm.PL
2023-06-14 18:44:30.000000000 +0200
@@ -28,7 +28,7 @@
<$in_h> } );
__DATA__
-package XS::Parse::Keyword::Builder_data 0.33;
+package XS::Parse::Keyword::Builder_data 0.34;
use v5.14;
use warnings;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XS-Parse-Keyword-0.33/lib/XS/Parse/Keyword.pm
new/XS-Parse-Keyword-0.34/lib/XS/Parse/Keyword.pm
--- old/XS-Parse-Keyword-0.33/lib/XS/Parse/Keyword.pm 2023-02-19
00:02:30.000000000 +0100
+++ new/XS-Parse-Keyword-0.34/lib/XS/Parse/Keyword.pm 2023-06-14
18:44:30.000000000 +0200
@@ -3,7 +3,7 @@
#
# (C) Paul Evans, 2021-2022 -- [email protected]
-package XS::Parse::Keyword 0.33;
+package XS::Parse::Keyword 0.34;
use v5.14;
use warnings;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XS-Parse-Keyword-0.33/src/keyword.c
new/XS-Parse-Keyword-0.34/src/keyword.c
--- old/XS-Parse-Keyword-0.33/src/keyword.c 2023-02-19 00:02:30.000000000
+0100
+++ new/XS-Parse-Keyword-0.34/src/keyword.c 2023-06-14 18:44:30.000000000
+0200
@@ -246,6 +246,8 @@
if(!probe_piece(aTHX_ argsv, argidx, pieces++, hookdata))
return FALSE;
+ lex_read_space(0);
+
parse_pieces(aTHX_ argsv, argidx, pieces, hookdata);
return TRUE;
}
@@ -291,9 +293,11 @@
}
/* we're now committed */
THISARG.i = 1;
+ lex_read_space(0);
if(pieces[2].type)
parse_pieces(aTHX_ argsv, argidx, pieces + 2, hookdata);
+ lex_read_space(0);
if(!probe_piece(aTHX_ argsv, argidx, pieces + 0, hookdata))
return TRUE;
@@ -301,6 +305,8 @@
parse_pieces(aTHX_ argsv, argidx, pieces + 1, hookdata);
THISARG.i++;
+ lex_read_space(0);
+
if(!probe_piece(aTHX_ argsv, argidx, pieces + 0, hookdata))
break;
}
@@ -682,6 +688,7 @@
return;
THISARG.i++;
pieces++;
+ lex_read_space(0);
}
parse_pieces(aTHX_ argsv, argidx, pieces, hookdata);
@@ -713,6 +720,8 @@
parse_pieces(aTHX_ argsv, argidx, piece->u.pieces + 1, hookdata);
THISARG.i++;
+ lex_read_space(0);
+
if(!probe_piece(aTHX_ argsv, argidx, piece->u.pieces + 0, hookdata))
break;
lex_read_space(0);
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XS-Parse-Keyword-0.33/t/00use.t
new/XS-Parse-Keyword-0.34/t/00use.t
--- old/XS-Parse-Keyword-0.33/t/00use.t 2023-02-19 00:02:30.000000000 +0100
+++ new/XS-Parse-Keyword-0.34/t/00use.t 2023-06-14 18:44:30.000000000 +0200
@@ -3,8 +3,9 @@
use v5.14;
use warnings;
-use Test::More;
+use Test2::V0;
-use_ok( "XS::Parse::Keyword" );
+require XS::Parse::Keyword;
+pass( "Modules loaded" );
done_testing;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XS-Parse-Keyword-0.33/t/10stages-permit.t
new/XS-Parse-Keyword-0.34/t/10stages-permit.t
--- old/XS-Parse-Keyword-0.33/t/10stages-permit.t 2023-02-19
00:02:30.000000000 +0100
+++ new/XS-Parse-Keyword-0.34/t/10stages-permit.t 2023-06-14
18:44:30.000000000 +0200
@@ -3,7 +3,7 @@
use v5.14;
use warnings;
-use Test::More;
+use Test2::V0;
use lib "t";
use testcase "t::stages";
@@ -14,7 +14,7 @@
{
my $ret = stages { one => "one" };
- is_deeply( $ret, { one => "one" },
+ is( $ret, { one => "one" },
'not permitted keyword falls through to regular symbol lookup' );
}
@@ -24,7 +24,7 @@
my $ret = stages { two => "two" };
- is_deeply( $ret, { two => "two" },
+ is( $ret, { two => "two" },
'keyword permitted by key but denied by func' );
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XS-Parse-Keyword-0.33/t/11stages-check.t
new/XS-Parse-Keyword-0.34/t/11stages-check.t
--- old/XS-Parse-Keyword-0.33/t/11stages-check.t 2023-02-19
00:02:30.000000000 +0100
+++ new/XS-Parse-Keyword-0.34/t/11stages-check.t 2023-06-14
18:44:30.000000000 +0200
@@ -3,7 +3,7 @@
use v5.14;
use warnings;
-use Test::More;
+use Test2::V0;
use lib "t";
use testcase "t::stages";
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XS-Parse-Keyword-0.33/t/30pieces-literal.t
new/XS-Parse-Keyword-0.34/t/30pieces-literal.t
--- old/XS-Parse-Keyword-0.33/t/30pieces-literal.t 2023-02-19
00:02:30.000000000 +0100
+++ new/XS-Parse-Keyword-0.34/t/30pieces-literal.t 2023-06-14
18:44:30.000000000 +0200
@@ -3,7 +3,7 @@
use v5.14;
use warnings;
-use Test::More;
+use Test2::V0;
use lib "t";
use testcase "t::pieces";
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XS-Parse-Keyword-0.33/t/31pieces-block.t
new/XS-Parse-Keyword-0.34/t/31pieces-block.t
--- old/XS-Parse-Keyword-0.33/t/31pieces-block.t 2023-02-19
00:02:30.000000000 +0100
+++ new/XS-Parse-Keyword-0.34/t/31pieces-block.t 2023-06-14
18:44:30.000000000 +0200
@@ -3,7 +3,7 @@
use v5.14;
use warnings;
-use Test::More;
+use Test2::V0;
use lib "t";
use testcase "t::pieces";
@@ -19,10 +19,10 @@
my @ret;
# scalar reverse will join() strings
@ret = pieceblock_scalar { reverse "abc", "def" };
- is_deeply( \@ret, [ "fedcba" ], 'pieceblock_scalar forces scalar context' );
+ is( \@ret, [ "fedcba" ], 'pieceblock_scalar forces scalar context' );
@ret = pieceblock_list { reverse "abc", "def" };
- is_deeply( \@ret, [ "def,abc" ], 'pieceblock_list forces list context' );
+ is( \@ret, [ "def,abc" ], 'pieceblock_list forces list context' );
}
{
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XS-Parse-Keyword-0.33/t/32pieces-anonsub.t
new/XS-Parse-Keyword-0.34/t/32pieces-anonsub.t
--- old/XS-Parse-Keyword-0.33/t/32pieces-anonsub.t 2023-02-19
00:02:30.000000000 +0100
+++ new/XS-Parse-Keyword-0.34/t/32pieces-anonsub.t 2023-06-14
18:44:30.000000000 +0200
@@ -3,7 +3,7 @@
use v5.14;
use warnings;
-use Test::More;
+use Test2::V0;
use lib "t";
use testcase "t::pieces";
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XS-Parse-Keyword-0.33/t/33pieces-arithexpr.t
new/XS-Parse-Keyword-0.34/t/33pieces-arithexpr.t
--- old/XS-Parse-Keyword-0.33/t/33pieces-arithexpr.t 2023-02-19
00:02:30.000000000 +0100
+++ new/XS-Parse-Keyword-0.34/t/33pieces-arithexpr.t 2023-06-14
18:44:30.000000000 +0200
@@ -3,7 +3,7 @@
use v5.14;
use warnings;
-use Test::More;
+use Test2::V0;
use lib "t";
use testcase "t::pieces";
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XS-Parse-Keyword-0.33/t/33pieces-listexpr.t
new/XS-Parse-Keyword-0.34/t/33pieces-listexpr.t
--- old/XS-Parse-Keyword-0.33/t/33pieces-listexpr.t 2023-02-19
00:02:30.000000000 +0100
+++ new/XS-Parse-Keyword-0.34/t/33pieces-listexpr.t 2023-06-14
18:44:30.000000000 +0200
@@ -3,7 +3,7 @@
use v5.14;
use warnings;
-use Test::More;
+use Test2::V0;
use lib "t";
use testcase "t::pieces";
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XS-Parse-Keyword-0.33/t/33pieces-termexpr.t
new/XS-Parse-Keyword-0.34/t/33pieces-termexpr.t
--- old/XS-Parse-Keyword-0.33/t/33pieces-termexpr.t 2023-02-19
00:02:30.000000000 +0100
+++ new/XS-Parse-Keyword-0.34/t/33pieces-termexpr.t 2023-06-14
18:44:30.000000000 +0200
@@ -3,7 +3,7 @@
use v5.14;
use warnings;
-use Test::More;
+use Test2::V0;
use lib "t";
use testcase "t::pieces";
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XS-Parse-Keyword-0.33/t/34pieces-ident.t
new/XS-Parse-Keyword-0.34/t/34pieces-ident.t
--- old/XS-Parse-Keyword-0.33/t/34pieces-ident.t 2023-02-19
00:02:30.000000000 +0100
+++ new/XS-Parse-Keyword-0.34/t/34pieces-ident.t 2023-06-14
18:44:30.000000000 +0200
@@ -3,7 +3,7 @@
use v5.14;
use warnings;
-use Test::More;
+use Test2::V0;
use lib "t";
use testcase "t::pieces";
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XS-Parse-Keyword-0.33/t/35pieces-lexvar.t
new/XS-Parse-Keyword-0.34/t/35pieces-lexvar.t
--- old/XS-Parse-Keyword-0.33/t/35pieces-lexvar.t 2023-02-19
00:02:30.000000000 +0100
+++ new/XS-Parse-Keyword-0.34/t/35pieces-lexvar.t 2023-06-14
18:44:30.000000000 +0200
@@ -3,7 +3,7 @@
use v5.14;
use warnings;
-use Test::More;
+use Test2::V0;
use lib "t";
use testcase "t::pieces";
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XS-Parse-Keyword-0.33/t/36pieces-attrs.t
new/XS-Parse-Keyword-0.34/t/36pieces-attrs.t
--- old/XS-Parse-Keyword-0.33/t/36pieces-attrs.t 2023-02-19
00:02:30.000000000 +0100
+++ new/XS-Parse-Keyword-0.34/t/36pieces-attrs.t 2023-06-14
18:44:30.000000000 +0200
@@ -3,7 +3,7 @@
use v5.14;
use warnings;
-use Test::More;
+use Test2::V0;
use lib "t";
use testcase "t::pieces";
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XS-Parse-Keyword-0.33/t/37pieces-vstring.t
new/XS-Parse-Keyword-0.34/t/37pieces-vstring.t
--- old/XS-Parse-Keyword-0.33/t/37pieces-vstring.t 2023-02-19
00:02:30.000000000 +0100
+++ new/XS-Parse-Keyword-0.34/t/37pieces-vstring.t 2023-06-14
18:44:30.000000000 +0200
@@ -3,7 +3,7 @@
use v5.14;
use warnings;
-use Test::More;
+use Test2::V0;
use lib "t";
use testcase "t::pieces";
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XS-Parse-Keyword-0.33/t/38pieces-infix.t
new/XS-Parse-Keyword-0.34/t/38pieces-infix.t
--- old/XS-Parse-Keyword-0.33/t/38pieces-infix.t 2023-02-19
00:02:30.000000000 +0100
+++ new/XS-Parse-Keyword-0.34/t/38pieces-infix.t 2023-06-14
18:44:30.000000000 +0200
@@ -3,7 +3,7 @@
use v5.14;
use warnings;
-use Test::More;
+use Test2::V0;
use lib "t";
use testcase "t::pieces";
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XS-Parse-Keyword-0.33/t/40build.t
new/XS-Parse-Keyword-0.34/t/40build.t
--- old/XS-Parse-Keyword-0.33/t/40build.t 2023-02-19 00:02:30.000000000
+0100
+++ new/XS-Parse-Keyword-0.34/t/40build.t 2023-06-14 18:44:30.000000000
+0200
@@ -3,7 +3,7 @@
use v5.14;
use warnings;
-use Test::More;
+use Test2::V0;
use lib "t";
use testcase "t::build";
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XS-Parse-Keyword-0.33/t/41structures.t
new/XS-Parse-Keyword-0.34/t/41structures.t
--- old/XS-Parse-Keyword-0.33/t/41structures.t 2023-02-19 00:02:30.000000000
+0100
+++ new/XS-Parse-Keyword-0.34/t/41structures.t 2023-06-14 18:44:30.000000000
+0200
@@ -3,7 +3,7 @@
use v5.14;
use warnings;
-use Test::More;
+use Test2::V0;
use lib "t";
use testcase "t::structures";
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XS-Parse-Keyword-0.33/t/42scopes.t
new/XS-Parse-Keyword-0.34/t/42scopes.t
--- old/XS-Parse-Keyword-0.33/t/42scopes.t 2023-02-19 00:02:30.000000000
+0100
+++ new/XS-Parse-Keyword-0.34/t/42scopes.t 2023-06-14 18:44:30.000000000
+0200
@@ -3,7 +3,7 @@
use v5.14;
use warnings;
-use Test::More;
+use Test2::V0;
use lib "t";
use testcase "t::structures";
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XS-Parse-Keyword-0.33/t/43probing.t
new/XS-Parse-Keyword-0.34/t/43probing.t
--- old/XS-Parse-Keyword-0.33/t/43probing.t 2023-02-19 00:02:30.000000000
+0100
+++ new/XS-Parse-Keyword-0.34/t/43probing.t 2023-06-14 18:44:30.000000000
+0200
@@ -3,7 +3,7 @@
use v5.14;
use warnings;
-use Test::More;
+use Test2::V0;
use lib "t";
use testcase "t::probing";
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XS-Parse-Keyword-0.33/t/50flags-autosemi.t
new/XS-Parse-Keyword-0.34/t/50flags-autosemi.t
--- old/XS-Parse-Keyword-0.33/t/50flags-autosemi.t 2023-02-19
00:02:30.000000000 +0100
+++ new/XS-Parse-Keyword-0.34/t/50flags-autosemi.t 2023-06-14
18:44:30.000000000 +0200
@@ -3,7 +3,7 @@
use v5.14;
use warnings;
-use Test::More;
+use Test2::V0;
use lib "t";
use testcase "t::flags";
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XS-Parse-Keyword-0.33/t/60line.t
new/XS-Parse-Keyword-0.34/t/60line.t
--- old/XS-Parse-Keyword-0.33/t/60line.t 2023-02-19 00:02:30.000000000
+0100
+++ new/XS-Parse-Keyword-0.34/t/60line.t 2023-06-14 18:44:30.000000000
+0200
@@ -3,7 +3,7 @@
use v5.14;
use warnings;
-use Test::More;
+use Test2::V0;
use lib "t";
use testcase "t::line";
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XS-Parse-Keyword-0.33/t/70infix.t
new/XS-Parse-Keyword-0.34/t/70infix.t
--- old/XS-Parse-Keyword-0.33/t/70infix.t 2023-02-19 00:02:30.000000000
+0100
+++ new/XS-Parse-Keyword-0.34/t/70infix.t 2023-06-14 18:44:30.000000000
+0200
@@ -4,7 +4,7 @@
use warnings;
use utf8;
-use Test::More;
+use Test2::V0;
use B::Deparse;
my $deparser = B::Deparse->new( "-p" );
@@ -26,15 +26,15 @@
is( $result, 27, 'xor infix operator' );
my $aref = ["|" intersperse qw( a b c )];
- is_deeply( $aref, [qw( a | b | c )],
+ is( $aref, [qw( a | b | c )],
'intersperse infix operator' );
my @list = qw( x y z );
$aref = ["|" intersperse @list];
- is_deeply( $aref, [qw( x | y | z )],
+ is( $aref, [qw( x | y | z )],
'intersperse infix operator on PADAV' );
- is_deeply( [ (2, 4, 6) addpairs (1, 1, 1) ],
+ is( [ (2, 4, 6) addpairs (1, 1, 1) ],
[ 3, 5, 7 ], 'addpairs infix operator' );
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XS-Parse-Keyword-0.33/t/71infix-wrapper.t
new/XS-Parse-Keyword-0.34/t/71infix-wrapper.t
--- old/XS-Parse-Keyword-0.33/t/71infix-wrapper.t 2023-02-19
00:02:30.000000000 +0100
+++ new/XS-Parse-Keyword-0.34/t/71infix-wrapper.t 2023-06-14
18:44:30.000000000 +0200
@@ -4,7 +4,7 @@
use warnings;
use utf8;
-use Test::More;
+use Test2::V0;
use B qw( svref_2object walkoptree );
@@ -24,9 +24,9 @@
is( $result, 30, 'add wrapper func' );
my $aref = [ t::infix::interspersefunc( "Z", "a", "b" ) ];
- is_deeply( $aref, [qw( a Z b )], 'intersperse wrapper func' );
+ is( $aref, [qw( a Z b )], 'intersperse wrapper func' );
- is_deeply( [ t::infix::addpairsfunc( [ 1, 2 ], [ 3, 4 ] ) ],
+ is( [ t::infix::addpairsfunc( [ 1, 2 ], [ 3, 4 ] ) ],
[ 4, 6 ], 'addpairs wrapper func' );
}
@@ -83,43 +83,43 @@
'callchecker generated an OP_CUSTOM call for list/list' );
ok( !$opcounts{entersub}, 'callchecker removed an OP_ENTERSUB call for
list/list' );
is( $opcounts{rv2av}, 2, 'callchecker made two OP_RV2AV' );
- is_deeply( [ $code->() ], [ 2, 4, 6 ], 'result of callcheckered code for
list/list' );
+ is( [ $code->() ], [ 2, 4, 6 ], 'result of callcheckered code for
list/list' );
my @padav = (1,2,3);
%opcounts = count_ops $code = sub { t::infix::addpairsfunc( \@padav,
\@padav ) };
ok( !$opcounts{srefgen}, 'callchecker made no OP_SREFGEN for \@padav' );
- is_deeply( [ $code->() ], [ 2, 4, 6 ], 'result of callcheckered code for
list/list on \@padav' );
+ is( [ $code->() ], [ 2, 4, 6 ], 'result of callcheckered code for list/list
on \@padav' );
our @pkgav = (1,2,3);
%opcounts = count_ops $code = sub { t::infix::addpairsfunc( \@pkgav,
\@pkgav ) };
ok( !$opcounts{srefgen}, 'callchecker made no OP_SREFGEN for \@pkgav' );
- is_deeply( [ $code->() ], [ 2, 4, 6 ], 'result of callcheckered code for
list/list on \@pkgav' );
+ is( [ $code->() ], [ 2, 4, 6 ], 'result of callcheckered code for list/list
on \@pkgav' );
# stress-test it
%opcounts = count_ops $code = sub { t::infix::addpairsfunc( \@{ \@{ \@padav
} }, \@{ \@{ \@padav } } ) };
# Preserve the two sets of inner ones but remove the outer ones
is( $opcounts{+REFGEN}, 4, 'callchecker removed one layer of OP_SREFGEN for
stress-test' );
- is_deeply( [ $code->() ], [ 2, 4, 6 ], 'result of callcheckered code for
list/list on stress-test' );
+ is( [ $code->() ], [ 2, 4, 6 ], 'result of callcheckered code for list/list
on stress-test' );
package OneTwoThree {
use overload '@{}' => sub { return [1, 2, 3] };
}
$code = sub { t::infix::addpairsfunc( bless( {}, "OneTwoThree" ), \@padav )
};
- is_deeply( [ $code->() ], [ 2, 4, 6 ], 'result of callcheckered code for
list/list on blessed object' );
+ is( [ $code->() ], [ 2, 4, 6 ], 'result of callcheckered code for list/list
on blessed object' );
# anonlist remains on LHS
%opcounts = count_ops $code = sub { t::infix::addpairsfunc( [1,2,3],
\@padav ) };
ok( $opcounts{anonlist}, 'callchecker left OP_ANONLIST on LHS' );
- is_deeply( [ $code->() ], [ 2, 4, 6 ], 'result of callcheckered code for
list/list on anonlist' );
+ is( [ $code->() ], [ 2, 4, 6 ], 'result of callcheckered code for list/list
on anonlist' );
# anonlist is unwrapped on RHS
%opcounts = count_ops $code = sub { t::infix::addpairsfunc( \@padav,
[1,2,3] ) };
ok( !$opcounts{anonlist}, 'callchecker removed OP_ANONLIST on RHS' );
- is_deeply( [ $code->() ], [ 2, 4, 6 ], 'result of callcheckered code for
list/list on anonlist' );
+ is( [ $code->() ], [ 2, 4, 6 ], 'result of callcheckered code for list/list
on anonlist' );
}
# wrapper func by coderef
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XS-Parse-Keyword-0.33/t/99pod.t
new/XS-Parse-Keyword-0.34/t/99pod.t
--- old/XS-Parse-Keyword-0.33/t/99pod.t 2023-02-19 00:02:30.000000000 +0100
+++ new/XS-Parse-Keyword-0.34/t/99pod.t 2023-06-14 18:44:30.000000000 +0200
@@ -3,7 +3,7 @@
use v5.14;
use warnings;
-use Test::More;
+use Test2::V0;
eval "use Test::Pod 1.00";
plan skip_all => "Test::Pod 1.00 required for testing POD" if $@;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XS-Parse-Keyword-0.33/t/testcase.pm
new/XS-Parse-Keyword-0.34/t/testcase.pm
--- old/XS-Parse-Keyword-0.33/t/testcase.pm 2023-02-19 00:02:30.000000000
+0100
+++ new/XS-Parse-Keyword-0.34/t/testcase.pm 2023-06-14 18:44:30.000000000
+0200
@@ -1,6 +1,6 @@
package testcase;
-use strict;
+use v5.14;
use warnings;
use lib "t/blib", "t/blib/arch";