diff options
author | Nicholas Clark <nick@ccl4.org> | 2009-11-14 20:18:39 +0000 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2009-11-15 08:21:57 +0000 |
commit | 73b81b142731b84cfdd5037cbef3bf9cf5ff3094 (patch) | |
tree | d19e78c79f73d4698d5e7a4b01338ed2f4441f59 /pad.h | |
parent | 3291825f3fd927adacdb9c44790978a741046199 (diff) | |
download | perl-73b81b142731b84cfdd5037cbef3bf9cf5ff3094.tar.gz |
Convert pad_check_dup() to static linkage, and call it from Perl_pad_add_name().
Provide a flag option to Perl_pad_add_name(), pad_add_NO_DUP_CHECK, to supress
the call.
Diffstat (limited to 'pad.h')
-rw-r--r-- | pad.h | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -114,11 +114,11 @@ typedef enum { #ifdef PERL_CORE -/* flags for pad_add_name/pad_check_dup. SVf_UTF8 will also be valid in the - future. */ +/* flags for pad_add_name. SVf_UTF8 will also be valid in the future. */ # define pad_add_OUR 0x01 /* our declaration. */ # define pad_add_STATE 0x02 /* state declaration. */ +# define pad_add_NO_DUP_CHECK 0x04 /* skip warning on dups. */ #endif |