X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=perlapi.h;h=d1c3404f83e2a4398eb1d3faf325a7082ec03b6c;hb=206957a79d0bac91e0b2fccc7ef76f95e8df245e;hp=42cac3591c1357a6356bc58477d42f0966a76308;hpb=ffee3ff61d01bece17fbf5f9da633f1917fa5c0a;p=p5sagit%2Fp5-mst-13.2.git diff --git a/perlapi.h b/perlapi.h index 42cac35..d1c3404 100644 --- a/perlapi.h +++ b/perlapi.h @@ -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 @@ -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 @@ -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 @@ -754,10 +752,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