summaryrefslogtreecommitdiff
path: root/proto.h
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 /proto.h
parent51a1303ca5c496ad5fb0bb3bc37f2b3584e845b9 (diff)
downloadperl-c60dbbc3880c0d4c4f81d95fb1d70b608f96a645.tar.gz
Cast to signed before negating, to avoid compiler warnings
Diffstat (limited to 'proto.h')
-rw-r--r--proto.h4
1 files changed, 2 insertions, 2 deletions
diff --git a/proto.h b/proto.h
index 6e9eda4591..4da34b9b1b 100644
--- a/proto.h
+++ b/proto.h
@@ -1262,7 +1262,7 @@ PERL_CALLCONV GV* Perl_gv_fetchmethod_pv_flags(pTHX_ HV* stash, const char* name
#define PERL_ARGS_ASSERT_GV_FETCHMETHOD_PV_FLAGS \
assert(stash); assert(name)
-PERL_CALLCONV GV* Perl_gv_fetchmethod_pvn_flags(pTHX_ HV* stash, const char* name, STRLEN len, U32 flags)
+PERL_CALLCONV GV* Perl_gv_fetchmethod_pvn_flags(pTHX_ HV* stash, const char* name, const STRLEN len, U32 flags)
__attribute__nonnull__(pTHX_1)
__attribute__nonnull__(pTHX_2);
#define PERL_ARGS_ASSERT_GV_FETCHMETHOD_PVN_FLAGS \
@@ -3834,7 +3834,7 @@ PERL_CALLCONV bool Perl_sv_derived_from_pv(pTHX_ SV* sv, const char *const name,
#define PERL_ARGS_ASSERT_SV_DERIVED_FROM_PV \
assert(sv); assert(name)
-PERL_CALLCONV bool Perl_sv_derived_from_pvn(pTHX_ SV* sv, const char *const name, STRLEN len, U32 flags)
+PERL_CALLCONV bool Perl_sv_derived_from_pvn(pTHX_ SV* sv, const char *const name, const STRLEN len, U32 flags)
__attribute__warn_unused_result__
__attribute__nonnull__(pTHX_1)
__attribute__nonnull__(pTHX_2);