This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
allocate a whole fd_set for pp_sselect() on more platforms
authorJarkko Hietaniemi <jhi@iki.fi>
Mon, 20 Jul 1998 00:14:18 +0000 (03:14 +0300)
committerGurusamy Sarathy <gsar@cpan.org>
Tue, 21 Jul 1998 04:48:32 +0000 (04:48 +0000)
Message-ID: <oeen2a5y251.fsf@alpha.hut.fi>
Subject: Re: Not OK: perl 5.00475 +DEVEL_BETA_ISSUE_1 on OPENSTEP-Mach 4_1 (UNINSTALLED)

p4raw-id: //depot/perl@1600

pp_sys.c

index c6c208d..d16cd7e 100644 (file)
--- a/pp_sys.c
+++ b/pp_sys.c
@@ -754,7 +754,8 @@ PP(pp_sselect)
     }
 
 #if BYTEORDER == 0x1234 || BYTEORDER == 0x12345678
-#if defined(__linux__) || defined(OS2)
+/* XXX Configure test needed. */
+#if defined(__linux__) || defined(OS2) || defined(NeXT) || defined(__osf__)
     growsize = sizeof(fd_set);
 #else
     growsize = maxlen;         /* little endians can use vecs directly */