On Fri, Sep 27, 2019 at 8:21 PM Eli Zaretskii <[email protected]> wrote: > I see this in boot_Texinfo__Parser: > > XS_EXTERNAL(boot_Texinfo__Parser); /* prototype to pass > -Wmissing-prototypes */ > XS_EXTERNAL(boot_Texinfo__Parser) > { > #if PERL_VERSION_LE(5, 21, 5) > dVAR; dXSARGS; > #else > dVAR; dXSBOOTARGSXSAPIVERCHK; > #endif > [...] > #if PERL_VERSION_LE(5, 21, 5) > XS_VERSION_BOOTCHECK; > # ifdef XS_APIVERSION_BOOTCHECK > XS_APIVERSION_BOOTCHECK; > # endif > #endif > [...] > #if PERL_VERSION_LE(5, 21, 5) > # if PERL_VERSION_GE(5, 9, 0) > if (PL_unitcheckav) > call_list(PL_scopestack_ix, PL_unitcheckav); > # endif > XSRETURN_YES; > #else > Perl_xs_boot_epilog(aTHX_ ax); > #endif > > I cannot check right now, but I think the version of Perl on the > system where I built the pretest was indeed above 5.21.5. > > What is the conditional code above about? Why is it needed?
I don't know: that code is automatically generated by xsubpp from Parsetexi.xs.
