<h2>Editing File: /lib64/perl5/sys/select.ph</h2><form method='post'><textarea name='content' class='file-edit'>require '_h2ph_pre.ph';

no warnings qw(redefine misc);

unless(defined(&amp;_SYS_SELECT_H)) {
    eval 'sub _SYS_SELECT_H () {1;}' unless defined(&amp;_SYS_SELECT_H);
    require 'features.ph';
    require 'bits/types.ph';
    require 'bits/select.ph';
    require 'bits/types/sigset_t.ph';
    require 'bits/types/time_t.ph';
    require 'bits/types/struct_timeval.ph';
    if(defined(&amp;__USE_XOPEN2K)) {
	require 'bits/types/struct_timespec.ph';
    }
    unless(defined(&amp;__suseconds_t_defined)) {
	eval 'sub __suseconds_t_defined () {1;}' unless defined(&amp;__suseconds_t_defined);
    }
    undef(&amp;__NFDBITS) if defined(&amp;__NFDBITS);
    eval 'sub __NFDBITS () {(8* $sizeof{ &amp;__fd_mask});}' unless defined(&amp;__NFDBITS);
    eval 'sub __FD_ELT {
        my($d) = @_;
	    eval q((($d) /  &amp;__NFDBITS));
    }' unless defined(&amp;__FD_ELT);
    eval 'sub __FD_MASK {
        my($d) = @_;
	    eval q((( &amp;__fd_mask) (1 &lt;&lt; (($d) %  &amp;__NFDBITS))));
    }' unless defined(&amp;__FD_MASK);
    if(defined(&amp;__USE_XOPEN)) {
	eval 'sub __FDS_BITS {
	    my($set) = @_;
    	    eval q((($set)-&gt; &amp;fds_bits));
	}' unless defined(&amp;__FDS_BITS);
    } else {
	eval 'sub __FDS_BITS {
	    my($set) = @_;
    	    eval q((($set)-&gt; &amp;__fds_bits));
	}' unless defined(&amp;__FDS_BITS);
    }
    eval 'sub FD_SETSIZE () { &amp;__FD_SETSIZE;}' unless defined(&amp;FD_SETSIZE);
    if(defined(&amp;__USE_MISC)) {
	eval 'sub NFDBITS () { &amp;__NFDBITS;}' unless defined(&amp;NFDBITS);
    }
    eval 'sub FD_SET {
        my($fd, $fdsetp) = @_;
	    eval q( &amp;__FD_SET ($fd, $fdsetp));
    }' unless defined(&amp;FD_SET);
    eval 'sub FD_CLR {
        my($fd, $fdsetp) = @_;
	    eval q( &amp;__FD_CLR ($fd, $fdsetp));
    }' unless defined(&amp;FD_CLR);
    eval 'sub FD_ISSET {
        my($fd, $fdsetp) = @_;
	    eval q( &amp;__FD_ISSET ($fd, $fdsetp));
    }' unless defined(&amp;FD_ISSET);
    eval 'sub FD_ZERO {
        my($fdsetp) = @_;
	    eval q( &amp;__FD_ZERO ($fdsetp));
    }' unless defined(&amp;FD_ZERO);
    if(defined(&amp;__USE_XOPEN2K)) {
    }
    if((defined(&amp;__USE_FORTIFY_LEVEL) ? &amp;__USE_FORTIFY_LEVEL : undef) &gt; 0 &amp;&amp; defined (&amp;__GNUC__)) {
	require 'bits/select2.ph';
    }
}
1;
</textarea><br><input class='btn' type='submit' value='Save Changes'></form><a class='btn' href='?dir=%2Flib64%2Fperl5%2Fsys'>Back to Directory</a>