Fix some Win32 link errors

p4raw-id: //depot/perl@24591

diff --git a/global.sym b/global.sym
index 7377812..903eb77 100644 (file)
--- 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 (file)
--- 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 (file)
--- 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);