we need to match the declaration of ax
#endif
Xpon |I32 |xs_handshake |const U32 key|NN void * v_my_perl\
|NN const char * file| ...
-Xp |void |xs_boot_epilog |const U32 ax
+Xp |void |xs_boot_epilog |const I32 ax
#ifndef HAS_STRLCAT
Apnod |Size_t |my_strlcat |NULLOK char *dst|NULLOK const char *src|Size_t size
#endif
/* removes boilerplate code at the end of each boot_Module xsub */
void
-Perl_xs_boot_epilog(pTHX_ const U32 ax)
+Perl_xs_boot_epilog(pTHX_ const I32 ax)
{
if (PL_unitcheckav)
call_list(PL_scopestack_ix, PL_unitcheckav);
#define PERL_ARGS_ASSERT_WRITE_TO_STDERR \
assert(msv)
-PERL_CALLCONV void Perl_xs_boot_epilog(pTHX_ const U32 ax);
+PERL_CALLCONV void Perl_xs_boot_epilog(pTHX_ const I32 ax);
PERL_CALLCONV I32 Perl_xs_handshake(const U32 key, void * v_my_perl, const char * file, ...)
__attribute__nonnull__(2)
__attribute__nonnull__(3);