summaryrefslogtreecommitdiff
path: root/intrpvar.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 /intrpvar.h
parent815f25c6e302f84ecce02c74fa717a19d787f662 (diff)
downloadperl-15a5279aa74a37f0ad0b3fa3f9e566cb2d7a9d9a.tar.gz
Move the thread *hook into interpreter.
p4raw-id: //depot/perl@19497
Diffstat (limited to 'intrpvar.h')
-rw-r--r--intrpvar.h6
1 files changed, 6 insertions, 0 deletions
diff --git a/intrpvar.h b/intrpvar.h
index d7c4269fda..26b6104df6 100644
--- a/intrpvar.h
+++ b/intrpvar.h
@@ -508,6 +508,12 @@ PERLVAR(Istashcache, HV *) /* Cache to speed up S_method_common */
PERLVAR(Ireentrant_retint, int) /* Integer return value from reentrant functions */
+/* Hooks to shared SVs and locks. */
+PERLVARI(Isharehook, share_proc_t, MEMBER_TO_FPTR(Perl_sv_nosharing))
+PERLVARI(Ilockhook, share_proc_t, MEMBER_TO_FPTR(Perl_sv_nolocking))
+PERLVARI(Iunlockhook, share_proc_t, MEMBER_TO_FPTR(Perl_sv_nounlocking))
+PERLVARI(Ithreadhook, thrhook_proc_t, MEMBER_TO_FPTR(Perl_nothreadhook))
+
PERLVAR(IDBassertion, SV *)
/* Don't forget to add your variable also to perl_clone()! */