X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=perlapi.h;h=7085e74adcabed53321a43cb605586c89593133b;hb=a403baf6db062a9762514a55376b87d7258108a5;hp=2d210eecae0662ad6f46b08d36d2f73b70426fc1;hpb=1c846c1f6d96d2ca4dfccdcfc0ff050c1474993e;p=p5sagit%2Fp5-mst-13.2.git diff --git a/perlapi.h b/perlapi.h index 2d210ee..7085e74 100644 --- 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 @@ -420,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 @@ -452,6 +452,8 @@ 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 @@ -468,6 +470,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 @@ -712,10 +716,8 @@ 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 @@ -772,6 +774,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 @@ -808,8 +812,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