diff options
| author | Father Chrysostomos <sprout@cpan.org> | 2012-09-10 16:07:30 -0700 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2012-09-15 22:45:09 -0700 |
| commit | d2c8bf052f5a8bb99050f6d2418d77151eb4b468 (patch) | |
| tree | f0349e7fbd6b24359e94fabd44efc0f57dd090a0 /scope.c | |
| parent | c388b2138d3ec12be3c986d57c518d41d042e7a1 (diff) | |
| download | perl-d2c8bf052f5a8bb99050f6d2418d77151eb4b468.tar.gz | |
Set PL_comppad_name on sub entry
Diffstat (limited to 'scope.c')
| -rw-r--r-- | scope.c | 1 |
1 files changed, 1 insertions, 0 deletions
@@ -1090,6 +1090,7 @@ Perl_leave_scope(pTHX_ I32 base) PL_curpad = AvARRAY(PL_comppad); else PL_curpad = NULL; + PL_comppad_name = (PADNAMELIST*)SSPOPPTR; break; case SAVEt_PADSV_AND_MORTALIZE: { |