X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=perlapi.h;h=82af7c5ce161ea2a251d0eceb03b2d7c1466877f;hb=c13f253ac9074f84de2b3cc44ede54179a3ffbf0;hp=4eb2c4bcca4b2423f6b8de8c88aa9afe8c7af6a3;hpb=6537fe72dd6d63cc0c7164fec44beb82d2568599;p=p5sagit%2Fp5-mst-13.2.git diff --git a/perlapi.h b/perlapi.h index 4eb2c4b..82af7c5 100644 --- a/perlapi.h +++ b/perlapi.h @@ -1,7 +1,16 @@ -/* !!!!!!! DO NOT EDIT THIS FILE !!!!!!! - This file is built by embed.pl from data in embed.pl, pp.sym, intrpvar.h, - perlvars.h and thrdvar.h. Any changes made here will be lost! -*/ +/* + * perlapi.h + * + * Copyright (c) 1997-2002, Larry Wall + * + * You may distribute under the terms of either the GNU General Public + * License or the Artistic License, as specified in the README file. + * + * + * !!!!!!! DO NOT EDIT THIS FILE !!!!!!! + * This file is built by embed.pl from data in embed.pl, pp.sym, intrpvar.h, + * perlvars.h and thrdvar.h. Any changes made here will be lost! + */ /* declare accessor functions for Perl variables */ #ifndef __perlapi_h__ @@ -103,6 +112,12 @@ END_EXTERN_C #define PL_MemParse (*Perl_IMemParse_ptr(aTHX)) #undef PL_MemShared #define PL_MemShared (*Perl_IMemShared_ptr(aTHX)) +#undef PL_OpPtr +#define PL_OpPtr (*Perl_IOpPtr_ptr(aTHX)) +#undef PL_OpSlab +#define PL_OpSlab (*Perl_IOpSlab_ptr(aTHX)) +#undef PL_OpSpace +#define PL_OpSpace (*Perl_IOpSpace_ptr(aTHX)) #undef PL_Proc #define PL_Proc (*Perl_IProc_ptr(aTHX)) #undef PL_Sock @@ -733,6 +748,8 @@ 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 @@ -919,8 +936,6 @@ 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 @@ -935,6 +950,8 @@ END_EXTERN_C #define PL_do_undump (*Perl_Gdo_undump_ptr(NULL)) #undef PL_hexdigit #define PL_hexdigit (*Perl_Ghexdigit_ptr(NULL)) +#undef PL_lockhook +#define PL_lockhook (*Perl_Glockhook_ptr(NULL)) #undef PL_malloc_mutex #define PL_malloc_mutex (*Perl_Gmalloc_mutex_ptr(NULL)) #undef PL_op_mutex @@ -945,12 +962,12 @@ END_EXTERN_C #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_sharehook +#define PL_sharehook (*Perl_Gsharehook_ptr(NULL)) #undef PL_thr_key #define PL_thr_key (*Perl_Gthr_key_ptr(NULL)) +#undef PL_unlockhook +#define PL_unlockhook (*Perl_Gunlockhook_ptr(NULL)) #endif /* !PERL_CORE */ #endif /* MULTIPLICITY */