| … | … | ||
|---|---|---|---|
| 27 | my $t = EV::timer 0.2, 0, sub { | 27 | my $t = EV::timer 0.2, 0, sub { |
| 28 | print "ok 2\n"; | 28 | print "ok 2\n"; |
| 29 | EV::unloop; | 29 | EV::unloop; |
| 30 | }; | 30 | }; |
| 31 | 31 | ||
| 32 | print "ok 1\n"; | 32 | print $w->stat ? "" : "not ", "ok 1\n"; |
| 33 | EV::loop; | 33 | EV::loop; |
| 34 | print "ok 3\n"; | 34 | print "ok 3\n"; |
| 35 | 35 | ||
| 36 | # delete the file, as windows will not update any stats otherwise :( | 36 | # delete the file, as windows will not update any stats otherwise :( |
| 37 | undef $fh; | 37 | undef $fh; |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |