| line |
true |
false |
branch |
|
31
|
0 |
2 |
if $IO::Lambda::Poll::DEBUG |
|
42
|
2 |
1 |
if $n == @IO::Lambda::Poll::RECORDS |
|
43
|
0 |
1 |
if $IO::Lambda::Poll::DEBUG |
|
49
|
0 |
16 |
if $IO::Lambda::Poll::DEBUG > 1 |
|
59
|
10 |
6 |
unless ($ok) |
|
63
|
0 |
6 |
if $IO::Lambda::Poll::DEBUG |
|
70
|
10 |
6 |
if @IO::Lambda::Poll::RECORDS == @new |
|
81
|
7 |
0 |
if not defined $frequency or defined $f and $frequency > $f |
|
82
|
7 |
0 |
if not defined $expires or defined $d and $expires > $d |
|
85
|
4 |
10 |
if (defined $frequency) |
|
87
|
4 |
0 |
if (defined $expires) { } |
|
|
0 |
0 |
elsif (@IO::Lambda::Poll::RECORDS) { } |
|
88
|
2 |
2 |
if $expires > $frequency |
|
94
|
4 |
10 |
if (defined $expires) { } |
|
|
2 |
8 |
elsif ($IO::Lambda::Poll::TIMER_ACTIVE) { } |
|
95
|
0 |
4 |
if ($IO::Lambda::Poll::TIMER_ACTIVE) { } |
|
96
|
0 |
0 |
if (abs $expires - $IO::Lambda::Poll::TIMER[2] > 0.001) |
|
98
|
0 |
0 |
if $IO::Lambda::Poll::DEBUG |
|
107
|
0 |
4 |
if $IO::Lambda::Poll::DEBUG |
|
113
|
0 |
2 |
if $IO::Lambda::Poll::DEBUG |
|
124
|
4 |
3 |
if defined $deadline and $deadline < 1000000000 |
|
139
|
0 |
7 |
if $IO::Lambda::Poll::DEBUG |
|
150
|
0 |
0 |
if $n == @IO::Lambda::Poll::RECORDS |
|
151
|
0 |
0 |
if $IO::Lambda::Poll::DEBUG |
|
159
|
3 |
6 |
if $res[0] |
|
160
|
1 |
5 |
if $expired |
|
174
|
2 |
3 |
exists $opt{'timeout'} ? : |