-# if defined(PERL_MAD)
-#define addmad(a,b,c) Perl_addmad(aTHX_ a,b,c)
-#define append_madprops(a,b,c) Perl_append_madprops(aTHX_ a,b,c)
-#define do_op_xmldump(a,b,c) Perl_do_op_xmldump(aTHX_ a,b,c)
-#define do_pmop_xmldump(a,b,c) Perl_do_pmop_xmldump(aTHX_ a,b,c)
-#define mad_free(a) Perl_mad_free(aTHX_ a)
-#define madlex() Perl_madlex(aTHX)
-#define madparse(a) Perl_madparse(aTHX_ a)
-#define newMADPROP(a,b,c,d) Perl_newMADPROP(aTHX_ a,b,c,d)
-#define newMADsv(a,b) Perl_newMADsv(aTHX_ a,b)
-#define newTOKEN(a,b,c) Perl_newTOKEN(aTHX_ a,b,c)
-#define op_getmad(a,b,c) Perl_op_getmad(aTHX_ a,b,c)
-#define op_getmad_weak(a,b,c) Perl_op_getmad_weak(aTHX_ a,b,c)
-#define op_xmldump(a) Perl_op_xmldump(aTHX_ a)
-#define package(a) Perl_package(aTHX_ a)
-#define pad_peg Perl_pad_peg
-#define pmop_xmldump(a) Perl_pmop_xmldump(aTHX_ a)
-#define prepend_madprops(a,b,c) Perl_prepend_madprops(aTHX_ a,b,c)
-#define sv_catxmlpv(a,b,c) Perl_sv_catxmlpv(aTHX_ a,b,c)
-#define sv_catxmlpvn(a,b,c,d) Perl_sv_catxmlpvn(aTHX_ a,b,c,d)
-#define sv_catxmlsv(a,b) Perl_sv_catxmlsv(aTHX_ a,b)
-#define sv_xmlpeek(a) Perl_sv_xmlpeek(aTHX_ a)
-#define token_free(a) Perl_token_free(aTHX_ a)
-#define token_getmad(a,b,c) Perl_token_getmad(aTHX_ a,b,c)
-#define utilize(a,b,c,d,e) Perl_utilize(aTHX_ a,b,c,d,e)
-#define xmldump_all() Perl_xmldump_all(aTHX)
-#define xmldump_all_perl(a) Perl_xmldump_all_perl(aTHX_ a)
-#define xmldump_eval() Perl_xmldump_eval(aTHX)
-#define xmldump_form(a) Perl_xmldump_form(aTHX_ a)
-#ifndef PERL_IMPLICIT_CONTEXT
-#define xmldump_indent Perl_xmldump_indent
-#endif
-#define xmldump_packsubs(a) Perl_xmldump_packsubs(aTHX_ a)
-#define xmldump_packsubs_perl(a,b) Perl_xmldump_packsubs_perl(aTHX_ a,b)
-#define xmldump_sub(a) Perl_xmldump_sub(aTHX_ a)
-#define xmldump_sub_perl(a,b) Perl_xmldump_sub_perl(aTHX_ a,b)
-#define xmldump_vindent(a,b,c,d) Perl_xmldump_vindent(aTHX_ a,b,c,d)
-# endif
-# if defined(PERL_NEED_MY_BETOH16)
-#define my_betoh16 Perl_my_betoh16
-# endif
-# if defined(PERL_NEED_MY_BETOH32)
-#define my_betoh32 Perl_my_betoh32
-# endif
-# if defined(PERL_NEED_MY_BETOH64)
-#define my_betoh64 Perl_my_betoh64
-# endif
-# if defined(PERL_NEED_MY_BETOHI)
-#define my_betohi Perl_my_betohi
-# endif
-# if defined(PERL_NEED_MY_BETOHL)
-#define my_betohl Perl_my_betohl
-# endif
-# if defined(PERL_NEED_MY_BETOHS)
-#define my_betohs Perl_my_betohs
-# endif
-# if defined(PERL_NEED_MY_HTOBE16)
-#define my_htobe16 Perl_my_htobe16
-# endif
-# if defined(PERL_NEED_MY_HTOBE32)
-#define my_htobe32 Perl_my_htobe32
-# endif
-# if defined(PERL_NEED_MY_HTOBE64)
-#define my_htobe64 Perl_my_htobe64
-# endif
-# if defined(PERL_NEED_MY_HTOBEI)
-#define my_htobei Perl_my_htobei
-# endif
-# if defined(PERL_NEED_MY_HTOBEL)
-#define my_htobel Perl_my_htobel
-# endif
-# if defined(PERL_NEED_MY_HTOBES)
-#define my_htobes Perl_my_htobes
-# endif
-# if defined(PERL_NEED_MY_HTOLE16)
-#define my_htole16 Perl_my_htole16
-# endif
-# if defined(PERL_NEED_MY_HTOLE32)
-#define my_htole32 Perl_my_htole32
-# endif
-# if defined(PERL_NEED_MY_HTOLE64)
-#define my_htole64 Perl_my_htole64
-# endif
-# if defined(PERL_NEED_MY_HTOLEI)
-#define my_htolei Perl_my_htolei
-# endif
-# if defined(PERL_NEED_MY_HTOLEL)
-#define my_htolel Perl_my_htolel
-# endif
-# if defined(PERL_NEED_MY_HTOLES)
-#define my_htoles Perl_my_htoles
-# endif
-# if defined(PERL_NEED_MY_LETOH16)
-#define my_letoh16 Perl_my_letoh16
-# endif
-# if defined(PERL_NEED_MY_LETOH32)
-#define my_letoh32 Perl_my_letoh32
-# endif
-# if defined(PERL_NEED_MY_LETOH64)
-#define my_letoh64 Perl_my_letoh64
-# endif
-# if defined(PERL_NEED_MY_LETOHI)
-#define my_letohi Perl_my_letohi
-# endif
-# if defined(PERL_NEED_MY_LETOHL)
-#define my_letohl Perl_my_letohl
-# endif
-# if defined(PERL_NEED_MY_LETOHS)
-#define my_letohs Perl_my_letohs
-# endif