Script 'mail_helper' called by obssrc
Hello community,

here is the log from the commit of package perl-Devel-PPPort for 
openSUSE:Factory checked in at 2022-03-09 18:48:15
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-Devel-PPPort (Old)
 and      /work/SRC/openSUSE:Factory/.perl-Devel-PPPort.new.2349 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "perl-Devel-PPPort"

Wed Mar  9 18:48:15 2022 rev:24 rq:960514 version:3.67

Changes:
--------
--- /work/SRC/openSUSE:Factory/perl-Devel-PPPort/perl-Devel-PPPort.changes      
2022-03-04 00:18:50.656300450 +0100
+++ 
/work/SRC/openSUSE:Factory/.perl-Devel-PPPort.new.2349/perl-Devel-PPPort.changes
    2022-03-11 11:49:30.658854876 +0100
@@ -1,0 +2,6 @@
+Wed Mar  9 03:06:23 UTC 2022 - Tina M??ller <timueller+p...@suse.de>
+
+- updated to 3.67
+   see /usr/share/doc/packages/perl-Devel-PPPort/Changes
+
+-------------------------------------------------------------------

Old:
----
  Devel-PPPort-3.66.tar.gz

New:
----
  Devel-PPPort-3.67.tar.gz

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Other differences:
------------------
++++++ perl-Devel-PPPort.spec ++++++
--- /var/tmp/diff_new_pack.HQ8qia/_old  2022-03-11 11:49:31.122855422 +0100
+++ /var/tmp/diff_new_pack.HQ8qia/_new  2022-03-11 11:49:31.134855437 +0100
@@ -18,7 +18,7 @@
 
 %define cpan_name Devel-PPPort
 Name:           perl-Devel-PPPort
-Version:        3.66
+Version:        3.67
 Release:        0
 License:        Artistic-1.0 OR GPL-1.0-or-later
 Summary:        Perl/Pollution/Portability

++++++ Devel-PPPort-3.66.tar.gz -> Devel-PPPort-3.67.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Devel-PPPort-3.66/Changes 
new/Devel-PPPort-3.67/Changes
--- old/Devel-PPPort-3.66/Changes       2022-03-02 23:35:41.000000000 +0100
+++ new/Devel-PPPort-3.67/Changes       2022-03-08 20:03:17.000000000 +0100
@@ -1,6 +1,13 @@
 Revision history for Devel-PPPort
 
-3.66 - 2022-03-22
+3.67 - 2022-03-08
+
+  * fix utf8.t with recent development versions of Perl
+  * utf8_to_uvchr_buf: Workaround bugs in Perl (BBC)
+  - v5.35.9 was returning an incorrect value
+  - fix dereference empty string
+
+3.66 - 2022-03-02
 
   * Fix corrupted release (missing files)
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Devel-PPPort-3.66/MANIFEST 
new/Devel-PPPort-3.67/MANIFEST
--- old/Devel-PPPort-3.66/MANIFEST      2022-03-02 23:39:12.000000000 +0100
+++ new/Devel-PPPort-3.67/MANIFEST      2022-03-08 20:07:06.000000000 +0100
@@ -1,2 +1,571 @@
+apicheck_c.PL
+Changes
+devel/buildperl.pl
+devel/devtools.pl
+devel/mkapidoc.pl
+devel/mkppport_fnc.pl
+devel/mktodo
+devel/mktodo.pl
+devel/regenerate
+devel/scanprov
+devel/update_release_date.pl
+HACKERS
+Makefile.PL
+MANIFEST                       This list of files
+MANIFEST.SKIP
+mktests.PL
+module2.c
+module3.c
+parts/apicheck.pl
+parts/apidoc.fnc
+parts/base/5003007
+parts/base/5004000
+parts/base/5004001
+parts/base/5004002
+parts/base/5004003
+parts/base/5004004
+parts/base/5004005
+parts/base/5005000
+parts/base/5005001
+parts/base/5005002
+parts/base/5005003
+parts/base/5005004
+parts/base/5006000
+parts/base/5006001
+parts/base/5006002
+parts/base/5007000
+parts/base/5007001
+parts/base/5007002
+parts/base/5007003
+parts/base/5008000
+parts/base/5008001
+parts/base/5008002
+parts/base/5008003
+parts/base/5008004
+parts/base/5008005
+parts/base/5008006
+parts/base/5008007
+parts/base/5008008
+parts/base/5008009
+parts/base/5009000
+parts/base/5009001
+parts/base/5009002
+parts/base/5009003
+parts/base/5009004
+parts/base/5009005
+parts/base/5010000
+parts/base/5010001
+parts/base/5011000
+parts/base/5011001
+parts/base/5011002
+parts/base/5011003
+parts/base/5011004
+parts/base/5011005
+parts/base/5012000
+parts/base/5012001
+parts/base/5012002
+parts/base/5012003
+parts/base/5012004
+parts/base/5012005
+parts/base/5013000
+parts/base/5013001
+parts/base/5013002
+parts/base/5013003
+parts/base/5013004
+parts/base/5013005
+parts/base/5013006
+parts/base/5013007
+parts/base/5013008
+parts/base/5013009
+parts/base/5013010
+parts/base/5013011
+parts/base/5014000
+parts/base/5014001
+parts/base/5014002
+parts/base/5014003
+parts/base/5014004
+parts/base/5015000
+parts/base/5015001
+parts/base/5015002
+parts/base/5015003
+parts/base/5015004
+parts/base/5015005
+parts/base/5015006
+parts/base/5015007
+parts/base/5015008
+parts/base/5015009
+parts/base/5016000
+parts/base/5016001
+parts/base/5016002
+parts/base/5016003
+parts/base/5017000
+parts/base/5017001
+parts/base/5017002
+parts/base/5017003
+parts/base/5017004
+parts/base/5017005
+parts/base/5017006
+parts/base/5017007
+parts/base/5017008
+parts/base/5017009
+parts/base/5017010
+parts/base/5017011
+parts/base/5018000
+parts/base/5018001
+parts/base/5018002
+parts/base/5018003
+parts/base/5018004
+parts/base/5019000
+parts/base/5019001
+parts/base/5019002
+parts/base/5019003
+parts/base/5019004
+parts/base/5019005
+parts/base/5019006
+parts/base/5019007
+parts/base/5019008
+parts/base/5019009
+parts/base/5019010
+parts/base/5019011
+parts/base/5020000
+parts/base/5020001
+parts/base/5020002
+parts/base/5020003
+parts/base/5021000
+parts/base/5021001
+parts/base/5021002
+parts/base/5021003
+parts/base/5021004
+parts/base/5021005
+parts/base/5021006
+parts/base/5021007
+parts/base/5021008
+parts/base/5021009
+parts/base/5021010
+parts/base/5021011
+parts/base/5022000
+parts/base/5022001
+parts/base/5022002
+parts/base/5022003
+parts/base/5022004
+parts/base/5023000
+parts/base/5023001
+parts/base/5023002
+parts/base/5023003
+parts/base/5023004
+parts/base/5023005
+parts/base/5023006
+parts/base/5023007
+parts/base/5023008
+parts/base/5023009
+parts/base/5024000
+parts/base/5024001
+parts/base/5024002
+parts/base/5024003
+parts/base/5024004
+parts/base/5025000
+parts/base/5025001
+parts/base/5025002
+parts/base/5025003
+parts/base/5025004
+parts/base/5025005
+parts/base/5025006
+parts/base/5025007
+parts/base/5025008
+parts/base/5025009
+parts/base/5025010
+parts/base/5025011
+parts/base/5025012
+parts/base/5026000
+parts/base/5026001
+parts/base/5026002
+parts/base/5026003
+parts/base/5027000
+parts/base/5027001
+parts/base/5027002
+parts/base/5027003
+parts/base/5027004
+parts/base/5027005
+parts/base/5027006
+parts/base/5027007
+parts/base/5027008
+parts/base/5027009
+parts/base/5027010
+parts/base/5027011
+parts/base/5028000
+parts/base/5028001
+parts/base/5028002
+parts/base/5028003
+parts/base/5029000
+parts/base/5029001
+parts/base/5029002
+parts/base/5029003
+parts/base/5029004
+parts/base/5029005
+parts/base/5029006
+parts/base/5029007
+parts/base/5029008
+parts/base/5029009
+parts/base/5029010
+parts/base/5030000
+parts/base/5030001
+parts/base/5030002
+parts/base/5030003
+parts/base/5031000
+parts/base/5031001
+parts/base/5031002
+parts/base/5031003
+parts/base/5031004
+parts/base/5031005
+parts/base/5031006
+parts/base/5031007
+parts/base/5031008
+parts/base/5031009
+parts/base/5031010
+parts/base/5031011
+parts/base/5032000
+parts/base/5032001
+parts/base/5033000
+parts/base/5033001
+parts/base/5033002
+parts/base/5033003
+parts/base/5033004
+parts/base/5033005
+parts/base/5033006
+parts/base/5033007
+parts/base/5033008
+parts/base/5033009
+parts/base/5034000
+parts/base/5035001
+parts/base/5035002
+parts/base/5035003
+parts/base/5035004
+parts/base/5035005
+parts/base/5035006
+parts/base/5035007
+parts/base/5035008
+parts/base/5035009
+parts/base/5035010
+parts/embed.fnc
+parts/inc/01_test
+parts/inc/call
+parts/inc/cop
+parts/inc/exception
+parts/inc/format
+parts/inc/grok
+parts/inc/gv
+parts/inc/HvNAME
+parts/inc/inctools
+parts/inc/limits
+parts/inc/locale
+parts/inc/magic
+parts/inc/magic_defs
+parts/inc/memory
+parts/inc/mess
+parts/inc/misc
+parts/inc/mPUSH
+parts/inc/MY_CXT
+parts/inc/newCONSTSUB
+parts/inc/newRV
+parts/inc/newSV_type
+parts/inc/newSVpv
+parts/inc/podtest
+parts/inc/ppphbin
+parts/inc/ppphdoc
+parts/inc/ppphtest
+parts/inc/pv_tools
+parts/inc/pvs
+parts/inc/shared_pv
+parts/inc/snprintf
+parts/inc/sprintf
+parts/inc/strlfuncs
+parts/inc/subparse
+parts/inc/Sv_set
+parts/inc/sv_xpvf
+parts/inc/SvPV
+parts/inc/SvREFCNT
+parts/inc/threads
+parts/inc/utf8
+parts/inc/uv
+parts/inc/variables
+parts/inc/version
+parts/inc/warn
+parts/ppport.fnc
+parts/ppptools.pl
+parts/todo/5003007
+parts/todo/5004000
+parts/todo/5004001
+parts/todo/5004002
+parts/todo/5004003
+parts/todo/5004004
+parts/todo/5004005
+parts/todo/5005000
+parts/todo/5005001
+parts/todo/5005002
+parts/todo/5005003
+parts/todo/5005004
+parts/todo/5006000
+parts/todo/5006001
+parts/todo/5006002
+parts/todo/5007000
+parts/todo/5007001
+parts/todo/5007002
+parts/todo/5007003
+parts/todo/5008000
+parts/todo/5008001
+parts/todo/5008002
+parts/todo/5008003
+parts/todo/5008004
+parts/todo/5008005
+parts/todo/5008006
+parts/todo/5008007
+parts/todo/5008008
+parts/todo/5008009
+parts/todo/5009000
+parts/todo/5009001
+parts/todo/5009002
+parts/todo/5009003
+parts/todo/5009004
+parts/todo/5009005
+parts/todo/5010000
+parts/todo/5010001
+parts/todo/5011000
+parts/todo/5011001
+parts/todo/5011002
+parts/todo/5011003
+parts/todo/5011004
+parts/todo/5011005
+parts/todo/5012000
+parts/todo/5012001
+parts/todo/5012002
+parts/todo/5012003
+parts/todo/5012004
+parts/todo/5012005
+parts/todo/5013000
+parts/todo/5013001
+parts/todo/5013002
+parts/todo/5013003
+parts/todo/5013004
+parts/todo/5013005
+parts/todo/5013006
+parts/todo/5013007
+parts/todo/5013008
+parts/todo/5013009
+parts/todo/5013010
+parts/todo/5013011
+parts/todo/5014000
+parts/todo/5014001
+parts/todo/5014002
+parts/todo/5014003
+parts/todo/5014004
+parts/todo/5015000
+parts/todo/5015001
+parts/todo/5015002
+parts/todo/5015003
+parts/todo/5015004
+parts/todo/5015005
+parts/todo/5015006
+parts/todo/5015007
+parts/todo/5015008
+parts/todo/5015009
+parts/todo/5016000
+parts/todo/5016001
+parts/todo/5016002
+parts/todo/5016003
+parts/todo/5017000
+parts/todo/5017001
+parts/todo/5017002
+parts/todo/5017003
+parts/todo/5017004
+parts/todo/5017005
+parts/todo/5017006
+parts/todo/5017007
+parts/todo/5017008
+parts/todo/5017009
+parts/todo/5017010
+parts/todo/5017011
+parts/todo/5018000
+parts/todo/5018001
+parts/todo/5018002
+parts/todo/5018003
+parts/todo/5018004
+parts/todo/5019000
+parts/todo/5019001
+parts/todo/5019002
+parts/todo/5019003
+parts/todo/5019004
+parts/todo/5019005
+parts/todo/5019006
+parts/todo/5019007
+parts/todo/5019008
+parts/todo/5019009
+parts/todo/5019010
+parts/todo/5019011
+parts/todo/5020000
+parts/todo/5020001
+parts/todo/5020002
+parts/todo/5020003
+parts/todo/5021000
+parts/todo/5021001
+parts/todo/5021002
+parts/todo/5021003
+parts/todo/5021004
+parts/todo/5021005
+parts/todo/5021006
+parts/todo/5021007
+parts/todo/5021008
+parts/todo/5021009
+parts/todo/5021010
+parts/todo/5021011
+parts/todo/5022000
+parts/todo/5022001
+parts/todo/5022002
+parts/todo/5022003
+parts/todo/5022004
+parts/todo/5023000
+parts/todo/5023001
+parts/todo/5023002
+parts/todo/5023003
+parts/todo/5023004
+parts/todo/5023005
+parts/todo/5023006
+parts/todo/5023007
+parts/todo/5023008
+parts/todo/5023009
+parts/todo/5024000
+parts/todo/5024001
+parts/todo/5024002
+parts/todo/5024003
+parts/todo/5024004
+parts/todo/5025000
+parts/todo/5025001
+parts/todo/5025002
+parts/todo/5025003
+parts/todo/5025004
+parts/todo/5025005
+parts/todo/5025006
+parts/todo/5025007
+parts/todo/5025008
+parts/todo/5025009
+parts/todo/5025010
+parts/todo/5025011
+parts/todo/5025012
+parts/todo/5026000
+parts/todo/5026001
+parts/todo/5026002
+parts/todo/5026003
+parts/todo/5027000
+parts/todo/5027001
+parts/todo/5027002
+parts/todo/5027003
+parts/todo/5027004
+parts/todo/5027005
+parts/todo/5027006
+parts/todo/5027007
+parts/todo/5027008
+parts/todo/5027009
+parts/todo/5027010
+parts/todo/5027011
+parts/todo/5028000
+parts/todo/5028001
+parts/todo/5028002
+parts/todo/5028003
+parts/todo/5029000
+parts/todo/5029001
+parts/todo/5029002
+parts/todo/5029003
+parts/todo/5029004
+parts/todo/5029005
+parts/todo/5029006
+parts/todo/5029007
+parts/todo/5029008
+parts/todo/5029009
+parts/todo/5029010
+parts/todo/5030000
+parts/todo/5030001
+parts/todo/5030002
+parts/todo/5030003
+parts/todo/5031000
+parts/todo/5031001
+parts/todo/5031002
+parts/todo/5031003
+parts/todo/5031004
+parts/todo/5031005
+parts/todo/5031006
+parts/todo/5031007
+parts/todo/5031008
+parts/todo/5031009
+parts/todo/5031010
+parts/todo/5031011
+parts/todo/5032000
+parts/todo/5032001
+parts/todo/5033000
+parts/todo/5033001
+parts/todo/5033002
+parts/todo/5033003
+parts/todo/5033004
+parts/todo/5033005
+parts/todo/5033006
+parts/todo/5033007
+parts/todo/5033008
+parts/todo/5033009
+parts/todo/5034000
+parts/todo/5035001
+parts/todo/5035002
+parts/todo/5035003
+parts/todo/5035004
+parts/todo/5035005
+parts/todo/5035006
+parts/todo/5035007
+parts/todo/5035008
+parts/todo/5035009
+parts/todo/5035010
+PPPort.pm
+PPPort.xs
+ppport_h.PL
+PPPort_pm.PL
+README
+RealPPPort_xs.PL
+soak
+t/01_test.t
+t/call.t
+t/cop.t
+t/exception.t
+t/format.t
+t/grok.t
+t/gv.t
+t/HvNAME.t
+t/limits.t
+t/locale.t
+t/magic.t
+t/memory.t
+t/mess.t
+t/misc.t
+t/mPUSH.t
+t/MY_CXT.t
+t/newCONSTSUB.t
+t/newRV.t
+t/newSV_type.t
+t/newSVpv.t
+t/podtest.t
+t/ppphtest.t
+t/pv_tools.t
+t/pvs.t
+t/shared_pv.t
+t/snprintf.t
+t/sprintf.t
+t/strlfuncs.t
+t/Sv_set.t
+t/sv_xpvf.t
+t/SvPV.t
+t/SvREFCNT.t
+t/testutil.pl
+t/threads.t
+t/utf8.t
+t/uv.t
+t/variables.t
+t/warn.t
+TODO
+typemap
 META.yml                                 Module YAML meta-data (added by 
MakeMaker)
 META.json                                Module JSON meta-data (added by 
MakeMaker)
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Devel-PPPort-3.66/META.json 
new/Devel-PPPort-3.67/META.json
--- old/Devel-PPPort-3.66/META.json     2022-03-02 23:39:12.000000000 +0100
+++ new/Devel-PPPort-3.67/META.json     2022-03-08 20:07:06.000000000 +0100
@@ -34,7 +34,7 @@
    "provides" : {
       "Devel::PPPort" : {
          "file" : "PPPort.pm",
-         "version" : "3.66"
+         "version" : "3.67"
       }
    },
    "release_status" : "stable",
@@ -48,6 +48,6 @@
          "web" : "https://github.com/Dual-Life/Devel-PPPort";
       }
    },
-   "version" : "3.66",
+   "version" : "3.67",
    "x_serialization_backend" : "JSON::PP version 4.04"
 }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Devel-PPPort-3.66/META.yml 
new/Devel-PPPort-3.67/META.yml
--- old/Devel-PPPort-3.66/META.yml      2022-03-02 23:39:12.000000000 +0100
+++ new/Devel-PPPort-3.67/META.yml      2022-03-08 20:07:06.000000000 +0100
@@ -20,9 +20,9 @@
 provides:
   Devel::PPPort:
     file: PPPort.pm
-    version: '3.66'
+    version: '3.67'
 resources:
   bugtracker: https://github.com/Dual-Life/Devel-PPPort/issues
   repository: git://github.com/Dual-Life/Devel-PPPort.git
-version: '3.66'
+version: '3.67'
 x_serialization_backend: 'CPAN::Meta::YAML version 0.018'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Devel-PPPort-3.66/PPPort.pm 
new/Devel-PPPort-3.67/PPPort.pm
--- old/Devel-PPPort-3.66/PPPort.pm     2022-03-02 23:37:10.000000000 +0100
+++ new/Devel-PPPort-3.67/PPPort.pm     2022-03-08 20:06:40.000000000 +0100
@@ -3978,7 +3978,7 @@
 use strict;
 use vars qw($VERSION $data);
 
-$VERSION = '3.66';
+$VERSION = '3.67';
 
 sub _init_data
 {
@@ -4730,6 +4730,8 @@
 AHOCORASICK_tb|5.035004||Viu
 AHOCORASICK_tb_p8|5.033003||Viu
 AHOCORASICK_tb_pb|5.033003||Viu
+ALIGNED_TYPE_NAME|||Viu
+ALIGNED_TYPE|||Viu
 alloccopstash|5.017001|5.017001|x
 alloc_LOGOP|5.025004||xViu
 allocmy|5.008001||Viu
@@ -4978,6 +4980,8 @@
 __ASSERT_|5.019007|5.008008|p
 ASSERT_CURPAD_ACTIVE|5.008001||Viu
 ASSERT_CURPAD_LEGAL|5.008001||Viu
+ASSERT_IS_LITERAL|||Viu
+ASSERT_IS_PTR|||Viu
 assert_not_glob|5.009004||Viu
 ASSERT_NOT_PTR|5.035004||Viu
 assert_not_ROK|5.008001||Viu
@@ -5688,6 +5692,7 @@
 cop_store_label|5.031004|5.031004|x
 Copy|5.003007|5.003007|
 CopyD|5.009002|5.003007|p
+copy_length|||Viu
 core_prototype|5.015002||Vi
 coresub_op|5.015003||Viu
 CowREFCNT|5.017007||Viu
@@ -6254,6 +6259,7 @@
 DEFINEP_tb_pb|5.033003||Viu
 DEFSV|5.004005|5.003007|p
 DEFSV_set|5.010001|5.003007|p
+del_body_by_type|||Viu
 delete_eval_scope|5.009004||xViu
 delimcpy|5.004000|5.004000|n
 delimcpy_no_escape|5.025005||cVni
@@ -6847,6 +6853,9 @@
 find_uninit_var|5.009002||xVi
 FIRST_NON_ASCII_DECIMAL_DIGIT|5.027007||Viu
 first_symbol|5.009003||Vniu
+FIT_ARENA0|||Viu
+FIT_ARENAn|||Viu
+FIT_ARENA|||Viu
 FITS_IN_8_BITS|5.013005||Viu
 fixup_errno_string|5.019007||Viu
 FLAGS|5.013006||Viu
@@ -7328,6 +7337,7 @@
 G_WARN_ON|5.006000||Viu
 G_WARN_ONCE|5.006000||Viu
 G_WRITING_TO_STDERR|5.013009||Viu
+HADNV|||Viu
 handle_named_backref|5.023008||Viu
 handle_names_wildcard|5.031011||Viu
 handle_possible_posix|5.023008||Viu
@@ -7337,6 +7347,7 @@
 HAS_ACCESS|5.006000|5.006000|Vn
 HAS_ACOSH|5.021004|5.021004|Vn
 HAS_ALARM|5.003007|5.003007|Vn
+HASARENA|||Viu
 HAS_ASCTIME_R|5.010000|5.010000|Vn
 HAS_ASINH|5.021006|5.021006|Vn
 HAS_ATANH|5.021006|5.021006|Vn
@@ -9278,8 +9289,10 @@
 MEM_LOG_ALLOC|5.009003||Viu
 mem_log_alloc|5.024000||Vniu
 mem_log_common|5.010001||Vniu
+MEM_LOG_DEL_SV|||Viu
 MEM_LOG_FREE|5.009003||Viu
 mem_log_free|5.024000||Vniu
+MEM_LOG_NEW_SV|||Viu
 MEM_LOG_REALLOC|5.009003||Viu
 mem_log_realloc|5.024000||Vniu
 memLT|5.025005||Viu
@@ -9371,8 +9384,8 @@
 MON_7|5.027010||Viu
 MON_8|5.027010||Viu
 MON_9|5.027010||Viu
-more_bodies|||iu
-more_sv|5.009004||Viu
+more_bodies|||cu
+more_sv|5.009004||cVu
 moreswitches|5.003007||cVu
 mortal_getenv|5.031011||cVnu
 Move|5.003007|5.003007|
@@ -9570,6 +9583,8 @@
 newAV_alloc_xz|5.035001|5.035001|
 newAVREF|5.003007|5.003007|u
 newBINOP|5.003007|5.003007|
+new_body_allocated|||Viu
+new_body_from_arena|||Viu
 Newc|5.003007||Viu
 new_collate|5.006000||Viu
 newCONDOP|5.003007|5.003007|
@@ -9606,6 +9621,8 @@
 newMETHOP_named|5.021005|5.021005|
 new_msg_hv|5.027009||Viu
 newMYSUB|5.017004|5.017004|u
+new_NOARENA|||Viu
+new_NOARENAZ|||Viu
 newNULLLIST|5.003007|5.003007|
 new_numeric|5.006000||Viu
 newOP|5.003007|5.003007|
@@ -9651,7 +9668,9 @@
 newSVsv_flags|5.029009|5.003007|p
 newSVsv_nomg|5.029009|5.003007|p
 newSV_type|5.009005|5.003007|p
+newSV_type_mortal|||
 newSVuv|5.006000|5.003007|p
+new_SV|||Viu
 newTRYCATCHOP|5.033007|5.033007|x
 newUNOP|5.003007|5.003007|
 newUNOP_AUX|5.021007|5.021007|
@@ -9662,6 +9681,9 @@
 newWHILEOP|5.013007|5.013007|
 Newx|5.009003|5.003007|p
 Newxc|5.009003|5.003007|p
+new_XNV|||Viu
+new_XPVMG|||Viu
+new_XPVNV|||Viu
 newXS|5.006000|5.006000|
 newXS_deffile|5.021006||cViu
 newXS_flags|5.009004|5.009004|xu
@@ -9678,6 +9700,7 @@
 ninstr|5.003007|5.003007|n
 NL_LANGINFO_LOCK|5.033005||Viu
 NL_LANGINFO_UNLOCK|5.033005||Viu
+NOARENA|||Viu
 no_bareword_allowed|5.005004||Viu
 no_bareword_filehandle|5.033006||Viu
 NOCAPTURE_PAT_MOD|5.021008||Viu
@@ -9695,6 +9718,7 @@
 NONDESTRUCT_PAT_MOD|5.013002||Viu
 NONDESTRUCT_PAT_MODS|5.013002||Viu
 NON_OTHER_COUNT|5.033005||Viu
+NONV|||Viu
 no_op|5.003007||Viu
 NOOP|5.005000|5.003007|p
 noperl_die|5.021006||vVniu
@@ -10871,6 +10895,7 @@
 perl_pthread_mutex_unlock|5.023006||Viu
 PERL_PV_ESCAPE_ALL|5.009004|5.003007|p
 PERL_PV_ESCAPE_DWIM|5.019008||Viu
+PERL_PV_ESCAPE_DWIM_ALL_HEX|||Viu
 PERL_PV_ESCAPE_FIRSTCHAR|5.009004|5.003007|p
 PERL_PV_ESCAPE_NOBACKSLASH|5.009004|5.003007|p
 PERL_PV_ESCAPE_NOCLEAR|5.009004|5.003007|p
@@ -11648,6 +11673,7 @@
 PoisonFree|5.009004|5.003007|p
 PoisonNew|5.009004|5.003007|p
 PoisonPADLIST|5.021006||Viu
+POISON_SV_HEAD|||Viu
 PoisonWith|5.009004|5.003007|p
 popen|5.003007||Viu
 POPi|5.003007|5.003007|
@@ -13027,6 +13053,8 @@
 SvAMAGIC_off|5.003007|5.003007|nu
 SvAMAGIC_on|5.003007|5.003007|nu
 SvANY|5.003007||Viu
+SvARENA_CHAIN_SET|||Viu
+SvARENA_CHAIN|||Viu
 sv_backoff|5.003007|5.003007|n
 sv_bless|5.003007|5.003007|
 sv_buf_to_ro|5.019008||Viu
@@ -14063,6 +14091,7 @@
 update_debugger_info|5.009005||Viu
 upg_version|5.009005|5.009005|
 UPG_VERSION|5.019008||Viu
+uproot_SV|||Viu
 Uquad_t|5.006000|5.006000|Vn
 U_S|5.003007||Viu
 usage|5.005000||Viu
@@ -15553,7 +15582,7 @@
 #define DPPP_CAT2(x,y) CAT2(x,y)
 #define DPPP_(name) DPPP_CAT2(DPPP_NAMESPACE, name)
 
-#define D_PPP_RELEASE_DATE 1646179200 /* 2022-03-02 */
+#define D_PPP_RELEASE_DATE 1646697600 /* 2022-03-08 */
 
 #if ! defined(PERL_REVISION) && ! defined(PERL_VERSION_MAJOR)
 #  if   !   defined(__PATCHLEVEL_H_INCLUDED__)                                 
 \
@@ -19875,12 +19904,12 @@
      PERL_STATIC_INLINE SV* D_PPP_newSVpvn_flags(const char *const s, const 
STRLEN len, const U32 flags)
      {
         dTHX;
-        SV * sv = newSVpvn(s, len));
+        SV * sv = newSVpvn(s, len);
         SvFLAGS(sv) |= (flags & SVf_UTF8);
         if (flags & SVs_TEMP) return sv_2mortal(sv);
         return sv;
      }
-#    define newSVpvn_flags(s, len, flags) D_PPP_newSVpvn_flags((s), (len), 
(flags));
+#    define newSVpvn_flags(s, len, flags) D_PPP_newSVpvn_flags((s), (len), 
(flags))
 #  endif
 #endif
 #ifndef SV_NOSTEAL
@@ -21721,10 +21750,10 @@
 #  error Unknown character set
 #endif
 
-#if (PERL_BCDVERSION < 0x5031004)
-        /* Versions prior to this accepted things that are now considered
-         * malformations, and didn't return -1 on error with warnings enabled
-         * */
+#if (PERL_BCDVERSION < 0x5035010)
+        /* Versions prior to 5.31.4 accepted things that are now considered
+         * malformations, and didn't return -1 on error with warnings enabled.
+         * Versions before 5.35.10 dereferenced empty input without checking */
 #  undef utf8_to_uvchr_buf
 #endif
 
@@ -21781,6 +21810,34 @@
 UV
 DPPP_(my_utf8_to_uvchr_buf)(pTHX_ const U8 *s, const U8 *send, STRLEN *retlen)
 {
+#    if (PERL_BCDVERSION >= 0x5031004)   /* But from above, must be < 5.35.10 
*/
+#      if (PERL_BCDVERSION != 0x5035009)
+
+    /* Versions less than 5.35.9 could dereference s on zero length, so
+     * pass it something where no harm comes from that. */
+    if (send <= s) s = send = (U8 *) "?";
+    return Perl_utf8_to_uvchr_buf_helper(aTHX_ s, send, retlen);
+
+#      else /* Below is 5.35.9, which also works on non-empty input, but
+               for empty input, can wrongly dereference, and additionally is
+               also just plain broken */
+    if (send > s) return Perl_utf8_to_uvchr_buf_helper(aTHX_ s, send, retlen);
+    if (! ckWARN_d(WARN_UTF8)) {
+        if (retlen) *retlen = 0;
+        return UNICODE_REPLACEMENT;
+    }
+    else {
+        s = send = (U8 *) "?";
+
+        /* Call just for its warning */
+        (void) Perl__utf8n_to_uvchr_msgs_helper(s, 0, NULL, 0, NULL, NULL);
+        if (retlen) *retlen = (STRLEN) -1;
+        return 0;
+    }
+
+#      endif
+#    else
+
     UV ret;
     STRLEN curlen;
     bool overflows = 0;
@@ -21802,7 +21859,7 @@
         }
     }
 
-#    if (PERL_BCDVERSION < 0x5026000) && ! defined(EBCDIC)
+#      if (PERL_BCDVERSION < 0x5026000) && ! defined(EBCDIC)
 
     /* Perl did not properly detect overflow for much of its history on
      * non-EBCDIC platforms, often returning an overlong value which may or may
@@ -21857,7 +21914,7 @@
     }
     else
 
-#    endif  /* < 5.26 */
+#      endif  /* < 5.26 */
 
         /* Here, we are either in a release that properly detects overflow, or
          * we have checked for overflow and the next statement is executing as
@@ -21870,7 +21927,7 @@
                     s, curlen, retlen,   (UTF8_ALLOW_ANYUV
                                       & ~(UTF8_ALLOW_LONG|UTF8_ALLOW_EMPTY)));
 
-#    if (PERL_BCDVERSION >= 0x5026000) && (PERL_BCDVERSION < 0x5028000)
+#      if (PERL_BCDVERSION >= 0x5026000) && (PERL_BCDVERSION < 0x5028000)
 
     /* But actually, more modern versions restrict the UV to being no more than
      * what an IV can hold, so it could still have gotten it wrong about
@@ -21879,7 +21936,7 @@
         overflows = 1;
     }
 
-#    endif
+#      endif
 
     if (UNLIKELY(overflows)) {
         if (! do_warnings) {
@@ -21925,7 +21982,7 @@
              * modern version of this function returns */
             ret = UNICODE_REPLACEMENT;
 
-#    if (PERL_BCDVERSION < 0x5016000)
+#      if (PERL_BCDVERSION < 0x5016000)
 
             /* Versions earlier than this don't necessarily return the proper
              * length.  It should not extend past the end of string, nor past
@@ -21937,11 +21994,11 @@
                 *retlen = D_PPP_MIN(*retlen, curlen);
                 *retlen = D_PPP_MIN(*retlen, UTF8SKIP(s));
                 do {
-#      ifdef UTF8_IS_CONTINUATION
+#        ifdef UTF8_IS_CONTINUATION
                     if (! UTF8_IS_CONTINUATION(s[i]))
-#      else       /* Versions without the above don't support EBCDIC anyway */
+#        else       /* Versions without the above don't support EBCDIC anyway 
*/
                     if (s[i] < 0x80 || s[i] > 0xBF)
-#      endif
+#        endif
                     {
                         *retlen = i;
                         break;
@@ -21949,12 +22006,15 @@
                 } while (++i < *retlen);
             }
 
-#    endif
+#      endif  /* end of < 5.16.0 */
 
         }
     }
 
     return ret;
+
+#    endif    /* end of < 5.31.4 */
+
 }
 
 #  endif
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Devel-PPPort-3.66/PPPort_pm.PL 
new/Devel-PPPort-3.67/PPPort_pm.PL
--- old/Devel-PPPort-3.66/PPPort_pm.PL  2022-03-02 23:35:59.000000000 +0100
+++ new/Devel-PPPort-3.67/PPPort_pm.PL  2022-03-08 20:03:12.000000000 +0100
@@ -756,7 +756,7 @@
 use strict;
 use vars qw($VERSION $data);
 
-$VERSION = '3.66';
+$VERSION = '3.67';
 
 sub _init_data
 {
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Devel-PPPort-3.66/parts/base/5035010 
new/Devel-PPPort-3.67/parts/base/5035010
--- old/Devel-PPPort-3.66/parts/base/5035010    2022-03-02 22:56:50.000000000 
+0100
+++ new/Devel-PPPort-3.67/parts/base/5035010    2022-03-08 19:56:32.000000000 
+0100
@@ -1,4 +1,15 @@
 5.035010
+ALIGNED_TYPE                   # Z added by devel/scanprov
+ALIGNED_TYPE_NAME              # Z added by devel/scanprov
+ASSERT_IS_LITERAL              # Z added by devel/scanprov
+ASSERT_IS_PTR                  # Z added by devel/scanprov
+copy_length                    # Z added by devel/scanprov
+del_body_by_type               # Z added by devel/scanprov
+FIT_ARENA                      # Z added by devel/scanprov
+FIT_ARENA0                     # Z added by devel/scanprov
+FIT_ARENAn                     # Z added by devel/scanprov
+HADNV                          # Z added by devel/scanprov
+HASARENA                       # Z added by devel/scanprov
 LOOKBEHIND_END                 # Z added by devel/scanprov
 LOOKBEHIND_END_t8              # Z added by devel/scanprov
 LOOKBEHIND_END_t8_p8           # Z added by devel/scanprov
@@ -6,10 +17,28 @@
 LOOKBEHIND_END_tb              # Z added by devel/scanprov
 LOOKBEHIND_END_tb_p8           # Z added by devel/scanprov
 LOOKBEHIND_END_tb_pb           # Z added by devel/scanprov
+MEM_LOG_DEL_SV                 # Z added by devel/scanprov
+MEM_LOG_NEW_SV                 # Z added by devel/scanprov
+new_body_allocated             # Z added by devel/scanprov
+new_body_from_arena            # Z added by devel/scanprov
+new_NOARENA                    # Z added by devel/scanprov
+new_NOARENAZ                   # Z added by devel/scanprov
+new_SV                         # Z added by devel/scanprov
+newSV_type_mortal              # U
+new_XNV                        # Z added by devel/scanprov
+new_XPVMG                      # Z added by devel/scanprov
+new_XPVNV                      # Z added by devel/scanprov
+NOARENA                        # Z added by devel/scanprov
+NONV                           # Z added by devel/scanprov
+PERL_PV_ESCAPE_DWIM_ALL_HEX    # Z added by devel/scanprov
+POISON_SV_HEAD                 # Z added by devel/scanprov
 reg_la_NOTHING                 # F added by devel/scanprov
 reg_la_OPFAIL                  # F added by devel/scanprov
 REG_LB_SEEN                    # Z added by devel/scanprov
 regnode_guts_debug             # F added by devel/scanprov
+SvARENA_CHAIN                  # Z added by devel/scanprov
+SvARENA_CHAIN_SET              # Z added by devel/scanprov
 sv_len_utf8_nomg               # U (Perl_sv_len_utf8_nomg)
 SvPOK_or_cached_IV             # Z added by devel/scanprov
+uproot_SV                      # Z added by devel/scanprov
 UTF8_IS_REPLACEMENT            # U
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Devel-PPPort-3.66/parts/embed.fnc 
new/Devel-PPPort-3.67/parts/embed.fnc
--- old/Devel-PPPort-3.66/parts/embed.fnc       2022-03-02 22:56:50.000000000 
+0100
+++ new/Devel-PPPort-3.67/parts/embed.fnc       2022-03-08 19:56:32.000000000 
+0100
@@ -1519,7 +1519,8 @@
 ApMbdR |SV*    |newSVsv        |NULLOK SV *const old
 AmdR   |SV*    |newSVsv_nomg   |NULLOK SV *const old
 AdpR   |SV*    |newSVsv_flags  |NULLOK SV *const old|I32 flags
-ApdR   |SV*    |newSV_type     |const svtype type
+ApdiR  |SV*    |newSV_type     |const svtype type
+ApdIR  |SV*    |newSV_type_mortal|const svtype type
 ApdR   |OP*    |newUNOP        |I32 type|I32 flags|NULLOK OP* first
 ApdR   |OP*    |newUNOP_AUX    |I32 type|I32 flags|NULLOK OP* first \
                                |NULLOK UNOP_AUX_item *aux
@@ -3171,7 +3172,7 @@
 S      |void   |assert_uft8_cache_coherent|NN const char *const func \
                |STRLEN from_cache|STRLEN real|NN SV *const sv
 ST     |char * |F0convert      |NV nv|NN char *const endbuf|NN STRLEN *const 
len
-S      |SV *   |more_sv
+Cp     |SV *   |more_sv
 S      |bool   |sv_2iuv_common |NN SV *const sv
 S      |void   |glob_assign_glob|NN SV *const dsv|NN SV *const ssv \
                |const int dtype
@@ -3180,7 +3181,7 @@
 #endif
 
 : Used in sv.c and hv.c
-po     |void * |more_bodies    |const svtype sv_type|const size_t body_size \
+Cpo    |void * |more_bodies    |const svtype sv_type|const size_t body_size \
                                |const size_t arena_size
 EXpR   |SV*    |get_and_check_backslash_N_name|NN const char* s        \
                                |NN const char* e                       \
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Devel-PPPort-3.66/parts/inc/newSVpv 
new/Devel-PPPort-3.67/parts/inc/newSVpv
--- old/Devel-PPPort-3.66/parts/inc/newSVpv     2022-03-02 22:56:50.000000000 
+0100
+++ new/Devel-PPPort-3.67/parts/inc/newSVpv     2022-03-04 16:53:50.000000000 
+0100
@@ -43,12 +43,12 @@
      PERL_STATIC_INLINE SV* D_PPP_newSVpvn_flags(const char *const s, const 
STRLEN len, const U32 flags)
      {
         dTHX;
-        SV * sv = newSVpvn(s, len));
+        SV * sv = newSVpvn(s, len);
         SvFLAGS(sv) |= (flags & SVf_UTF8);
         if (flags & SVs_TEMP) return sv_2mortal(sv);
         return sv;
      }
-#    define newSVpvn_flags(s, len, flags) D_PPP_newSVpvn_flags((s), (len), 
(flags));
+#    define newSVpvn_flags(s, len, flags) D_PPP_newSVpvn_flags((s), (len), 
(flags))
 #  endif
 #endif
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Devel-PPPort-3.66/parts/inc/utf8 
new/Devel-PPPort-3.67/parts/inc/utf8
--- old/Devel-PPPort-3.66/parts/inc/utf8        2022-03-02 22:56:50.000000000 
+0100
+++ new/Devel-PPPort-3.67/parts/inc/utf8        2022-03-08 19:56:32.000000000 
+0100
@@ -182,10 +182,10 @@
 #  error Unknown character set
 #endif
 
-#if { VERSION < 5.31.4 }
-        /* Versions prior to this accepted things that are now considered
-         * malformations, and didn't return -1 on error with warnings enabled
-         * */
+#if { VERSION < 5.35.10 }
+        /* Versions prior to 5.31.4 accepted things that are now considered
+         * malformations, and didn't return -1 on error with warnings enabled.
+         * Versions before 5.35.10 dereferenced empty input without checking */
 #  undef utf8_to_uvchr_buf
 #endif
 
@@ -228,6 +228,34 @@
 UV
 utf8_to_uvchr_buf(pTHX_ const U8 *s, const U8 *send, STRLEN *retlen)
 {
+#    if { VERSION >= 5.31.4 }   /* But from above, must be < 5.35.10 */
+#      if { VERSION != 5.35.9 }
+
+    /* Versions less than 5.35.9 could dereference s on zero length, so
+     * pass it something where no harm comes from that. */
+    if (send <= s) s = send = (U8 *) "?";
+    return Perl_utf8_to_uvchr_buf_helper(aTHX_ s, send, retlen);
+
+#      else /* Below is 5.35.9, which also works on non-empty input, but
+               for empty input, can wrongly dereference, and additionally is
+               also just plain broken */
+    if (send > s) return Perl_utf8_to_uvchr_buf_helper(aTHX_ s, send, retlen);
+    if (! ckWARN_d(WARN_UTF8)) {
+        if (retlen) *retlen = 0;
+        return UNICODE_REPLACEMENT;
+    }
+    else {
+        s = send = (U8 *) "?";
+
+        /* Call just for its warning */
+        (void) Perl__utf8n_to_uvchr_msgs_helper(s, 0, NULL, 0, NULL, NULL);
+        if (retlen) *retlen = (STRLEN) -1;
+        return 0;
+    }
+
+#      endif
+#    else
+
     UV ret;
     STRLEN curlen;
     bool overflows = 0;
@@ -249,7 +277,7 @@
         }
     }
 
-#    if { VERSION < 5.26.0 } && ! defined(EBCDIC)
+#      if { VERSION < 5.26.0 } && ! defined(EBCDIC)
 
     /* Perl did not properly detect overflow for much of its history on
      * non-EBCDIC platforms, often returning an overlong value which may or may
@@ -304,7 +332,7 @@
     }
     else
 
-#    endif  /* < 5.26 */
+#      endif  /* < 5.26 */
 
         /* Here, we are either in a release that properly detects overflow, or
          * we have checked for overflow and the next statement is executing as
@@ -317,7 +345,7 @@
                     s, curlen, retlen,   (UTF8_ALLOW_ANYUV
                                       & ~(UTF8_ALLOW_LONG|UTF8_ALLOW_EMPTY)));
 
-#    if { VERSION >= 5.26.0 } && { VERSION < 5.28.0 }
+#      if { VERSION >= 5.26.0 } && { VERSION < 5.28.0 }
 
     /* But actually, more modern versions restrict the UV to being no more than
      * what an IV can hold, so it could still have gotten it wrong about
@@ -326,7 +354,7 @@
         overflows = 1;
     }
 
-#    endif
+#      endif
 
     if (UNLIKELY(overflows)) {
         if (! do_warnings) {
@@ -372,7 +400,7 @@
              * modern version of this function returns */
             ret = UNICODE_REPLACEMENT;
 
-#    if { VERSION < 5.16.0 }
+#      if { VERSION < 5.16.0 }
 
             /* Versions earlier than this don't necessarily return the proper
              * length.  It should not extend past the end of string, nor past
@@ -384,11 +412,11 @@
                 *retlen = D_PPP_MIN(*retlen, curlen);
                 *retlen = D_PPP_MIN(*retlen, UTF8SKIP(s));
                 do {
-#      ifdef UTF8_IS_CONTINUATION
+#        ifdef UTF8_IS_CONTINUATION
                     if (! UTF8_IS_CONTINUATION(s[i]))
-#      else       /* Versions without the above don't support EBCDIC anyway */
+#        else       /* Versions without the above don't support EBCDIC anyway 
*/
                     if (s[i] < 0x80 || s[i] > 0xBF)
-#      endif
+#        endif
                     {
                         *retlen = i;
                         break;
@@ -396,12 +424,15 @@
                 } while (++i < *retlen);
             }
 
-#    endif
+#      endif  /* end of < 5.16.0 */
 
         }
     }
 
     return ret;
+
+#    endif    /* end of < 5.31.4 */
+
 }
 
 #  endif
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Devel-PPPort-3.66/parts/inc/version 
new/Devel-PPPort-3.67/parts/inc/version
--- old/Devel-PPPort-3.66/parts/inc/version     2022-03-02 23:39:12.000000000 
+0100
+++ new/Devel-PPPort-3.67/parts/inc/version     2022-03-08 20:07:06.000000000 
+0100
@@ -26,7 +26,7 @@
 
 =implementation
 
-#define D_PPP_RELEASE_DATE 1646179200 /* 2022-03-02 */
+#define D_PPP_RELEASE_DATE 1646697600 /* 2022-03-08 */
 
 #if ! defined(PERL_REVISION) && ! defined(PERL_VERSION_MAJOR)
 #  if   !   defined(__PATCHLEVEL_H_INCLUDED__)                                 
 \
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Devel-PPPort-3.66/parts/todo/5035010 
new/Devel-PPPort-3.67/parts/todo/5035010
--- old/Devel-PPPort-3.66/parts/todo/5035010    2022-03-02 22:56:50.000000000 
+0100
+++ new/Devel-PPPort-3.67/parts/todo/5035010    2022-03-08 19:56:32.000000000 
+0100
@@ -1,2 +1,3 @@
 5.035010
+newSV_type_mortal              # U
 UTF8_IS_REPLACEMENT            # U

Reply via email to