diff options
| author | Brian Fraser <fraserbn@gmail.com> | 2011-10-06 22:17:33 -0700 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2011-10-06 22:17:33 -0700 |
| commit | c60dbbc3880c0d4c4f81d95fb1d70b608f96a645 (patch) | |
| tree | 8c27ae687782db5088cf0fd5d43f2b88d82b20ef /ext | |
| parent | 51a1303ca5c496ad5fb0bb3bc37f2b3584e845b9 (diff) | |
| download | perl-c60dbbc3880c0d4c4f81d95fb1d70b608f96a645.tar.gz | |
Cast to signed before negating, to avoid compiler warnings
Diffstat (limited to 'ext')
| -rw-r--r-- | ext/mro/mro.xs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/mro/mro.xs b/ext/mro/mro.xs index 1f099cbc6b..7b5a86d0ec 100644 --- a/ext/mro/mro.xs +++ b/ext/mro/mro.xs @@ -643,7 +643,7 @@ mro__nextcan(...) assert(curstash); gvp = (GV**)hv_fetch(curstash, subname, - subname_utf8 ? -subname_len : subname_len, 0); + subname_utf8 ? -(I32)subname_len : (I32)subname_len, 0); if (!gvp) continue; candidate = *gvp; |