X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=embed.h;h=e97d5dbc306b5f36fd0aa1de3d96494cea5e9ac8;hb=ce5e090c3cdc0df8112cc707442a0492b20b168b;hp=34c81efcfba457e2623c114968082f84ecb82a0a;hpb=d3ba3f5c3251cdefafd2e9fe0bb52ce4419c7624;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/embed.h b/embed.h
index 34c81ef..e97d5db 100644
--- a/embed.h
+++ b/embed.h
@@ -279,13 +279,8 @@
 #define gv_stashsv		Perl_gv_stashsv
 #define hv_clear		Perl_hv_clear
 #define hv_delayfree_ent	Perl_hv_delayfree_ent
-#define hv_delete		Perl_hv_delete
-#define hv_delete_ent		Perl_hv_delete_ent
-#define hv_exists		Perl_hv_exists
-#define hv_exists_ent		Perl_hv_exists_ent
-#define hv_fetch		Perl_hv_fetch
-#define hv_fetch_ent		Perl_hv_fetch_ent
 #define hv_common		Perl_hv_common
+#define hv_common_key_len	Perl_hv_common_key_len
 #define hv_free_ent		Perl_hv_free_ent
 #define hv_iterinit		Perl_hv_iterinit
 #define hv_iterkey		Perl_hv_iterkey
@@ -294,9 +289,6 @@
 #define hv_iternext_flags	Perl_hv_iternext_flags
 #define hv_iterval		Perl_hv_iterval
 #define hv_ksplit		Perl_hv_ksplit
-#define hv_store		Perl_hv_store
-#define hv_store_ent		Perl_hv_store_ent
-#define hv_store_flags		Perl_hv_store_flags
 #define hv_undef		Perl_hv_undef
 #define ibcmp			Perl_ibcmp
 #define ibcmp_locale		Perl_ibcmp_locale
@@ -1346,7 +1338,6 @@
 #if defined(PERL_IN_PP_SYS_C) || defined(PERL_DECL_PROT)
 #ifdef PERL_CORE
 #define doform			S_doform
-#define emulate_eaccess		S_emulate_eaccess
 #endif
 #  if !defined(HAS_MKDIR) || !defined(HAS_RMDIR)
 #ifdef PERL_CORE
@@ -2564,13 +2555,8 @@
 #ifdef PERL_CORE
 #endif
 #define hv_delayfree_ent(a,b)	Perl_hv_delayfree_ent(aTHX_ a,b)
-#define hv_delete(a,b,c,d)	Perl_hv_delete(aTHX_ a,b,c,d)
-#define hv_delete_ent(a,b,c,d)	Perl_hv_delete_ent(aTHX_ a,b,c,d)
-#define hv_exists(a,b,c)	Perl_hv_exists(aTHX_ a,b,c)
-#define hv_exists_ent(a,b,c)	Perl_hv_exists_ent(aTHX_ a,b,c)
-#define hv_fetch(a,b,c,d)	Perl_hv_fetch(aTHX_ a,b,c,d)
-#define hv_fetch_ent(a,b,c,d)	Perl_hv_fetch_ent(aTHX_ a,b,c,d)
 #define hv_common(a,b,c,d,e,f,g,h)	Perl_hv_common(aTHX_ a,b,c,d,e,f,g,h)
+#define hv_common_key_len(a,b,c,d,e,f)	Perl_hv_common_key_len(aTHX_ a,b,c,d,e,f)
 #define hv_free_ent(a,b)	Perl_hv_free_ent(aTHX_ a,b)
 #define hv_iterinit(a)		Perl_hv_iterinit(aTHX_ a)
 #define hv_iterkey(a,b)		Perl_hv_iterkey(aTHX_ a,b)
@@ -2585,9 +2571,6 @@
 #endif
 #if defined(PERL_CORE) || defined(PERL_EXT)
 #endif
-#define hv_store(a,b,c,d,e)	Perl_hv_store(aTHX_ a,b,c,d,e)
-#define hv_store_ent(a,b,c,d)	Perl_hv_store_ent(aTHX_ a,b,c,d)
-#define hv_store_flags(a,b,c,d,e,f)	Perl_hv_store_flags(aTHX_ a,b,c,d,e,f)
 #define hv_undef(a)		Perl_hv_undef(aTHX_ a)
 #define ibcmp(a,b,c)		Perl_ibcmp(aTHX_ a,b,c)
 #define ibcmp_locale(a,b,c)	Perl_ibcmp_locale(aTHX_ a,b,c)
@@ -3104,7 +3087,9 @@
 #define share_hek(a,b,c)	Perl_share_hek(aTHX_ a,b,c)
 #if defined(HAS_SIGACTION) && defined(SA_SIGINFO)
 #ifdef PERL_CORE
+#define sighandler		Perl_sighandler
 #endif
+#define csighandler		Perl_csighandler
 #else
 #ifdef PERL_CORE
 #define sighandler		Perl_sighandler
@@ -3634,7 +3619,6 @@
 #if defined(PERL_IN_PP_SYS_C) || defined(PERL_DECL_PROT)
 #ifdef PERL_CORE
 #define doform(a,b,c)		S_doform(aTHX_ a,b,c)
-#define emulate_eaccess(a,b)	S_emulate_eaccess(aTHX_ a,b)
 #endif
 #  if !defined(HAS_MKDIR) || !defined(HAS_RMDIR)
 #ifdef PERL_CORE