Perl_sv_2iv_flags(), Perl_sv_2uv_flags, Perl_sv_2nv and

Perl_sv_2pv_flags() all return 0/0/0.0/"" without warning given a
NULL SV pointer so they ought to be marked as NULLOK in embed.fnc.

p4raw-id: //depot/perl@33285

1 files changed, 7 insertions, 21 deletions

diff --git a/proto.h b/proto.h
index cb5e76a87c..2e71be8325 100644
--- a/proto.h
+++ b/proto.h
@@ -2169,25 +2169,15 @@ STATIC char*	S_glob_2pv(pTHX_ GV* const gv, STRLEN * const len)
 			__attribute__nonnull__(pTHX_1);
 
 #endif
-/* PERL_CALLCONV IV	Perl_sv_2iv(pTHX_ SV* sv)
-			__attribute__nonnull__(pTHX_1); */
-
-PERL_CALLCONV IV	Perl_sv_2iv_flags(pTHX_ SV *const sv, const I32 flags)
-			__attribute__nonnull__(pTHX_1);
-
+/* PERL_CALLCONV IV	Perl_sv_2iv(pTHX_ SV *sv); */
+PERL_CALLCONV IV	Perl_sv_2iv_flags(pTHX_ SV *const sv, const I32 flags);
 PERL_CALLCONV SV*	Perl_sv_2mortal(pTHX_ SV* sv);
-PERL_CALLCONV NV	Perl_sv_2nv(pTHX_ SV *const sv)
-			__attribute__nonnull__(pTHX_1);
-
+PERL_CALLCONV NV	Perl_sv_2nv(pTHX_ SV *const sv);
 PERL_CALLCONV SV*	Perl_sv_2num(pTHX_ SV *const sv)
 			__attribute__nonnull__(pTHX_1);
 
-/* PERL_CALLCONV char*	Perl_sv_2pv(pTHX_ SV* sv, STRLEN* lp)
-			__attribute__nonnull__(pTHX_1); */
-
-PERL_CALLCONV char*	Perl_sv_2pv_flags(pTHX_ SV *const sv, STRLEN *const lp, const I32 flags)
-			__attribute__nonnull__(pTHX_1);
-
+/* PERL_CALLCONV char*	Perl_sv_2pv(pTHX_ SV *sv, STRLEN *lp); */
+PERL_CALLCONV char*	Perl_sv_2pv_flags(pTHX_ SV *const sv, STRLEN *const lp, const I32 flags);
 PERL_CALLCONV char*	Perl_sv_2pvutf8(pTHX_ SV* sv, STRLEN* lp)
 			__attribute__nonnull__(pTHX_1);
 
@@ -2197,12 +2187,8 @@ PERL_CALLCONV char*	Perl_sv_2pvbyte(pTHX_ SV *const sv, STRLEN *const lp)
 PERL_CALLCONV char*	Perl_sv_pvn_nomg(pTHX_ SV* sv, STRLEN* lp)
 			__attribute__nonnull__(pTHX_1);
 
-/* PERL_CALLCONV UV	Perl_sv_2uv(pTHX_ SV* sv)
-			__attribute__nonnull__(pTHX_1); */
-
-PERL_CALLCONV UV	Perl_sv_2uv_flags(pTHX_ SV *const sv, const I32 flags)
-			__attribute__nonnull__(pTHX_1);
-
+/* PERL_CALLCONV UV	Perl_sv_2uv(pTHX_ SV *sv); */
+PERL_CALLCONV UV	Perl_sv_2uv_flags(pTHX_ SV *const sv, const I32 flags);
 PERL_CALLCONV IV	Perl_sv_iv(pTHX_ SV* sv)
 			__attribute__nonnull__(pTHX_1);