summaryrefslogtreecommitdiff
path: root/perl.h
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2013-05-06 18:43:26 +0200
committerNicholas Clark <nick@ccl4.org>2013-05-20 21:19:43 +0200
commite8fda8c499f46bb801215ff1dbea51c1f3007a6c (patch)
treebe185c5ba1dd7245cd902c81f5eafe8c7d186111 /perl.h
parent7e38f754fea50c46f3571cd67982e061b3cf8304 (diff)
downloadperl-e8fda8c499f46bb801215ff1dbea51c1f3007a6c.tar.gz
DO_BO_{UN,}PACK can use my_swabn() directly.
This removes the only users of my_{be,le,h}to{be,le,h}n, so remove the definitions for those macros.
Diffstat (limited to 'perl.h')
-rw-r--r--perl.h21
1 files changed, 0 insertions, 21 deletions
diff --git a/perl.h b/perl.h
index b492f7c708..3636147528 100644
--- a/perl.h
+++ b/perl.h
@@ -795,27 +795,6 @@ EXTERN_C int usleep(unsigned int);
(((U64)(x) & U64_CONST(0xff00000000000000)) >> 56) ))
# endif
-/*----------------------------------------------------------------------------*/
-# if BYTEORDER == 0x1234 || BYTEORDER == 0x12345678 /* little-endian */
-/*----------------------------------------------------------------------------*/
-# define my_htolen(p,n) NOOP
-# define my_letohn(p,n) NOOP
-# define my_htoben(p,n) my_swabn(p,n)
-# define my_betohn(p,n) my_swabn(p,n)
-/*----------------------------------------------------------------------------*/
-# elif BYTEORDER == 0x4321 || BYTEORDER == 0x87654321 /* big-endian */
-/*----------------------------------------------------------------------------*/
-# define my_htolen(p,n) my_swabn(p,n)
-# define my_letohn(p,n) my_swabn(p,n)
-# define my_htoben(p,n) NOOP
-# define my_betohn(p,n) NOOP
-/*----------------------------------------------------------------------------*/
-# else /* all other byte-orders */
-/*----------------------------------------------------------------------------*/
-/*----------------------------------------------------------------------------*/
-# endif /* end of byte-order macros */
-/*----------------------------------------------------------------------------*/
-
/* The old value was hard coded at 1008. (4096-16) seems to be a bit faster,
at least on FreeBSD. YMMV, so experiment. */
#ifndef PERL_ARENA_SIZE