diff options
| author | Father Chrysostomos <sprout@cpan.org> | 2012-08-23 00:19:55 -0700 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2012-08-23 00:19:55 -0700 |
| commit | 643fe3684c67762f638e3528054ff5ca1d3e0cb6 (patch) | |
| tree | d2a74f5d872214556cf024e94ad040232def8388 /pad.h | |
| parent | 86d2498c0b3132b9d76f935b317b213effc43990 (diff) | |
| download | perl-643fe3684c67762f638e3528054ff5ca1d3e0cb6.tar.gz | |
pad.h: PadnameSTATE
Diffstat (limited to 'pad.h')
| -rw-r--r-- | pad.h | 4 |
1 files changed, 4 insertions, 0 deletions
@@ -229,6 +229,9 @@ The stash in which this "our" variable was declared. =for apidoc m|bool|PadnameOUTER|PADNAME pn Whether this entry belongs to an outer pad. +=for apidoc m|bool|PadnameSTATE|PADNAME pn +Whether this is a "state" variable. + =for apidoc m|HV *|PadnameTYPE|PADNAME pn The stash associated with a typed lexical. This returns the %Foo:: hash for C<my Foo $bar>. @@ -294,6 +297,7 @@ Restore the old pad saved into the local variable opad by PAD_SAVE_LOCAL() #define PadnameIsOUR(pn) !!SvPAD_OUR(pn) #define PadnameOURSTASH(pn) SvOURSTASH(pn) #define PadnameOUTER(pn) !!SvFAKE(pn) +#define PadnameSTATE(pn) SvPAD_STATE(pn) #define PadnameTYPE(pn) (SvPAD_TYPED(pn) ? SvSTASH(pn) : NULL) |