From: Steve Hay <SteveHay@planit.com>
Date: Thu, 26 May 2005 16:56:03 +0000 (+0000)
Subject: Fix some Win32 link errors
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=88daff1375d29616070e82b2efba4d2d3533e833;p=p5sagit%2Fp5-mst-13.2.git

Fix some Win32 link errors

p4raw-id: //depot/perl@24591
---

diff --git a/global.sym b/global.sym
index 7377812..903eb77 100644
--- a/global.sym
+++ b/global.sym
@@ -615,6 +615,7 @@ Perl_si_dup
 Perl_ss_dup
 Perl_any_dup
 Perl_he_dup
+Perl_hek_dup
 Perl_re_dup
 Perl_fp_dup
 Perl_dirp_dup
@@ -679,7 +680,6 @@ Perl_hv_riter_p
 Perl_hv_eiter_p
 Perl_hv_riter_set
 Perl_hv_eiter_set
-Perl_hv_name_p
 Perl_hv_name_set
 Perl_hv_placeholders_p
 Perl_hv_placeholders_get
diff --git a/makedef.pl b/makedef.pl
index d2b8296..3891b02 100644
--- a/makedef.pl
+++ b/makedef.pl
@@ -691,6 +691,7 @@ unless ($define{'USE_ITHREADS'}) {
 		    PL_op_mutex
 		    PL_regex_pad
 		    PL_regex_padav
+		    PL_shared_hek_table
 		    PL_sharedsv_space
 		    PL_sharedsv_space_mutex
 		    PL_dollarzero_mutex
@@ -706,6 +707,7 @@ unless ($define{'USE_ITHREADS'}) {
 		    Perl_re_dup
 		    Perl_sv_dup
 		    Perl_rvpv_dup
+		    Perl_hek_dup
 		    Perl_sys_intern_dup
 		    Perl_ptr_table_clear
 		    Perl_ptr_table_fetch
diff --git a/proto.h b/proto.h
index 4a26ca4..89e3071 100644
--- a/proto.h
+++ b/proto.h
@@ -2529,7 +2529,6 @@ PERL_CALLCONV I32*	Perl_hv_riter_p(pTHX_ HV* hv);
 PERL_CALLCONV HE**	Perl_hv_eiter_p(pTHX_ HV* hv);
 PERL_CALLCONV void	Perl_hv_riter_set(pTHX_ HV* hv, I32 riter);
 PERL_CALLCONV void	Perl_hv_eiter_set(pTHX_ HV* hv, HE* eiter);
-PERL_CALLCONV char**	Perl_hv_name_p(pTHX_ HV* hv);
 PERL_CALLCONV void	Perl_hv_name_set(pTHX_ HV* hv, const char *, I32 len, int flags);
 PERL_CALLCONV I32*	Perl_hv_placeholders_p(pTHX_ HV* hv);
 PERL_CALLCONV I32	Perl_hv_placeholders_get(pTHX_ HV* hv);