diff options
| author | Robin Barker <rmbarker@cpan.org> | 2011-06-23 19:12:59 +0100 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2011-06-24 08:27:52 -0700 |
| commit | 2f2f3ec9c49055c69541020aa1bf644ca5f8b6f1 (patch) | |
| tree | c83f4b3020019dc32577ccdc7ec3920a7a96cba0 /sv.c | |
| parent | 6d1c68e64c4dbbb1c7e8a28de678cd3247649bad (diff) | |
| download | perl-2f2f3ec9c49055c69541020aa1bf644ca5f8b6f1.tar.gz | |
cast unsigned to avoid warning
Add a cast C<(unsigned)> to silence a compiler warning [-Wsign-compare]
Diffstat (limited to 'sv.c')
| -rw-r--r-- | sv.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -5244,7 +5244,7 @@ Perl_sv_magic(pTHX_ register SV *const sv, SV *const obj, const int how, PERL_ARGS_ASSERT_SV_MAGIC; - if (how < 0 || how > C_ARRAY_LENGTH(PL_magic_data) + if (how < 0 || (unsigned)how > C_ARRAY_LENGTH(PL_magic_data) || ((flags = PL_magic_data[how]), (vtable_index = flags & PERL_MAGIC_VTABLE_MASK) > magic_vtable_max)) |