fix coredump in S_varname (tickled by Devel::Profile)

a 'Use of uninitialized value' warning within a DB sub
attempted to use the pad of the caller to locate the offending
lexical

p4raw-id: //depot/perl@31278

diff --git a/sv.c b/sv.c
index 0cd9ca8..c2c7f4d 100644 (file)
--- a/sv.c
+++ b/sv.c
@@ -11778,8 +11778,7 @@ S_varname(pTHX_ GV *gv, const char gvtype, PADOFFSET targ,
        }
     }
     else {
-       U32 unused;
-       CV * const cv = find_runcv(&unused);
+       CV * const cv = find_runcv(NULL);
        SV *sv;
        AV *av;