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.h | |
| parent | c388b2138d3ec12be3c986d57c518d41d042e7a1 (diff) | |
| download | perl-d2c8bf052f5a8bb99050f6d2418d77151eb4b468.tar.gz | |
Set PL_comppad_name on sub entry
Diffstat (limited to 'scope.h')
| -rw-r--r-- | scope.h | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -208,7 +208,8 @@ scope has the given name. Name must be a literal string. #define SAVEHINTS() save_hints() -#define SAVECOMPPAD() save_pushptr(MUTABLE_SV(PL_comppad), SAVEt_COMPPAD) +#define SAVECOMPPAD() save_pushptrptr(MUTABLE_SV(PL_comppad_name), \ + MUTABLE_SV(PL_comppad), SAVEt_COMPPAD) #define SAVESWITCHSTACK(f,t) \ STMT_START { \ |