From 181bc48df1acbf1e213b165d7e27c61b63e2b13e Mon Sep 17 00:00:00 2001 From: Rafael Garcia-Suarez Date: Mon, 19 Apr 2004 12:26:35 +0000 Subject: [PATCH] Fix for [perl #28919] : sometimes the function ck_ftst was trying to read an op that was just freed, which was obviously illegal. p4raw-id: //depot/perl@22716 --- op.c | 1 + 1 file changed, 1 insertion(+) diff --git a/op.c b/op.c index 46cc07b..02144e8 100644 --- a/op.c +++ b/op.c @@ -5088,6 +5088,7 @@ Perl_ck_ftst(pTHX_ OP *o) gv_fetchpv(SvPVx(kid->op_sv, n_a), TRUE, SVt_PVIO)); op_free(o); o = newop; + return o; } else { if ((PL_hints & HINT_FILETEST_ACCESS) && -- 2.7.4