From dd28f7bb7eebdb0b562c940b3c4f89457e829ea6 Mon Sep 17 00:00:00 2001 From: Dave Mitchell Date: Mon, 7 Apr 2003 11:00:41 +0100 Subject: allow recursive FETCHes Message-ID: <20030407100041.A1617@fdgroup.com> p4raw-id: //depot/perl@19268 --- thrdvar.h | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) (limited to 'thrdvar.h') diff --git a/thrdvar.h b/thrdvar.h index 6958f55dd5..19f233ebb7 100644 --- a/thrdvar.h +++ b/thrdvar.h @@ -140,9 +140,7 @@ PERLVARI(Tprotect, protect_proc_t, MEMBER_TO_FPTR(Perl_default_protect)) PERLVARI(Terrors, SV *, Nullsv) /* outstanding queued errors */ /* statics "owned" by various functions */ -PERLVAR(Tav_fetch_sv, SV *) /* owned by av_fetch() */ -PERLVAR(Thv_fetch_sv, SV *) /* owned by hv_fetch() */ -PERLVAR(Thv_fetch_ent_mh, HE) /* owned by hv_fetch_ent() */ +PERLVAR(Thv_fetch_ent_mh, HE*) /* owned by hv_fetch_ent() */ PERLVAR(Tmodcount, I32) /* how much mod()ification in assignment? */ -- cgit v1.2.1