From: Rafael Garcia-Suarez <rgarciasuarez@gmail.com>
Date: Sun, 21 Jun 2009 11:44:08 +0000 (+0200)
Subject: Regenerate headers and fix compilation with threads after last commit
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=4fec321675757b1adbfc9b8317737404d211664f;p=p5sagit%2Fp5-mst-13.2.git

Regenerate headers and fix compilation with threads after last commit
---

diff --git a/embed.h b/embed.h
index 9af17f6..1b2c9de 100644
--- a/embed.h
+++ b/embed.h
@@ -1179,6 +1179,7 @@
 #ifdef PERL_CORE
 #define hsplit			S_hsplit
 #define hfreeentries		S_hfreeentries
+#define anonymise_cv		S_anonymise_cv
 #define new_he			S_new_he
 #define save_hek_flags		S_save_hek_flags
 #define hv_magic_check		S_hv_magic_check
@@ -3515,6 +3516,7 @@
 #ifdef PERL_CORE
 #define hsplit(a)		S_hsplit(aTHX_ a)
 #define hfreeentries(a)		S_hfreeentries(aTHX_ a)
+#define anonymise_cv(a,b)	S_anonymise_cv(aTHX_ a,b)
 #define new_he()		S_new_he(aTHX)
 #define save_hek_flags		S_save_hek_flags
 #define hv_magic_check		S_hv_magic_check
diff --git a/hv.c b/hv.c
index ab22584..8d1c6a9 100644
--- a/hv.c
+++ b/hv.c
@@ -1483,7 +1483,7 @@ Perl_hv_free_ent(pTHX_ HV *hv, register HE *entry)
 }
 
 static I32
-S_anonymise_cv(const char *stash, SV *val)
+S_anonymise_cv(pTHX_ const char *stash, SV *val)
 {
     CV *cv;
 
@@ -1494,7 +1494,7 @@ S_anonymise_cv(const char *stash, SV *val)
 	    SV *gvname;
 	    GV *anongv;
 
-	    gvname = newSVpvf("%s::__ANON__", stash ? stash : "__ANON__");
+	    gvname = Perl_newSVpvf(aTHX_ "%s::__ANON__", stash ? stash : "__ANON__");
 	    anongv = gv_fetchsv(gvname, GV_ADDMULTI, SVt_PVCV);
 	    SvREFCNT_dec(gvname);
 	    CvGV(cv) = anongv;
diff --git a/proto.h b/proto.h
index 285e05f..ffa7c39 100644
--- a/proto.h
+++ b/proto.h
@@ -4254,6 +4254,11 @@ STATIC void	S_hfreeentries(pTHX_ HV *hv)
 #define PERL_ARGS_ASSERT_HFREEENTRIES	\
 	assert(hv)
 
+STATIC I32	S_anonymise_cv(pTHX_ const char *stash, SV *val)
+			__attribute__nonnull__(pTHX_2);
+#define PERL_ARGS_ASSERT_ANONYMISE_CV	\
+	assert(val)
+
 STATIC HE*	S_new_he(pTHX)
 			__attribute__malloc__
 			__attribute__warn_unused_result__;