This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Use less memory in compiling regexes
[perl5.git] / proto.h
diff --git a/proto.h b/proto.h
index ae98567..9f970a3 100644 (file)
--- a/proto.h
+++ b/proto.h
@@ -3664,6 +3664,9 @@ PERL_STATIC_INLINE IV     S_invlist_previous_index(SV* const invlist)
 #define PERL_ARGS_ASSERT_INVLIST_PREVIOUS_INDEX        \
        assert(invlist)
 
+STATIC void    S_invlist_replace_list(pTHX_ SV *dest, SV *src);
+#define PERL_ARGS_ASSERT_INVLIST_REPLACE_LIST  \
+       assert(dest); assert(src)
 PERL_STATIC_INLINE void        S_invlist_set_previous_index(SV* const invlist, const IV index);
 #define PERL_ARGS_ASSERT_INVLIST_SET_PREVIOUS_INDEX    \
        assert(invlist)