(Retracted by #8915.)

Third Degree finding:
reading uninitialized local variable smallbuf + 8 bytes of Perl_gv_fetchfile

p4raw-id: //depot/perl@8893

diff --git a/gv.c b/gv.c
index 0d34366..09e6cfe 100644 (file)
--- a/gv.c
+++ b/gv.c
@@ -59,7 +59,7 @@ Perl_gv_IOadd(pTHX_ register GV *gv)
 GV *
 Perl_gv_fetchfile(pTHX_ const char *name)
 {
-    char smallbuf[256];
+    char smallbuf[256] = { 0 };
     char *tmpbuf;
     STRLEN tmplen;
     GV *gv;