diff options
Diffstat (limited to 'ext/Devel-Peek/Peek.xs')
| -rw-r--r-- | ext/Devel-Peek/Peek.xs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/ext/Devel-Peek/Peek.xs b/ext/Devel-Peek/Peek.xs index 1ea7f8fed9..73094b8efc 100644 --- a/ext/Devel-Peek/Peek.xs +++ b/ext/Devel-Peek/Peek.xs @@ -81,6 +81,7 @@ DeadCode(pTHX) } } for (j = 1; j < AvFILL((AV*)svp[1]); j++) { /* Vars. */ + if (!pad[j]) continue; if (SvROK(pad[j])) { levelref++; do_sv_dump(0, Perl_debug_log, pad[j], 0, 4, 0, 0); |