diff options
| author | Nicholas Clark <nick@ccl4.org> | 2009-11-14 21:01:21 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2009-11-15 08:21:58 +0000 |
| commit | 2d12d04f1cca69e8010b11cf63b89ce3b00490b9 (patch) | |
| tree | 50fcb94429d6af9df0417b0328fe4fc0c2f594de /proto.h | |
| parent | 73b81b142731b84cfdd5037cbef3bf9cf5ff3094 (diff) | |
| download | perl-2d12d04f1cca69e8010b11cf63b89ce3b00490b9.tar.gz | |
Change S_pad_check_dup()'s arguments from char*/STRLEN to SV *.
Within the function, use sv_eq() rather than strcmp().
Diffstat (limited to 'proto.h')
| -rw-r--r-- | proto.h | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -6117,7 +6117,7 @@ PERL_CALLCONV PADOFFSET Perl_pad_add_anon(pTHX_ SV* sv, OPCODE op_type) assert(sv) #if defined(PERL_IN_PAD_C) || defined(PERL_DECL_PROT) -STATIC void S_pad_check_dup(pTHX_ const char *name, const STRLEN len, const U32 flags, const HV *ourstash) +STATIC void S_pad_check_dup(pTHX_ SV *name, const U32 flags, const HV *ourstash) __attribute__nonnull__(pTHX_1); #define PERL_ARGS_ASSERT_PAD_CHECK_DUP \ assert(name) |