summaryrefslogtreecommitdiff
path: root/pp_sys.c
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2012-11-17 15:09:45 +0100
committerNicholas Clark <nick@ccl4.org>2012-11-19 13:55:19 +0100
commit739a0b843246478d33d6b9205abb19e5492a5807 (patch)
tree35e51e021d300da32b7eb4b872439fa3b107bcc6 /pp_sys.c
parenta2b3762a2993f9d1f92ffee8ac3a80b128381168 (diff)
downloadperl-739a0b843246478d33d6b9205abb19e5492a5807.tar.gz
Remove the EPOC port.
EPOC was a family of operating systems developed by Psion for mobile devices. It was the predecessor of Symbian. The port was last updated in April 2002.
Diffstat (limited to 'pp_sys.c')
-rw-r--r--pp_sys.c12
1 files changed, 0 insertions, 12 deletions
diff --git a/pp_sys.c b/pp_sys.c
index 54fe66183a..5945e23f22 100644
--- a/pp_sys.c
+++ b/pp_sys.c
@@ -1685,10 +1685,6 @@ PP(pp_sysread)
/* MSG_TRUNC can give oversized count; quietly lose it */
if (count > length)
count = length;
-#ifdef EPOC
- /* Bogus return without padding */
- bufsize = sizeof (struct sockaddr_in);
-#endif
SvCUR_set(bufsv, count);
*SvEND(bufsv) = '\0';
(void)SvPOK_only(bufsv);
@@ -2405,10 +2401,6 @@ PP(pp_socket)
fcntl(fd, F_SETFD, fd > PL_maxsysfd); /* ensure close-on-exec */
#endif
-#ifdef EPOC
- setbuf( IoIFP(io), NULL); /* EPOC gets confused about sockets */
-#endif
-
RETPUSHYES;
}
#endif
@@ -2575,10 +2567,6 @@ PP(pp_accept)
fcntl(fd, F_SETFD, fd > PL_maxsysfd); /* ensure close-on-exec */
#endif
-#ifdef EPOC
- len = sizeof (struct sockaddr_in); /* EPOC somehow truncates info */
- setbuf( IoIFP(nstio), NULL); /* EPOC gets confused about sockets */
-#endif
#ifdef __SCO_VERSION__
len = sizeof (struct sockaddr_in); /* OpenUNIX 8 somehow truncates info */
#endif