summaryrefslogtreecommitdiff
path: root/perlapi.h
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2003-05-11 20:17:30 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2003-05-11 20:17:30 +0000
commit15a5279aa74a37f0ad0b3fa3f9e566cb2d7a9d9a (patch)
tree97a9ecf94514fc664416eb326534f138f4e423be /perlapi.h
parent815f25c6e302f84ecce02c74fa717a19d787f662 (diff)
downloadperl-15a5279aa74a37f0ad0b3fa3f9e566cb2d7a9d9a.tar.gz
Move the thread *hook into interpreter.
p4raw-id: //depot/perl@19497
Diffstat (limited to 'perlapi.h')
-rw-r--r--perlapi.h16
1 files changed, 8 insertions, 8 deletions
diff --git a/perlapi.h b/perlapi.h
index f75263702a..4e6bd10919 100644
--- a/perlapi.h
+++ b/perlapi.h
@@ -350,6 +350,8 @@ END_EXTERN_C
#define PL_linestr (*Perl_Ilinestr_ptr(aTHX))
#undef PL_localpatches
#define PL_localpatches (*Perl_Ilocalpatches_ptr(aTHX))
+#undef PL_lockhook
+#define PL_lockhook (*Perl_Ilockhook_ptr(aTHX))
#undef PL_main_cv
#define PL_main_cv (*Perl_Imain_cv_ptr(aTHX))
#undef PL_main_root
@@ -494,6 +496,8 @@ END_EXTERN_C
#define PL_sawampersand (*Perl_Isawampersand_ptr(aTHX))
#undef PL_sh_path_compat
#define PL_sh_path_compat (*Perl_Ish_path_compat_ptr(aTHX))
+#undef PL_sharehook
+#define PL_sharehook (*Perl_Isharehook_ptr(aTHX))
#undef PL_sig_pending
#define PL_sig_pending (*Perl_Isig_pending_ptr(aTHX))
#undef PL_sighandlerp
@@ -546,12 +550,16 @@ END_EXTERN_C
#define PL_taint_warn (*Perl_Itaint_warn_ptr(aTHX))
#undef PL_tainting
#define PL_tainting (*Perl_Itainting_ptr(aTHX))
+#undef PL_threadhook
+#define PL_threadhook (*Perl_Ithreadhook_ptr(aTHX))
#undef PL_tokenbuf
#define PL_tokenbuf (*Perl_Itokenbuf_ptr(aTHX))
#undef PL_uid
#define PL_uid (*Perl_Iuid_ptr(aTHX))
#undef PL_unicode
#define PL_unicode (*Perl_Iunicode_ptr(aTHX))
+#undef PL_unlockhook
+#define PL_unlockhook (*Perl_Iunlockhook_ptr(aTHX))
#undef PL_unsafe
#define PL_unsafe (*Perl_Iunsafe_ptr(aTHX))
#undef PL_utf8_alnum
@@ -918,8 +926,6 @@ END_EXTERN_C
#define PL_dollarzero_mutex (*Perl_Gdollarzero_mutex_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
@@ -934,14 +940,8 @@ END_EXTERN_C
#define PL_runops_std (*Perl_Grunops_std_ptr(NULL))
#undef PL_sh_path
#define PL_sh_path (*Perl_Gsh_path_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_threadhook
-#define PL_threadhook (*Perl_Gthreadhook_ptr(NULL))
-#undef PL_unlockhook
-#define PL_unlockhook (*Perl_Gunlockhook_ptr(NULL))
#endif /* !PERL_CORE */
#endif /* MULTIPLICITY */