From: Gurusamy Sarathy <gsar@cpan.org>
Date: Wed, 14 Mar 2001 06:13:02 +0000 (+0000)
Subject: Uninitialized Memory Read in regexec.c
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=5fcd1c1b5ea5ccb322c2ff87d283f032058dbafe;p=p5sagit%2Fp5-mst-13.2.git

Uninitialized Memory Read in regexec.c

p4raw-id: //depot/perl@9148
---

diff --git a/regexec.c b/regexec.c
index a7b6411..2420f8d 100644
--- a/regexec.c
+++ b/regexec.c
@@ -2520,7 +2520,7 @@ S_regmatch(pTHX_ regnode *prog)
 			I32 osize = PL_regsize;
 			I32 onpar = PL_regnpar;
 
-			pm.op_pmflags = 0;
+			Zero(&pm, 1, PMOP);
 			re = CALLREGCOMP(aTHX_ t, t + len, &pm);
 			if (!(SvFLAGS(ret)
 			      & (SVs_TEMP | SVs_PADTMP | SVf_READONLY)))