X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=perlapi.h;h=5b7c50b7f4d60015a73be619b0dc6c373e225092;hb=c2dc4c7d5e51c6211637044820c7a560da7e6268;hp=ce540c84b264933883ad66aa48e959bd1b752953;hpb=aac018bb00282d5a72a5c5b4d95935b9eb667bcc;p=p5sagit%2Fp5-mst-13.2.git diff --git a/perlapi.h b/perlapi.h index ce540c8..5b7c50b 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, 2008, 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. @@ -178,16 +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_generation -#define PL_breakable_sub_generation (*Perl_Ibreakable_sub_generation_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 @@ -468,6 +466,8 @@ END_EXTERN_C #define PL_op (*Perl_Iop_ptr(aTHX)) #undef PL_op_mask #define PL_op_mask (*Perl_Iop_mask_ptr(aTHX)) +#undef PL_opfreehook +#define PL_opfreehook (*Perl_Iopfreehook_ptr(aTHX)) #undef PL_opsave #define PL_opsave (*Perl_Iopsave_ptr(aTHX)) #undef PL_origalen @@ -532,6 +532,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 @@ -542,6 +544,8 @@ END_EXTERN_C #define PL_rehash_seed_set (*Perl_Irehash_seed_set_ptr(aTHX)) #undef PL_replgv #define PL_replgv (*Perl_Ireplgv_ptr(aTHX)) +#undef PL_restartjmpenv +#define PL_restartjmpenv (*Perl_Irestartjmpenv_ptr(aTHX)) #undef PL_restartop #define PL_restartop (*Perl_Irestartop_ptr(aTHX)) #undef PL_rs @@ -564,6 +568,8 @@ END_EXTERN_C #define PL_scopestack_ix (*Perl_Iscopestack_ix_ptr(aTHX)) #undef PL_scopestack_max #define PL_scopestack_max (*Perl_Iscopestack_max_ptr(aTHX)) +#undef PL_scopestack_name +#define PL_scopestack_name (*Perl_Iscopestack_name_ptr(aTHX)) #undef PL_screamfirst #define PL_screamfirst (*Perl_Iscreamfirst_ptr(aTHX)) #undef PL_screamnext @@ -680,10 +686,28 @@ END_EXTERN_C #define PL_unlockhook (*Perl_Iunlockhook_ptr(aTHX)) #undef PL_unsafe #define PL_unsafe (*Perl_Iunsafe_ptr(aTHX)) +#undef PL_utf8_X_L +#define PL_utf8_X_L (*Perl_Iutf8_X_L_ptr(aTHX)) +#undef PL_utf8_X_LV +#define PL_utf8_X_LV (*Perl_Iutf8_X_LV_ptr(aTHX)) +#undef PL_utf8_X_LVT +#define PL_utf8_X_LVT (*Perl_Iutf8_X_LVT_ptr(aTHX)) +#undef PL_utf8_X_LV_LVT_V +#define PL_utf8_X_LV_LVT_V (*Perl_Iutf8_X_LV_LVT_V_ptr(aTHX)) +#undef PL_utf8_X_T +#define PL_utf8_X_T (*Perl_Iutf8_X_T_ptr(aTHX)) +#undef PL_utf8_X_V +#define PL_utf8_X_V (*Perl_Iutf8_X_V_ptr(aTHX)) +#undef PL_utf8_X_begin +#define PL_utf8_X_begin (*Perl_Iutf8_X_begin_ptr(aTHX)) +#undef PL_utf8_X_extend +#define PL_utf8_X_extend (*Perl_Iutf8_X_extend_ptr(aTHX)) +#undef PL_utf8_X_non_hangul +#define PL_utf8_X_non_hangul (*Perl_Iutf8_X_non_hangul_ptr(aTHX)) +#undef PL_utf8_X_prepend +#define PL_utf8_X_prepend (*Perl_Iutf8_X_prepend_ptr(aTHX)) #undef PL_utf8_alnum #define PL_utf8_alnum (*Perl_Iutf8_alnum_ptr(aTHX)) -#undef PL_utf8_alnumc -#define PL_utf8_alnumc (*Perl_Iutf8_alnumc_ptr(aTHX)) #undef PL_utf8_alpha #define PL_utf8_alpha (*Perl_Iutf8_alpha_ptr(aTHX)) #undef PL_utf8_ascii @@ -702,6 +726,12 @@ END_EXTERN_C #define PL_utf8_lower (*Perl_Iutf8_lower_ptr(aTHX)) #undef PL_utf8_mark #define PL_utf8_mark (*Perl_Iutf8_mark_ptr(aTHX)) +#undef PL_utf8_perl_space +#define PL_utf8_perl_space (*Perl_Iutf8_perl_space_ptr(aTHX)) +#undef PL_utf8_perl_word +#define PL_utf8_perl_word (*Perl_Iutf8_perl_word_ptr(aTHX)) +#undef PL_utf8_posix_digit +#define PL_utf8_posix_digit (*Perl_Iutf8_posix_digit_ptr(aTHX)) #undef PL_utf8_print #define PL_utf8_print (*Perl_Iutf8_print_ptr(aTHX)) #undef PL_utf8_punct @@ -760,6 +790,8 @@ END_EXTERN_C #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_keyword_plugin +#define PL_keyword_plugin (*Perl_Gkeyword_plugin_ptr(NULL)) #undef PL_malloc_mutex #define PL_malloc_mutex (*Perl_Gmalloc_mutex_ptr(NULL)) #undef PL_mmap_page_size