summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorSawyer X <xsawyerx@cpan.org>2022-03-19 13:57:55 +0100
committerSawyer X <xsawyerx@cpan.org>2022-03-19 17:41:30 +0100
commit09b064e1335d8f466010f17f50ad8210ef4a351d (patch)
treef29d314d24b2d1ddd779efbb6a3dc70afa6f809e
parent0516911471d5e8d80630da876339e19e582a4961 (diff)
downloadperl-09b064e1335d8f466010f17f50ad8210ef4a351d.tar.gz
Update Devel::PPPort to 3.68
-rwxr-xr-xPorting/Maintainers.pl2
-rw-r--r--dist/Devel-PPPort/Changes11
-rw-r--r--dist/Devel-PPPort/PPPort_pm.PL2
-rw-r--r--dist/Devel-PPPort/parts/inc/Sv_set12
-rw-r--r--dist/Devel-PPPort/parts/inc/misc6
-rw-r--r--dist/Devel-PPPort/parts/inc/version2
6 files changed, 22 insertions, 13 deletions
diff --git a/Porting/Maintainers.pl b/Porting/Maintainers.pl
index e914484240..95428ff2b9 100755
--- a/Porting/Maintainers.pl
+++ b/Porting/Maintainers.pl
@@ -344,7 +344,7 @@ use File::Glob qw(:case);
},
'Devel::PPPort' => {
- 'DISTRIBUTION' => 'ATOOMIC/Devel-PPPort-3.64.tar.gz',
+ 'DISTRIBUTION' => 'ATOOMIC/Devel-PPPort-3.68.tar.gz',
'FILES' => q[dist/Devel-PPPort],
'EXCLUDED' => [
'PPPort.pm', # we use PPPort_pm.PL instead
diff --git a/dist/Devel-PPPort/Changes b/dist/Devel-PPPort/Changes
index e8cfb04e96..bac8e31924 100644
--- a/dist/Devel-PPPort/Changes
+++ b/dist/Devel-PPPort/Changes
@@ -1,11 +1,16 @@
Revision history for Devel-PPPort
+3.68 - 2022-03-18
+
+ * fix newSVsv_flags: rename variable to fix C++ compilation issue
+ * Update dNOOP definition for Perl < 5.27.7
+
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
+ * v5.35.9 was returning an incorrect value
+ * fix dereference empty string
3.66 - 2022-03-02
@@ -32,7 +37,7 @@ Revision history for Devel-PPPort
* Backport NOT_REACHED
* Backport G_LIST
* various internal changes
-
+
3.62 - 2020-10-16
* Restore missing PPPort.pm
* Fix metaCPAN indexing
diff --git a/dist/Devel-PPPort/PPPort_pm.PL b/dist/Devel-PPPort/PPPort_pm.PL
index 8dc2e281f1..cfbfaeb8fa 100644
--- a/dist/Devel-PPPort/PPPort_pm.PL
+++ b/dist/Devel-PPPort/PPPort_pm.PL
@@ -756,7 +756,7 @@ package Devel::PPPort;
use strict;
use vars qw($VERSION $data);
-$VERSION = '3.67';
+$VERSION = '3.68';
sub _init_data
{
diff --git a/dist/Devel-PPPort/parts/inc/Sv_set b/dist/Devel-PPPort/parts/inc/Sv_set
index dd91f51f09..cb5cd77e36 100644
--- a/dist/Devel-PPPort/parts/inc/Sv_set
+++ b/dist/Devel-PPPort/parts/inc/Sv_set
@@ -107,17 +107,17 @@ __UNDEFINED__ sv_setsv_flags(dstr, sstr, flags)
# if defined(PERL_USE_GCC_BRACE_GROUPS)
# define newSVsv_flags(sv, flags) \
({ \
- SV *new = newSV(0); \
- sv_setsv_flags(new, (sv), (flags)); \
- new; \
+ SV *n= newSV(0); \
+ sv_setsv_flags(n, (sv), (flags)); \
+ n; \
})
# else
PERL_STATIC_INLINE SV* D_PPP_newSVsv_flags(SV *const old, I32 flags)
{
dTHX;
- SV *new = newSV(0);
- sv_setsv_flags(new, old, flags);
- return new;
+ SV *n= newSV(0);
+ sv_setsv_flags(n, old, flags);
+ return n;
}
# define newSVsv_flags(sv, flags) D_PPP_newSVsv_flags(sv, flags)
# endif
diff --git a/dist/Devel-PPPort/parts/inc/misc b/dist/Devel-PPPort/parts/inc/misc
index 72437be518..72b7e724c6 100644
--- a/dist/Devel-PPPort/parts/inc/misc
+++ b/dist/Devel-PPPort/parts/inc/misc
@@ -227,7 +227,11 @@ __UNDEFINED__ SvRXOK(sv) (!!SvRX(sv))
#endif
__UNDEFINED__ NOOP /*EMPTY*/(void)0
-__UNDEFINED__ dNOOP extern int /*@unused@*/ Perl___notused PERL_UNUSED_DECL
+
+#if { VERSION < 5.6.1 } && { VERSION < 5.27.7 }
+#undef dNOOP
+__UNDEFINED__ dNOOP struct Perl___notused_struct
+#endif
#ifndef NVTYPE
# if defined(USE_LONG_DOUBLE) && defined(HAS_LONG_DOUBLE)
diff --git a/dist/Devel-PPPort/parts/inc/version b/dist/Devel-PPPort/parts/inc/version
index 4e677b23e0..18546654cf 100644
--- a/dist/Devel-PPPort/parts/inc/version
+++ b/dist/Devel-PPPort/parts/inc/version
@@ -26,7 +26,7 @@ PERL_BCDVERSION
=implementation
-#define D_PPP_RELEASE_DATE 1646697600 /* 2022-03-08 */
+#define D_PPP_RELEASE_DATE 1647561600 /* 2022-03-18 */
#if ! defined(PERL_REVISION) && ! defined(PERL_VERSION_MAJOR)
# if ! defined(__PATCHLEVEL_H_INCLUDED__) \