I have not ... Thanks for the link. Jason Allison Principal Engineer ARINC Incorporated Office: (410) 266-2006 FAX: (410) 573-3026
-----Original Message----- From: Stas Bekman [mailto:[EMAIL PROTECTED] Sent: Tuesday, August 05, 2003 3:16 AM To: Allison, Jason (JALLISON) Cc: '[EMAIL PROTECTED]' Subject: Re: IO::Select ... ($ERRNO == EINTR) Allison, Jason (JALLISON) wrote: > Not sure if this is the best place to ask, but im at a loss for > answers. This is definitely not the right place. Have you tried p5p?http://lists.perl.org/showlist.cgi? name=perl5-porters You should probably use 'perlbug' to submit the report. > ----- > # diff /usr/local/lib/perl5/5.6.1/sun4-solaris/IO/Select.pm > /usr/local/lib/perl5/5.8.0/sun4-solaris/IO/Select.pm > > 14c14 > < $VERSION = "1.14"; > --- > > $VERSION = "1.15"; > 134c134 > < warnings::warn("Call to depreciated method 'has_error', use > 'has_exception'") > --- > > warnings::warn("Call to deprecated method 'has_error', use > 'has_exception'") > 284c284 > < reference where the first element is a C<IO::Handle> or an integer. > --- > > reference where the first element is an C<IO::Handle> or an integer. > ----- > > // Code > ... > # Block and wait for either an incoming Data Packet or timeout. See Note > # 1. > # NOTES: 1. Checking for VTM Clients is polled rather than event > driven > # and thus only done at the bottom of the loop. This can add > # at most a 7 second delay to an attaching VTM Client - > so what. > # Polling is done by setting the socket temporarily to > # non-blocking. > > @ReadyHandles = $Selector->can_read($SelectTmOut); > > ... > > if (scalar(@ReadyHandles) > 0) > { > ... > else > { > if (! $ERRNO) > { > ... > } > else > { > # Error on select() call > unless ($ERRNO == EINTR) > { > # Ignore EINTR because this occurs regularly and is not a > problem. > UsrAbort("IO::Select() Failed", $ERRNO+0, VTM, \&ExitSvr); > } > } > } > // end code > > This snippet set works great with 5.6.1, initial testing of 5.8.0 > shows > ($ERRNO == EINTR). I have checked the Release Notes and perldelta but > can't find the cause. > > Any and all help is appreciated as to how this has introduced itself.. > If there is a better place for this discussion, please advise. > > Thanks in advance, > > Jason Allison > -- __________________________________________________________________ Stas Bekman JAm_pH ------> Just Another mod_perl Hacker http://stason.org/ mod_perl Guide ---> http://perl.apache.org mailto:[EMAIL PROTECTED] http://use.perl.org http://apacheweek.com http://modperlbook.org http://apache.org http://ticketmaster.com --------------------------------------------------------------------- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
