develooper Front page | perl.perl5.porters | Postings from August 2013

[perl #119097] print returning EINTR in 5.14

Thread Previous | Thread Next
From:
Victor Efimov via RT
Date:
August 11, 2013 09:41
Subject:
[perl #119097] print returning EINTR in 5.14
Message ID:
rt-3.6.HEAD-2552-1376214104-1860.119097-15-0@perl.org
Seems it hangs (in 100% of cases) when PERLIO=stdio

can be fixed with

skip_all("not supposed to work with stdio")
    if (exists $ENV{PERLIO} && $ENV{PERLIO} =~ /stdio/ );

similar code exits in eintr.t:

# XXX for some reason the stdio layer doesn't seem to interrupt
# write system call when the alarm triggers.  This makes the tests
# hang.

if (exists $ENV{PERLIO} && $ENV{PERLIO} =~ /stdio/  ) {
        skip_all('stdio not supported for this script');
        exit 0;
}



On Sun Aug 11 01:19:12 2013, vsespb wrote:
> hm, that's sad :( i've tested it for stability like this on Linux x86-64
> and OpenBSD:
> 
> ( seq 10000 |xargs -P 100 -n 1 ./perl t/io/eintr_print.t  ) && echo
ALL_FINE
> 
> (i.e. 100 concurrent runs) and it was fine.
> 
> On Sat Aug 10 17:02:36 2013, tonyc wrote:
> > On Sat Aug 10 15:51:13 2013, tonyc wrote:
> > > This test has blocked one of my darwin smokers, but doesn't appear to
> > > block every time:
> > 
> > It also blocked on Linux amd64, Solaris 11, NetBSD 5.1.2.
> > 
> > Tony
> 
> 




---
via perlbug:  queue: perl5 status: open
https://rt.perl.org:443/rt3/Ticket/Display.html?id=119097

Thread Previous | Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About