X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=proto.h;h=e41659eff4f084526a5c5ddd5d2e5d4895f900c4;hb=b987f19e219b07e9026d811cab67a37914a0d952;hp=57f7027800e64d307328594bcf58c5a830243ddf;hpb=bed601927f5ca7f54b544d9e5ce1f77461311b68;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/proto.h b/proto.h
index 57f7027..e41659e 100644
--- a/proto.h
+++ b/proto.h
@@ -799,7 +799,7 @@ PERL_CALLCONV void	Perl_vivify_ref(pTHX_ SV* sv, U32 to_what);
 PERL_CALLCONV I32	Perl_wait4pid(pTHX_ Pid_t pid, int* statusp, int flags);
 PERL_CALLCONV U32	Perl_parse_unicode_opts(pTHX_ char **popt);
 PERL_CALLCONV U32	Perl_seed(pTHX);
-PERL_CALLCONV UV	Perl_get_seed(pTHX);
+PERL_CALLCONV UV	Perl_get_hash_seed(pTHX);
 PERL_CALLCONV void	Perl_report_evil_fh(pTHX_ GV *gv, IO *io, I32 op);
 PERL_CALLCONV void	Perl_report_uninit(pTHX);
 PERL_CALLCONV void	Perl_warn(pTHX_ const char* pat, ...)
@@ -1331,6 +1331,7 @@ PERL_CALLCONV void	Perl_free_tied_hv_pool(pTHX);
 #if defined(DEBUGGING)
 PERL_CALLCONV int	Perl_get_debug_opts(pTHX_ char **s);
 #endif
+PERL_CALLCONV void	Perl_save_set_svflags(pTHX_ SV* sv, U32 mask, U32 val);