X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/803059618a6e90fb614193e8cdf81c79f27d8764..37723ebb3f0f145b85438cb89891a2c80a5f149e:/proto.h

diff --git a/proto.h b/proto.h
index 25dc06a..85aa884 100644
--- a/proto.h
+++ b/proto.h
@@ -1674,7 +1674,7 @@ PERL_CALLCONV const char*	Perl_scan_version(pTHX_ const char *vstr, SV *sv, bool
 PERL_CALLCONV SV*	Perl_new_version(pTHX_ SV *ver)
 			__attribute__nonnull__(pTHX_1);
 
-PERL_CALLCONV SV*	Perl_upg_version(pTHX_ SV *ver)
+PERL_CALLCONV SV*	Perl_upg_version(pTHX_ SV *ver, bool qv)
 			__attribute__nonnull__(pTHX_1);
 
 PERL_CALLCONV bool	Perl_vverify(pTHX_ SV *vs)
@@ -1853,6 +1853,9 @@ PERL_CALLCONV I32	Perl_pregexec(pTHX_ regexp* prog, char* stringarg, char* stren
 			__attribute__nonnull__(pTHX_6);
 
 PERL_CALLCONV void	Perl_pregfree(pTHX_ struct regexp* r);
+PERL_CALLCONV struct regexp*	Perl_reg_temp_copy(pTHX_ struct regexp* r)
+			__attribute__nonnull__(pTHX_1);
+
 PERL_CALLCONV void	Perl_regfree_internal(pTHX_ struct regexp* r);
 PERL_CALLCONV char *	Perl_reg_stringify(pTHX_ MAGIC *mg, STRLEN *lp, U32 *flags, I32 *haseval)
 			__attribute__nonnull__(pTHX_1);
@@ -3156,6 +3159,10 @@ PERL_CALLCONV OP*	Perl_ck_open(pTHX_ OP *o)
 			__attribute__warn_unused_result__
 			__attribute__nonnull__(pTHX_1);
 
+PERL_CALLCONV OP*	Perl_ck_readline(pTHX_ OP *o)
+			__attribute__warn_unused_result__
+			__attribute__nonnull__(pTHX_1);
+
 PERL_CALLCONV OP*	Perl_ck_repeat(pTHX_ OP *o)
 			__attribute__warn_unused_result__
 			__attribute__nonnull__(pTHX_1);