Server : nginx/1.24.0 System : Linux ip-172-31-33-48 6.14.0-1011-aws #11~24.04.1-Ubuntu SMP Fri Aug 1 02:07:25 UTC 2025 x86_64 User : www-data ( 33) PHP Version : 8.3.6 Disable Function : NONE Directory : /usr/lib/x86_64-linux-gnu/perl/5.38.2/bits/ |
Upload File : |
require '_h2ph_pre.ph'; no warnings qw(redefine misc); unless(defined(&_SYS_SELECT_H)) { die("Never use <bits/select.h> directly; include <sys/select.h> instead."); } unless(defined(&__FD_ZERO)) { sub __FD_ZERO { my($s) = @_; eval q( &do { 'unsigned int __i'; &fd_set * &__arr = ($s); &for ( &__i = 0; &__i < $sizeof{ &fd_set} / $sizeof{ &__fd_mask}; ++ &__i) &__FDS_BITS ( &__arr)[ &__i] = 0; } &while (0)); } } unless(defined(&__FD_SET)) { sub __FD_SET { my($d, $s) = @_; eval q((( &void) ( &__FDS_BITS ($s)[ &__FD_ELT($d)] |= &__FD_MASK($d)))); } } unless(defined(&__FD_CLR)) { sub __FD_CLR { my($d, $s) = @_; eval q((( &void) ( &__FDS_BITS ($s)[ &__FD_ELT($d)] &= ~ &__FD_MASK($d)))); } } unless(defined(&__FD_ISSET)) { sub __FD_ISSET { my($d, $s) = @_; eval q((( &__FDS_BITS ($s)[ &__FD_ELT ($d)] & &__FD_MASK ($d)) != 0)); } } 1;