X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=perlapi.h;h=49e6eed064641ab68fbfd5a8222b6d48a21c1661;hb=23131aa47a1f039c7b6f6bb5dd48b8406773ecac;hp=1912cccf9211f7c630bcf6b7ae5db48235c8df47;hpb=847a5fae45dac396d0f9e1bb61d5b4ff9d94cdcd;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/perlapi.h b/perlapi.h
old mode 100755
new mode 100644
index 1912ccc..49e6eed
--- a/perlapi.h
+++ b/perlapi.h
@@ -390,12 +390,14 @@ START_EXTERN_C
 #define PL_nthreads_cond	(*Perl_Inthreads_cond_ptr(aTHXo))
 #undef  PL_nullstash
 #define PL_nullstash		(*Perl_Inullstash_ptr(aTHXo))
+#undef  PL_numeric_compat1
+#define PL_numeric_compat1	(*Perl_Inumeric_compat1_ptr(aTHXo))
 #undef  PL_numeric_local
 #define PL_numeric_local	(*Perl_Inumeric_local_ptr(aTHXo))
 #undef  PL_numeric_name
 #define PL_numeric_name		(*Perl_Inumeric_name_ptr(aTHXo))
-#undef  PL_numeric_radix
-#define PL_numeric_radix	(*Perl_Inumeric_radix_ptr(aTHXo))
+#undef  PL_numeric_radix_sv
+#define PL_numeric_radix_sv	(*Perl_Inumeric_radix_sv_ptr(aTHXo))
 #undef  PL_numeric_standard
 #define PL_numeric_standard	(*Perl_Inumeric_standard_ptr(aTHXo))
 #undef  PL_ofmt
@@ -456,6 +458,12 @@ START_EXTERN_C
 #define PL_psig_ptr		(*Perl_Ipsig_ptr_ptr(aTHXo))
 #undef  PL_ptr_table
 #define PL_ptr_table		(*Perl_Iptr_table_ptr(aTHXo))
+#undef  PL_reentrant_buffer
+#define PL_reentrant_buffer	(*Perl_Ireentrant_buffer_ptr(aTHXo))
+#undef  PL_regex_pad
+#define PL_regex_pad		(*Perl_Iregex_pad_ptr(aTHXo))
+#undef  PL_regex_padav
+#define PL_regex_padav		(*Perl_Iregex_padav_ptr(aTHXo))
 #undef  PL_replgv
 #define PL_replgv		(*Perl_Ireplgv_ptr(aTHXo))
 #undef  PL_rsfp
@@ -772,6 +780,8 @@ START_EXTERN_C
 #define PL_regcomp_parse	(*Perl_Tregcomp_parse_ptr(aTHXo))
 #undef  PL_regcomp_rx
 #define PL_regcomp_rx		(*Perl_Tregcomp_rx_ptr(aTHXo))
+#undef  PL_regcompat1
+#define PL_regcompat1		(*Perl_Tregcompat1_ptr(aTHXo))
 #undef  PL_regcompp
 #define PL_regcompp		(*Perl_Tregcompp_ptr(aTHXo))
 #undef  PL_regdata
@@ -798,6 +808,8 @@ START_EXTERN_C
 #define PL_regint_string	(*Perl_Tregint_string_ptr(aTHXo))
 #undef  PL_reginterp_cnt
 #define PL_reginterp_cnt	(*Perl_Treginterp_cnt_ptr(aTHXo))
+#undef  PL_reglastcloseparen
+#define PL_reglastcloseparen	(*Perl_Treglastcloseparen_ptr(aTHXo))
 #undef  PL_reglastparen
 #define PL_reglastparen		(*Perl_Treglastparen_ptr(aTHXo))
 #undef  PL_regnarrate
@@ -808,8 +820,6 @@ START_EXTERN_C
 #define PL_regnpar		(*Perl_Tregnpar_ptr(aTHXo))
 #undef  PL_regprecomp
 #define PL_regprecomp		(*Perl_Tregprecomp_ptr(aTHXo))
-#undef  PL_regprev
-#define PL_regprev		(*Perl_Tregprev_ptr(aTHXo))
 #undef  PL_regprogram
 #define PL_regprogram		(*Perl_Tregprogram_ptr(aTHXo))
 #undef  PL_regsawback