summaryrefslogtreecommitdiffstats
path: root/gnu/usr.bin/perl/embed.h
diff options
context:
space:
mode:
Diffstat (limited to 'gnu/usr.bin/perl/embed.h')
-rw-r--r--gnu/usr.bin/perl/embed.h32
1 files changed, 26 insertions, 6 deletions
diff --git a/gnu/usr.bin/perl/embed.h b/gnu/usr.bin/perl/embed.h
index 980a12f81e6..6112ca7c8f9 100644
--- a/gnu/usr.bin/perl/embed.h
+++ b/gnu/usr.bin/perl/embed.h
@@ -1339,9 +1339,6 @@
#define share_hek_flags S_share_hek_flags
#endif
#ifdef PERL_CORE
-#define hv_fetch_flags S_hv_fetch_flags
-#endif
-#ifdef PERL_CORE
#define hv_notallowed S_hv_notallowed
#endif
#endif
@@ -2172,6 +2169,19 @@
#define get_debug_opts Perl_get_debug_opts
#endif
#endif
+#define hv_clear_placeholders Perl_hv_clear_placeholders
+#if defined(PERL_IN_HV_C) || defined(PERL_DECL_PROT)
+#ifdef PERL_CORE
+#define hv_delete_common S_hv_delete_common
+#endif
+#ifdef PERL_CORE
+#define hv_fetch_common S_hv_fetch_common
+#endif
+#endif
+#define hv_scalar Perl_hv_scalar
+#ifdef PERL_CORE
+#define magic_scalarpack Perl_magic_scalarpack
+#endif
#define ck_anoncode Perl_ck_anoncode
#define ck_bitop Perl_ck_bitop
#define ck_concat Perl_ck_concat
@@ -3844,9 +3854,6 @@
#define share_hek_flags(a,b,c,d) S_share_hek_flags(aTHX_ a,b,c,d)
#endif
#ifdef PERL_CORE
-#define hv_fetch_flags(a,b,c,d,e) S_hv_fetch_flags(aTHX_ a,b,c,d,e)
-#endif
-#ifdef PERL_CORE
#define hv_notallowed(a,b,c,d) S_hv_notallowed(aTHX_ a,b,c,d)
#endif
#endif
@@ -4676,6 +4683,19 @@
#define get_debug_opts(a) Perl_get_debug_opts(aTHX_ a)
#endif
#endif
+#define hv_clear_placeholders(a) Perl_hv_clear_placeholders(aTHX_ a)
+#if defined(PERL_IN_HV_C) || defined(PERL_DECL_PROT)
+#ifdef PERL_CORE
+#define hv_delete_common(a,b,c,d,e,f,g) S_hv_delete_common(aTHX_ a,b,c,d,e,f,g)
+#endif
+#ifdef PERL_CORE
+#define hv_fetch_common(a,b,c,d,e,f,g,h) S_hv_fetch_common(aTHX_ a,b,c,d,e,f,g,h)
+#endif
+#endif
+#define hv_scalar(a) Perl_hv_scalar(aTHX_ a)
+#ifdef PERL_CORE
+#define magic_scalarpack(a,b) Perl_magic_scalarpack(aTHX_ a,b)
+#endif
#define ck_anoncode(a) Perl_ck_anoncode(aTHX_ a)
#define ck_bitop(a) Perl_ck_bitop(aTHX_ a)
#define ck_concat(a) Perl_ck_concat(aTHX_ a)