X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=perlapi.h;h=71384aca7ebd985b0c977e5e3cd9b61924096ec7;hb=206b12d5641a74e09d210dd4ea3998febd96392f;hp=634634c047cf909702c90a69da7dde8dd56961ea;hpb=ee8c7f5465f003860e2347a2946abacac39bd9b9;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/perlapi.h b/perlapi.h
old mode 100755
new mode 100644
index 634634c..71384ac
--- a/perlapi.h
+++ b/perlapi.h
@@ -1,4 +1,4 @@
-/* !!!!!!!   DO NOT EDIT THIS FILE   !!!!!!! 
+/* !!!!!!!   DO NOT EDIT THIS FILE   !!!!!!!
    This file is built by embed.pl from data in embed.pl, pp.sym, intrpvar.h,
    perlvars.h and thrdvar.h.  Any changes made here will be lost!
 */
@@ -130,6 +130,8 @@ START_EXTERN_C
 #define PL_basetime		(*Perl_Ibasetime_ptr(aTHXo))
 #undef  PL_beginav
 #define PL_beginav		(*Perl_Ibeginav_ptr(aTHXo))
+#undef  PL_beginav_save
+#define PL_beginav_save		(*Perl_Ibeginav_save_ptr(aTHXo))
 #undef  PL_bitcount
 #define PL_bitcount		(*Perl_Ibitcount_ptr(aTHXo))
 #undef  PL_bufend
@@ -230,6 +232,8 @@ START_EXTERN_C
 #define PL_expect		(*Perl_Iexpect_ptr(aTHXo))
 #undef  PL_fdpid
 #define PL_fdpid		(*Perl_Ifdpid_ptr(aTHXo))
+#undef  PL_fdpid_mutex
+#define PL_fdpid_mutex		(*Perl_Ifdpid_mutex_ptr(aTHXo))
 #undef  PL_filemode
 #define PL_filemode		(*Perl_Ifilemode_ptr(aTHXo))
 #undef  PL_forkprocess
@@ -246,6 +250,8 @@ START_EXTERN_C
 #define PL_glob_index		(*Perl_Iglob_index_ptr(aTHXo))
 #undef  PL_globalstash
 #define PL_globalstash		(*Perl_Iglobalstash_ptr(aTHXo))
+#undef  PL_he_arenaroot
+#define PL_he_arenaroot		(*Perl_Ihe_arenaroot_ptr(aTHXo))
 #undef  PL_he_root
 #define PL_he_root		(*Perl_Ihe_root_ptr(aTHXo))
 #undef  PL_hintgv
@@ -384,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
@@ -414,10 +422,8 @@ START_EXTERN_C
 #define PL_origenviron		(*Perl_Iorigenviron_ptr(aTHXo))
 #undef  PL_origfilename
 #define PL_origfilename		(*Perl_Iorigfilename_ptr(aTHXo))
-#undef  PL_ors
-#define PL_ors			(*Perl_Iors_ptr(aTHXo))
-#undef  PL_orslen
-#define PL_orslen		(*Perl_Iorslen_ptr(aTHXo))
+#undef  PL_ors_sv
+#define PL_ors_sv		(*Perl_Iors_sv_ptr(aTHXo))
 #undef  PL_osname
 #define PL_osname		(*Perl_Iosname_ptr(aTHXo))
 #undef  PL_pad_reset_pending
@@ -446,10 +452,18 @@ START_EXTERN_C
 #define PL_profiledata		(*Perl_Iprofiledata_ptr(aTHXo))
 #undef  PL_psig_name
 #define PL_psig_name		(*Perl_Ipsig_name_ptr(aTHXo))
+#undef  PL_psig_pend
+#define PL_psig_pend		(*Perl_Ipsig_pend_ptr(aTHXo))
 #undef  PL_psig_ptr
 #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
@@ -462,6 +476,8 @@ START_EXTERN_C
 #define PL_sawampersand		(*Perl_Isawampersand_ptr(aTHXo))
 #undef  PL_sh_path
 #define PL_sh_path		(*Perl_Ish_path_ptr(aTHXo))
+#undef  PL_sig_pending
+#define PL_sig_pending		(*Perl_Isig_pending_ptr(aTHXo))
 #undef  PL_sighandlerp
 #define PL_sighandlerp		(*Perl_Isighandlerp_ptr(aTHXo))
 #undef  PL_splitstr
@@ -492,6 +508,8 @@ START_EXTERN_C
 #define PL_sv_arenaroot		(*Perl_Isv_arenaroot_ptr(aTHXo))
 #undef  PL_sv_count
 #define PL_sv_count		(*Perl_Isv_count_ptr(aTHXo))
+#undef  PL_sv_lock_mutex
+#define PL_sv_lock_mutex	(*Perl_Isv_lock_mutex_ptr(aTHXo))
 #undef  PL_sv_mutex
 #define PL_sv_mutex		(*Perl_Isv_mutex_ptr(aTHXo))
 #undef  PL_sv_no
@@ -568,26 +586,48 @@ START_EXTERN_C
 #define PL_xiv_arenaroot	(*Perl_Ixiv_arenaroot_ptr(aTHXo))
 #undef  PL_xiv_root
 #define PL_xiv_root		(*Perl_Ixiv_root_ptr(aTHXo))
+#undef  PL_xnv_arenaroot
+#define PL_xnv_arenaroot	(*Perl_Ixnv_arenaroot_ptr(aTHXo))
 #undef  PL_xnv_root
 #define PL_xnv_root		(*Perl_Ixnv_root_ptr(aTHXo))
+#undef  PL_xpv_arenaroot
+#define PL_xpv_arenaroot	(*Perl_Ixpv_arenaroot_ptr(aTHXo))
 #undef  PL_xpv_root
 #define PL_xpv_root		(*Perl_Ixpv_root_ptr(aTHXo))
+#undef  PL_xpvav_arenaroot
+#define PL_xpvav_arenaroot	(*Perl_Ixpvav_arenaroot_ptr(aTHXo))
 #undef  PL_xpvav_root
 #define PL_xpvav_root		(*Perl_Ixpvav_root_ptr(aTHXo))
+#undef  PL_xpvbm_arenaroot
+#define PL_xpvbm_arenaroot	(*Perl_Ixpvbm_arenaroot_ptr(aTHXo))
 #undef  PL_xpvbm_root
 #define PL_xpvbm_root		(*Perl_Ixpvbm_root_ptr(aTHXo))
+#undef  PL_xpvcv_arenaroot
+#define PL_xpvcv_arenaroot	(*Perl_Ixpvcv_arenaroot_ptr(aTHXo))
 #undef  PL_xpvcv_root
 #define PL_xpvcv_root		(*Perl_Ixpvcv_root_ptr(aTHXo))
+#undef  PL_xpvhv_arenaroot
+#define PL_xpvhv_arenaroot	(*Perl_Ixpvhv_arenaroot_ptr(aTHXo))
 #undef  PL_xpvhv_root
 #define PL_xpvhv_root		(*Perl_Ixpvhv_root_ptr(aTHXo))
+#undef  PL_xpviv_arenaroot
+#define PL_xpviv_arenaroot	(*Perl_Ixpviv_arenaroot_ptr(aTHXo))
 #undef  PL_xpviv_root
 #define PL_xpviv_root		(*Perl_Ixpviv_root_ptr(aTHXo))
+#undef  PL_xpvlv_arenaroot
+#define PL_xpvlv_arenaroot	(*Perl_Ixpvlv_arenaroot_ptr(aTHXo))
 #undef  PL_xpvlv_root
 #define PL_xpvlv_root		(*Perl_Ixpvlv_root_ptr(aTHXo))
+#undef  PL_xpvmg_arenaroot
+#define PL_xpvmg_arenaroot	(*Perl_Ixpvmg_arenaroot_ptr(aTHXo))
 #undef  PL_xpvmg_root
 #define PL_xpvmg_root		(*Perl_Ixpvmg_root_ptr(aTHXo))
+#undef  PL_xpvnv_arenaroot
+#define PL_xpvnv_arenaroot	(*Perl_Ixpvnv_arenaroot_ptr(aTHXo))
 #undef  PL_xpvnv_root
 #define PL_xpvnv_root		(*Perl_Ixpvnv_root_ptr(aTHXo))
+#undef  PL_xrv_arenaroot
+#define PL_xrv_arenaroot	(*Perl_Ixrv_arenaroot_ptr(aTHXo))
 #undef  PL_xrv_root
 #define PL_xrv_root		(*Perl_Ixrv_root_ptr(aTHXo))
 #undef  PL_yychar
@@ -682,14 +722,14 @@ START_EXTERN_C
 #define PL_na			(*Perl_Tna_ptr(aTHXo))
 #undef  PL_nrs
 #define PL_nrs			(*Perl_Tnrs_ptr(aTHXo))
-#undef  PL_ofs
-#define PL_ofs			(*Perl_Tofs_ptr(aTHXo))
-#undef  PL_ofslen
-#define PL_ofslen		(*Perl_Tofslen_ptr(aTHXo))
+#undef  PL_ofs_sv
+#define PL_ofs_sv		(*Perl_Tofs_sv_ptr(aTHXo))
 #undef  PL_op
 #define PL_op			(*Perl_Top_ptr(aTHXo))
 #undef  PL_opsave
 #define PL_opsave		(*Perl_Topsave_ptr(aTHXo))
+#undef  PL_peepp
+#define PL_peepp		(*Perl_Tpeepp_ptr(aTHXo))
 #undef  PL_protect
 #define PL_protect		(*Perl_Tprotect_ptr(aTHXo))
 #undef  PL_reg_call_cc
@@ -742,6 +782,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
@@ -768,6 +810,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
@@ -778,8 +822,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