From 7e337ee0bc836d3147f3b2579c7e35127637e377 Mon Sep 17 00:00:00 2001 From: Jarkko Hietaniemi Date: Sun, 26 Mar 2006 17:53:56 +0300 Subject: re-[PATCH] Re: [PATCH] Poison now in two different flavours! Message-ID: <442680D4.3000809@gmail.com> p4raw-id: //depot/perl@27626 --- scope.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'scope.c') diff --git a/scope.c b/scope.c index ff063d22a0..a49a82a023 100644 --- a/scope.c +++ b/scope.c @@ -62,7 +62,7 @@ Perl_new_stackinfo(pTHX_ I32 stitems, I32 cxitems) Newx(si->si_cxstack, cxitems, PERL_CONTEXT); /* Without any kind of initialising PUSHSUBST() * in pp_subst() will read uninitialised heap. */ - Poison(si->si_cxstack, cxitems, PERL_CONTEXT); + PoisonNew(si->si_cxstack, cxitems, PERL_CONTEXT); return si; } @@ -75,7 +75,7 @@ Perl_cxinc(pTHX) Renew(cxstack, cxstack_max + 1, PERL_CONTEXT); /* XXX should fix CXINC macro */ /* Without any kind of initialising deep enough recursion * will end up reading uninitialised PERL_CONTEXTs. */ - Poison(cxstack + old_max + 1, cxstack_max - old_max, PERL_CONTEXT); + PoisonNew(cxstack + old_max + 1, cxstack_max - old_max, PERL_CONTEXT); return cxstack_ix + 1; } -- cgit v1.2.1