X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=perlapi.h;h=27be4a2d4ce4b16189760b16208c82023892b5d5;hb=2e5b50041f3643ca27385b211da60add40857ec8;hp=42cac3591c1357a6356bc58477d42f0966a76308;hpb=ffee3ff61d01bece17fbf5f9da633f1917fa5c0a;p=p5sagit%2Fp5-mst-13.2.git diff --git a/perlapi.h b/perlapi.h index 42cac35..27be4a2 100644 --- a/perlapi.h +++ b/perlapi.h @@ -3,7 +3,7 @@ * perlapi.h * * Copyright (C) 1993, 1994, 1995, 1996, 1997, 1998, 1999, - * 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, by Larry Wall and others + * 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, by Larry Wall and others * * You may distribute under the terms of either the GNU General Public * License or the Artistic License, as specified in the README file. @@ -120,8 +120,6 @@ END_EXTERN_C #define PL_Argv (*Perl_IArgv_ptr(aTHX)) #undef PL_Cmd #define PL_Cmd (*Perl_ICmd_ptr(aTHX)) -#undef PL_DBassertion -#define PL_DBassertion (*Perl_IDBassertion_ptr(aTHX)) #undef PL_DBcv #define PL_DBcv (*Perl_IDBcv_ptr(aTHX)) #undef PL_DBgv @@ -180,14 +178,14 @@ END_EXTERN_C #define PL_beginav (*Perl_Ibeginav_ptr(aTHX)) #undef PL_beginav_save #define PL_beginav_save (*Perl_Ibeginav_save_ptr(aTHX)) -#undef PL_bitcount -#define PL_bitcount (*Perl_Ibitcount_ptr(aTHX)) #undef PL_body_arenas #define PL_body_arenas (*Perl_Ibody_arenas_ptr(aTHX)) #undef PL_body_roots #define PL_body_roots (*Perl_Ibody_roots_ptr(aTHX)) #undef PL_bodytarget #define PL_bodytarget (*Perl_Ibodytarget_ptr(aTHX)) +#undef PL_breakable_sub_gen +#define PL_breakable_sub_gen (*Perl_Ibreakable_sub_gen_ptr(aTHX)) #undef PL_checkav #define PL_checkav (*Perl_Icheckav_ptr(aTHX)) #undef PL_checkav_save @@ -266,6 +264,8 @@ END_EXTERN_C #define PL_defstash (*Perl_Idefstash_ptr(aTHX)) #undef PL_delaymagic #define PL_delaymagic (*Perl_Idelaymagic_ptr(aTHX)) +#undef PL_destroyhook +#define PL_destroyhook (*Perl_Idestroyhook_ptr(aTHX)) #undef PL_diehook #define PL_diehook (*Perl_Idiehook_ptr(aTHX)) #undef PL_dirty @@ -458,8 +458,8 @@ END_EXTERN_C #define PL_numeric_radix_sv (*Perl_Inumeric_radix_sv_ptr(aTHX)) #undef PL_numeric_standard #define PL_numeric_standard (*Perl_Inumeric_standard_ptr(aTHX)) -#undef PL_ofs_sv -#define PL_ofs_sv (*Perl_Iofs_sv_ptr(aTHX)) +#undef PL_ofsgv +#define PL_ofsgv (*Perl_Iofsgv_ptr(aTHX)) #undef PL_oldname #define PL_oldname (*Perl_Ioldname_ptr(aTHX)) #undef PL_op @@ -506,8 +506,6 @@ END_EXTERN_C #define PL_ppid (*Perl_Ippid_ptr(aTHX)) #undef PL_preambleav #define PL_preambleav (*Perl_Ipreambleav_ptr(aTHX)) -#undef PL_preprocess -#define PL_preprocess (*Perl_Ipreprocess_ptr(aTHX)) #undef PL_profiledata #define PL_profiledata (*Perl_Iprofiledata_ptr(aTHX)) #undef PL_psig_name @@ -532,6 +530,8 @@ END_EXTERN_C #define PL_regex_padav (*Perl_Iregex_padav_ptr(aTHX)) #undef PL_reginterp_cnt #define PL_reginterp_cnt (*Perl_Ireginterp_cnt_ptr(aTHX)) +#undef PL_registered_mros +#define PL_registered_mros (*Perl_Iregistered_mros_ptr(aTHX)) #undef PL_regmatch_slab #define PL_regmatch_slab (*Perl_Iregmatch_slab_ptr(aTHX)) #undef PL_regmatch_state @@ -638,6 +638,8 @@ END_EXTERN_C #define PL_sv_objcount (*Perl_Isv_objcount_ptr(aTHX)) #undef PL_sv_root #define PL_sv_root (*Perl_Isv_root_ptr(aTHX)) +#undef PL_sv_serial +#define PL_sv_serial (*Perl_Isv_serial_ptr(aTHX)) #undef PL_sv_undef #define PL_sv_undef (*Perl_Isv_undef_ptr(aTHX)) #undef PL_sv_yes @@ -754,10 +756,10 @@ END_EXTERN_C #define PL_hexdigit (*Perl_Ghexdigit_ptr(NULL)) #undef PL_hints_mutex #define PL_hints_mutex (*Perl_Ghints_mutex_ptr(NULL)) -#undef PL_interpreter_size -#define PL_interpreter_size (*Perl_Ginterpreter_size_ptr(NULL)) -#undef PL_interpreter_size_5_10_0 -#define PL_interpreter_size_5_10_0 (*Perl_Ginterpreter_size_5_10_0_ptr(NULL)) +#undef PL_interp_size +#define PL_interp_size (*Perl_Ginterp_size_ptr(NULL)) +#undef PL_interp_size_5_10_0 +#define PL_interp_size_5_10_0 (*Perl_Ginterp_size_5_10_0_ptr(NULL)) #undef PL_malloc_mutex #define PL_malloc_mutex (*Perl_Gmalloc_mutex_ptr(NULL)) #undef PL_mmap_page_size