jpl tweak
[p5sagit/p5-mst-13.2.git] / objXSUB.h
index e7b34b1..5da23fe 100644 (file)
--- a/objXSUB.h
+++ b/objXSUB.h
 #define PL_dowarn              (*Perl_Idowarn_ptr(aTHXo))
 #undef  PL_e_script
 #define PL_e_script            (*Perl_Ie_script_ptr(aTHXo))
-#undef  PL_efloatbuf
-#define PL_efloatbuf           (*Perl_Iefloatbuf_ptr(aTHXo))
-#undef  PL_efloatsize
-#define PL_efloatsize          (*Perl_Iefloatsize_ptr(aTHXo))
 #undef  PL_egid
 #define PL_egid                        (*Perl_Iegid_ptr(aTHXo))
 #undef  PL_endav
 #define PL_dirty               (*Perl_Tdirty_ptr(aTHXo))
 #undef  PL_dumpindent
 #define PL_dumpindent          (*Perl_Tdumpindent_ptr(aTHXo))
+#undef  PL_efloatbuf
+#define PL_efloatbuf           (*Perl_Tefloatbuf_ptr(aTHXo))
+#undef  PL_efloatsize
+#define PL_efloatsize          (*Perl_Tefloatsize_ptr(aTHXo))
 #undef  PL_extralen
 #define PL_extralen            (*Perl_Textralen_ptr(aTHXo))
 #undef  PL_firstgv
 #endif
 #if defined(PERL_IN_UNIVERSAL_C) || defined(PERL_DECL_PROT)
 #endif
-#if defined(PERL_IN_XSUTILS_C) || defined(PERL_DECL_PROT)
-#endif
 #if defined(PERL_IN_UTIL_C) || defined(PERL_DECL_PROT)
 #  if defined(LEAKTEST)
 #  endif
 #define Perl_ck_index          pPerl->Perl_ck_index
 #undef  ck_index
 #define ck_index               Perl_ck_index
+#undef  Perl_ck_join
+#define Perl_ck_join           pPerl->Perl_ck_join
+#undef  ck_join
+#define ck_join                        Perl_ck_join
 #undef  Perl_ck_lengthconst
 #define Perl_ck_lengthconst    pPerl->Perl_ck_lengthconst
 #undef  ck_lengthconst
 #define Perl_pp_leavesub       pPerl->Perl_pp_leavesub
 #undef  pp_leavesub
 #define pp_leavesub            Perl_pp_leavesub
+#undef  Perl_pp_leavesublv
+#define Perl_pp_leavesublv     pPerl->Perl_pp_leavesublv
+#undef  pp_leavesublv
+#define pp_leavesublv          Perl_pp_leavesublv
 #undef  Perl_pp_leavetry
 #define Perl_pp_leavetry       pPerl->Perl_pp_leavetry
 #undef  pp_leavetry