X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=pp_hot.c;h=5d43a7985ea795f08b837542163a4e0e3b008f1b;hb=ce8217e0ee91404d9ead31e9161c90ae176fd05b;hp=c198b228663c8a47236f11efee92f7a208451635;hpb=8d6d96c1bf85fd984f18f84ea834be52b168c812;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/pp_hot.c b/pp_hot.c
index c198b22..5d43a79 100644
--- a/pp_hot.c
+++ b/pp_hot.c
@@ -395,8 +395,8 @@ PP(pp_add)
 	/* Unless the left argument is integer in range we are going to have to
 	   use NV maths. Hence only attempt to coerce the right argument if
 	   we know the left is integer.  */
-	register UV auv;
-	bool auvok;
+	register UV auv = 0;
+	bool auvok = FALSE;
 	bool a_valid = 0;
 
 	if (!useleft) {
@@ -1628,7 +1628,7 @@ PP(pp_helem)
     U32 defer = PL_op->op_private & OPpLVAL_DEFER;
     SV *sv;
     U32 hash = (SvFAKE(keysv) && SvREADONLY(keysv)) ? SvUVX(keysv) : 0;
-    I32 preeminent;
+    I32 preeminent = 0;
 
     if (SvTYPE(hv) == SVt_PVHV) {
 	if (PL_op->op_private & OPpLVAL_INTRO)
@@ -2991,7 +2991,7 @@ S_method_common(pTHX_ SV* meth, U32* hashp)
     HV* stash;
     char* name;
     STRLEN namelen;
-    char* packname;
+    char* packname = 0;
     STRLEN packlen;
 
     name = SvPV(meth, namelen);