This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
[Merge] CVs without GVs
[perl5.git] / proto.h
diff --git a/proto.h b/proto.h
index 6980b00..cca048c 100644 (file)
--- a/proto.h
+++ b/proto.h
@@ -6186,11 +6186,6 @@ STATIC void      S_forget_pmop(pTHX_ PMOP *const o)
        assert(o)
 
 STATIC OP*     S_gen_constant_list(pTHX_ OP* o);
-STATIC SV*     S_gv_ename(pTHX_ GV *gv)
-                       __attribute__nonnull__(pTHX_1);
-#define PERL_ARGS_ASSERT_GV_ENAME      \
-       assert(gv)
-
 STATIC void    S_inplace_aassign(pTHX_ OP* o)
                        __attribute__nonnull__(pTHX_1);
 #define PERL_ARGS_ASSERT_INPLACE_AASSIGN       \
@@ -6315,13 +6310,6 @@ STATIC OP*       S_too_many_arguments_pv(pTHX_ OP *o, const char* name, U32 flags)
 #define PERL_ARGS_ASSERT_TOO_MANY_ARGUMENTS_PV \
        assert(o); assert(name)
 
-STATIC OP*     S_too_many_arguments_sv(pTHX_ OP *o, SV* namesv, U32 flags)
-                       __attribute__warn_unused_result__
-                       __attribute__nonnull__(pTHX_1)
-                       __attribute__nonnull__(pTHX_2);
-#define PERL_ARGS_ASSERT_TOO_MANY_ARGUMENTS_SV \
-       assert(o); assert(namesv)
-
 #endif
 #if defined(PERL_IN_OP_C) || defined(PERL_IN_SV_C)
 PERL_CALLCONV void     Perl_report_redefined_cv(pTHX_ const SV *name, const CV *old_cv, SV * const *new_const_svp)