summaryrefslogtreecommitdiff
path: root/embed.fnc
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2013-05-06 14:40:04 +0200
committerNicholas Clark <nick@ccl4.org>2013-05-20 21:19:43 +0200
commit691a44df41bbec11b634fc7bbf78a6eeb1f768a3 (patch)
treec36b99baa0e5faf7139ef0b22efe36f60d1d24ec /embed.fnc
parent66bb80e4324617840aa70c8af410bf76eedcbea1 (diff)
downloadperl-691a44df41bbec11b634fc7bbf78a6eeb1f768a3.tar.gz
Eliminate the conditionally-compiled fallback functions for htonl etc.
These are now only being used for mixed-endian platforms which do not provide their own htnol (etc) functions. Given that the fallbacks have been buggy since they were added in Perl 3.0, it's safe to conclude that no mixed-endian platforms were ever using these functions. It's also unclear why these functions were ever marked as 'A', part of the API. XS code can't call them directly, as it can't rely on them being compiled. Unsurprisingly, no code on CPAN references them.
Diffstat (limited to 'embed.fnc')
-rw-r--r--embed.fnc5
1 files changed, 0 insertions, 5 deletions
diff --git a/embed.fnc b/embed.fnc
index 8b73d6dc6a..70f5889183 100644
--- a/embed.fnc
+++ b/embed.fnc
@@ -888,11 +888,6 @@ Ap |void |my_setenv |NULLOK const char* nam|NULLOK const char* val
Apmb |I32 |my_stat
pX |I32 |my_stat_flags |NULLOK const U32 flags
Ap |char * |my_strftime |NN const char *fmt|int sec|int min|int hour|int mday|int mon|int year|int wday|int yday|int isdst
-#if defined(MYSWAP)
-ApPR |short |my_swap |short s
-ApPR |long |my_htonl |long l
-ApPR |long |my_ntohl |long l
-#endif
: Used in pp_ctl.c
p |void |my_unexec
Apa |OP* |newANONLIST |NULLOK OP* o