Re: Named-capture regex syntax

[p5sagit/p5-mst-13.2.git] / perlapi.h

diff --git a/perlapi.h b/perlapi.h
index f5b8d12..2547323 100644 (file)
--- a/perlapi.h
+++ b/perlapi.h
@@ -502,6 +502,8 @@ END_EXTERN_C
 #define PL_padix               (*Perl_Ipadix_ptr(aTHX))
 #undef  PL_padix_floor
 #define PL_padix_floor         (*Perl_Ipadix_floor_ptr(aTHX))
+#undef  PL_parser
+#define PL_parser              (*Perl_Iparser_ptr(aTHX))
 #undef  PL_patchlevel
 #define PL_patchlevel          (*Perl_Ipatchlevel_ptr(aTHX))
 #undef  PL_pending_ident
@@ -640,6 +642,10 @@ END_EXTERN_C
 #define PL_uid                 (*Perl_Iuid_ptr(aTHX))
 #undef  PL_unicode
 #define PL_unicode             (*Perl_Iunicode_ptr(aTHX))
+#undef  PL_unitcheckav
+#define PL_unitcheckav         (*Perl_Iunitcheckav_ptr(aTHX))
+#undef  PL_unitcheckav_save
+#define PL_unitcheckav_save    (*Perl_Iunitcheckav_save_ptr(aTHX))
 #undef  PL_unlockhook
 #define PL_unlockhook          (*Perl_Iunlockhook_ptr(aTHX))
 #undef  PL_unsafe
@@ -696,10 +702,6 @@ END_EXTERN_C
 #define PL_widesyscalls                (*Perl_Iwidesyscalls_ptr(aTHX))
 #undef  PL_xmlfp
 #define PL_xmlfp               (*Perl_Ixmlfp_ptr(aTHX))
-#undef  PL_yycharp
-#define PL_yycharp             (*Perl_Iyycharp_ptr(aTHX))
-#undef  PL_yylvalp
-#define PL_yylvalp             (*Perl_Iyylvalp_ptr(aTHX))
 #undef  PL_Sv
 #define PL_Sv                  (*Perl_TSv_ptr(aTHX))
 #undef  PL_Xpv
@@ -784,20 +786,8 @@ END_EXTERN_C
 #define PL_peepp               (*Perl_Tpeepp_ptr(aTHX))
 #undef  PL_reg_state
 #define PL_reg_state           (*Perl_Treg_state_ptr(aTHX))
-#undef  PL_regcompp
-#define PL_regcompp            (*Perl_Tregcompp_ptr(aTHX))
 #undef  PL_regdummy
 #define PL_regdummy            (*Perl_Tregdummy_ptr(aTHX))
-#undef  PL_regdupe
-#define PL_regdupe             (*Perl_Tregdupe_ptr(aTHX))
-#undef  PL_regexecp
-#define PL_regexecp            (*Perl_Tregexecp_ptr(aTHX))
-#undef  PL_regfree
-#define PL_regfree             (*Perl_Tregfree_ptr(aTHX))
-#undef  PL_regint_start
-#define PL_regint_start                (*Perl_Tregint_start_ptr(aTHX))
-#undef  PL_regint_string
-#define PL_regint_string       (*Perl_Tregint_string_ptr(aTHX))
 #undef  PL_reginterp_cnt
 #define PL_reginterp_cnt       (*Perl_Treginterp_cnt_ptr(aTHX))
 #undef  PL_regmatch_slab
@@ -910,6 +900,8 @@ END_EXTERN_C
 #define PL_perlio_fd_refcnt    (*Perl_Gperlio_fd_refcnt_ptr(NULL))
 #undef  PL_perlio_fd_refcnt_size
 #define PL_perlio_fd_refcnt_size       (*Perl_Gperlio_fd_refcnt_size_ptr(NULL))
+#undef  PL_perlio_mutex
+#define PL_perlio_mutex                (*Perl_Gperlio_mutex_ptr(NULL))
 #undef  PL_ppaddr
 #define PL_ppaddr              (*Perl_Gppaddr_ptr(NULL))
 #undef  PL_sh_path