Patch 8.2.1031

[Bram Moolenaar]

Patch 8.2.1031
Problem: Build failure with Perl5.32.
Solution: Define a few more functions. (Felix Yan, closes #6310)
Files: src/if_perl.xs


*** ../vim-8.2.1030/src/if_perl.xs 2020-06-12 22:59:07.274097177 +0200
--- src/if_perl.xs 2020-06-21 20:06:35.134094970 +0200
***************
*** 658,663 ****
--- 658,668 ----
}
# endif

+ /* perl-5.32 needs Perl_SvREFCNT_dec */
+ # if (PERL_REVISION == 5) && (PERL_VERSION >= 32)
+ # define Perl_SvREFCNT_dec S_SvREFCNT_dec
+ # endif
+
/* perl-5.26 also needs S_TOPMARK and S_POPMARK. */
# if (PERL_REVISION == 5) && (PERL_VERSION >= 26)
PERL_STATIC_INLINE I32
***************
*** 682,687 ****
--- 687,706 ----
}
# endif

+ /* perl-5.32 needs Perl_POPMARK */
+ # if (PERL_REVISION == 5) && (PERL_VERSION >= 32)
+ # define Perl_POPMARK S_POPMARK
+
+ /* perl-5.32 needs Perl_SvTRUE */
+ PERL_STATIC_INLINE bool
+ Perl_SvTRUE(pTHX_ SV *sv) {
+ if (!LIKELY(sv))
+ return FALSE;
+ SvGETMAGIC(sv);
+ return SvTRUE_nomg_NN(sv);
+ }
+ # endif
+
/*
* Make all runtime-links of perl.
*
*** ../vim-8.2.1030/src/version.c 2020-06-21 17:57:28.017960419 +0200
--- src/version.c 2020-06-21 20:04:43.582407653 +0200
***************
*** 756,757 ****
--- 756,759 ----
{ /* Add new patch number below this line */
+ /**/
+ 1031,
/**/

--
ARTHUR: What does it say?
BROTHER MAYNARD: It reads ... "Here may be found the last words of Joseph of
Aramathea." "He who is valorous and pure of heart may find
the Holy Grail in the aaaaarrrrrrggghhh..."
ARTHUR: What?
BROTHER MAYNARD: "The Aaaaarrrrrrggghhh..."
"Monty Python and the Holy Grail" PYTHON (MONTY) PICTURES LTD

/// Bram Moolenaar -- Br...@Moolenaar.net -- http://www.Moolenaar.net \\\
/// sponsor Vim, vote for features -- http://www.Vim.org/sponsor/ \\\
\\\ an exciting new programming language -- http://www.Zimbu.org ///
\\\ help me help AIDS victims -- http://ICCF-Holland.org ///