diff options
| author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2003-05-02 14:12:08 +0200 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2003-05-02 19:01:04 +0000 |
| commit | 381c1bae8770dba0aec64002bf75d6f4d2e0c0f5 (patch) | |
| tree | 784bf22cb541b4b77761c9742203b9a710b32a83 /pp_sys.c | |
| parent | f026e7c66ee549e42ac49df55a1a12a3859701c7 (diff) | |
| download | perl-381c1bae8770dba0aec64002bf75d6f4d2e0c0f5.tar.gz | |
OpenUNIX 8 support
Message-Id: <20030502121208.3d235027.rgarciasuarez@free.fr>
p4raw-id: //depot/perl@19385
Diffstat (limited to 'pp_sys.c')
| -rw-r--r-- | pp_sys.c | 3 |
1 files changed, 3 insertions, 0 deletions
@@ -2516,6 +2516,9 @@ PP(pp_accept) len = sizeof saddr; /* EPOC somehow truncates info */ setbuf( IoIFP(nstio), NULL); /* EPOC gets confused about sockets */ #endif +#ifdef __SCO_VERSION__ + len = sizeof saddr; /* OpenUNIX 8 somehow truncates info */ +#endif PUSHp((char *)&saddr, len); RETURN; |