summaryrefslogtreecommitdiff
path: root/pp_hot.c
diff options
context:
space:
mode:
authorBrian Fraser <fraserbn@gmail.com>2011-10-06 22:17:33 -0700
committerFather Chrysostomos <sprout@cpan.org>2011-10-06 22:17:33 -0700
commitc60dbbc3880c0d4c4f81d95fb1d70b608f96a645 (patch)
tree8c27ae687782db5088cf0fd5d43f2b88d82b20ef /pp_hot.c
parent51a1303ca5c496ad5fb0bb3bc37f2b3584e845b9 (diff)
downloadperl-c60dbbc3880c0d4c4f81d95fb1d70b608f96a645.tar.gz
Cast to signed before negating, to avoid compiler warnings
Diffstat (limited to 'pp_hot.c')
-rw-r--r--pp_hot.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/pp_hot.c b/pp_hot.c
index aaff28fbea..cb4a033781 100644
--- a/pp_hot.c
+++ b/pp_hot.c
@@ -2991,7 +2991,7 @@ S_method_common(pTHX_ SV* meth, U32* hashp)
else {
SV* const ref = newSViv(PTR2IV(stash));
(void)hv_store(PL_stashcache, packname,
- packname_is_utf8 ? -packlen : packlen, ref, 0);
+ packname_is_utf8 ? -(I32)packlen : (I32)packlen, ref, 0);
}
goto fetch;
}