X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/7d74bb61140f55c3b1a63a3ca309682bfca6a465..d30fb84472a75fa446629f16d12e1ced09787ce4:/proto.h?ds=sidebyside diff --git a/proto.h b/proto.h index 242e35b..63d1c9c 100644 --- a/proto.h +++ b/proto.h @@ -5792,9 +5792,9 @@ STATIC int S_magic_methpack(pTHX_ SV *sv, const MAGIC *mg, SV *meth) assert(sv); assert(mg); assert(meth) STATIC void S_restore_magic(pTHX_ const void *p); -STATIC void S_save_magic(pTHX_ I32 mgs_ix, SV *sv) +STATIC void S_save_magic_flags(pTHX_ I32 mgs_ix, SV *sv, U32 flags) __attribute__nonnull__(pTHX_2); -#define PERL_ARGS_ASSERT_SAVE_MAGIC \ +#define PERL_ARGS_ASSERT_SAVE_MAGIC_FLAGS \ assert(sv) STATIC void S_unwind_handler_stack(pTHX_ const void *p);