X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=perlapi.h;h=f20032678537642d722c718535a5330cf0eeb860;hb=209030dfb82e17eb9572fa3fbdde2effbf80b651;hp=4d7a521aa8d05eb13322112e7d885929a60d6bcb;hpb=bb6f4497de510b4ef8ece50af67246912d14fb8e;p=p5sagit%2Fp5-mst-13.2.git diff --git a/perlapi.h b/perlapi.h index 4d7a521..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 @@ -923,12 +933,14 @@ END_EXTERN_C #define PL_hexdigit (*Perl_Ghexdigit_ptr(NULL)) #undef PL_malloc_mutex #define PL_malloc_mutex (*Perl_Gmalloc_mutex_ptr(NULL)) -#undef PL_my_inv_rand_max -#define PL_my_inv_rand_max (*Perl_Gmy_inv_rand_max_ptr(NULL)) #undef PL_op_mutex #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