X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=perlapi.h;h=f20032678537642d722c718535a5330cf0eeb860;hb=209030dfb82e17eb9572fa3fbdde2effbf80b651;hp=3b8566658b11c7b7e72072b35a86f2ecd5863ffd;hpb=53c4c00cd908b83921217c52fa633bcfdd89f0fb;p=p5sagit%2Fp5-mst-13.2.git diff --git a/perlapi.h b/perlapi.h index 3b85666..f200326 100644 --- a/perlapi.h +++ b/perlapi.h @@ -183,6 +183,8 @@ END_EXTERN_C #define PL_debstash (*Perl_Idebstash_ptr(aTHX)) #undef PL_debug #define PL_debug (*Perl_Idebug_ptr(aTHX)) +#undef PL_def_layerlist +#define PL_def_layerlist (*Perl_Idef_layerlist_ptr(aTHX)) #undef PL_defgv #define PL_defgv (*Perl_Idefgv_ptr(aTHX)) #undef PL_diehook @@ -197,6 +199,8 @@ END_EXTERN_C #define PL_e_script (*Perl_Ie_script_ptr(aTHX)) #undef PL_egid #define PL_egid (*Perl_Iegid_ptr(aTHX)) +#undef PL_encoding +#define PL_encoding (*Perl_Iencoding_ptr(aTHX)) #undef PL_endav #define PL_endav (*Perl_Iendav_ptr(aTHX)) #undef PL_envgv @@ -269,6 +273,8 @@ END_EXTERN_C #define PL_initav (*Perl_Iinitav_ptr(aTHX)) #undef PL_inplace #define PL_inplace (*Perl_Iinplace_ptr(aTHX)) +#undef PL_known_layers +#define PL_known_layers (*Perl_Iknown_layers_ptr(aTHX)) #undef PL_last_lop #define PL_last_lop (*Perl_Ilast_lop_ptr(aTHX)) #undef PL_last_lop_op @@ -437,6 +443,8 @@ END_EXTERN_C #define PL_perl_destruct_level (*Perl_Iperl_destruct_level_ptr(aTHX)) #undef PL_perldb #define PL_perldb (*Perl_Iperldb_ptr(aTHX)) +#undef PL_perlio +#define PL_perlio (*Perl_Iperlio_ptr(aTHX)) #undef PL_pidstatus #define PL_pidstatus (*Perl_Ipidstatus_ptr(aTHX)) #undef PL_preambleav @@ -565,6 +573,8 @@ END_EXTERN_C #define PL_utf8_punct (*Perl_Iutf8_punct_ptr(aTHX)) #undef PL_utf8_space #define PL_utf8_space (*Perl_Iutf8_space_ptr(aTHX)) +#undef PL_utf8_tofold +#define PL_utf8_tofold (*Perl_Iutf8_tofold_ptr(aTHX)) #undef PL_utf8_tolower #define PL_utf8_tolower (*Perl_Iutf8_tolower_ptr(aTHX)) #undef PL_utf8_totitle @@ -719,8 +729,6 @@ END_EXTERN_C #define PL_modcount (*Perl_Tmodcount_ptr(aTHX)) #undef PL_na #define PL_na (*Perl_Tna_ptr(aTHX)) -#undef PL_nrs -#define PL_nrs (*Perl_Tnrs_ptr(aTHX)) #undef PL_ofs_sv #define PL_ofs_sv (*Perl_Tofs_sv_ptr(aTHX)) #undef PL_op @@ -907,6 +915,8 @@ END_EXTERN_C #define PL_top_env (*Perl_Ttop_env_ptr(aTHX)) #undef PL_toptarget #define PL_toptarget (*Perl_Ttoptarget_ptr(aTHX)) +#undef PL_unused_1 +#define PL_unused_1 (*Perl_Tunused_1_ptr(aTHX)) #undef PL_watchaddr #define PL_watchaddr (*Perl_Twatchaddr_ptr(aTHX)) #undef PL_watchok @@ -927,6 +937,14 @@ END_EXTERN_C #define PL_op_mutex (*Perl_Gop_mutex_ptr(NULL)) #undef PL_patleave #define PL_patleave (*Perl_Gpatleave_ptr(NULL)) +#undef PL_runops_dbg +#define PL_runops_dbg (*Perl_Grunops_dbg_ptr(NULL)) +#undef PL_runops_std +#define PL_runops_std (*Perl_Grunops_std_ptr(NULL)) +#undef PL_sharedsv_space +#define PL_sharedsv_space (*Perl_Gsharedsv_space_ptr(NULL)) +#undef PL_sharedsv_space_mutex +#define PL_sharedsv_space_mutex (*Perl_Gsharedsv_space_mutex_ptr(NULL)) #undef PL_thr_key #define PL_thr_key (*Perl_Gthr_key_ptr(NULL))