Factorize three regexps into one, using new regexp features

[perl5.git] / proto.h

diff --git a/proto.h b/proto.h
index ae03e11..339ecca 100644 (file)
--- a/proto.h
+++ b/proto.h
@@ -1642,6 +1642,10 @@ PERL_CALLCONV SV*        Perl_newSVsv(pTHX_ SV* old)
                        __attribute__malloc__
                        __attribute__warn_unused_result__;
 
+PERL_CALLCONV SV*      Perl_newSV_type(pTHX_ svtype type)
+                       __attribute__malloc__
+                       __attribute__warn_unused_result__;
+
 PERL_CALLCONV OP*      Perl_newUNOP(pTHX_ I32 type, I32 flags, OP* first)
                        __attribute__malloc__
                        __attribute__warn_unused_result__;
@@ -4602,6 +4606,11 @@ PERL_CALLCONV int        Perl_signbit(NV f)
 
 #endif
 
+PERL_CALLCONV void     Perl_emulate_cop_io(pTHX_ const COP *const c, SV *const sv)
+                       __attribute__nonnull__(pTHX_1)
+                       __attribute__nonnull__(pTHX_2);
+
+
 END_EXTERN_C
 /*
  * ex: set ts=8 sts=4 sw=4 noet: