Eliminate the conditionally-compiled fallback functions for htonl etc.

[perl5.git] / embed.h

diff --git a/embed.h b/embed.h
index f32f446..2cd19f8 100644 (file)
--- a/embed.h
+++ b/embed.h
@@ -84,7 +84,6 @@
 #ifndef PERL_IMPLICIT_CONTEXT
 #define croak                  Perl_croak
 #endif
-#define croak_memory_wrap      S_croak_memory_wrap
 #define croak_no_modify                Perl_croak_no_modify
 #define croak_sv(a)            Perl_croak_sv(aTHX_ a)
 #define croak_xs_usage         Perl_croak_xs_usage
@@ -221,6 +220,7 @@
 #define hv_iterval(a,b)                Perl_hv_iterval(aTHX_ a,b)
 #define hv_ksplit(a,b)         Perl_hv_ksplit(aTHX_ a,b)
 #define hv_name_set(a,b,c,d)   Perl_hv_name_set(aTHX_ a,b,c,d)
+#define hv_rand_set(a,b)       Perl_hv_rand_set(aTHX_ a,b)
 #define hv_scalar(a)           Perl_hv_scalar(aTHX_ a)
 #define init_i18nl10n(a)       Perl_init_i18nl10n(aTHX_ a)
 #define init_i18nl14n(a)       Perl_init_i18nl14n(aTHX_ a)
@@ -774,11 +774,6 @@
 #define dump_mstats(a)         Perl_dump_mstats(aTHX_ a)
 #define get_mstats(a,b,c)      Perl_get_mstats(aTHX_ a,b,c)
 #endif
-#if defined(MYSWAP)
-#define my_htonl(a)            Perl_my_htonl(aTHX_ a)
-#define my_ntohl(a)            Perl_my_ntohl(aTHX_ a)
-#define my_swap(a)             Perl_my_swap(aTHX_ a)
-#endif
 #if defined(PERL_GLOBAL_STRUCT)
 #define GetVars()              Perl_GetVars(aTHX)
 #define free_global_struct(a)  Perl_free_global_struct(aTHX_ a)