… | … | ||
---|---|---|---|
8 | } | 8 | } |
9 | 9 | ||
10 | my $w = EV::idle sub { print "not ok 3\n"; $_[0]->stop }; | 10 | my $w = EV::idle sub { print "not ok 3\n"; $_[0]->stop }; |
11 | $w->feed_event (EV::CUSTOM); | 11 | $w->feed_event (EV::CUSTOM); |
12 | $w->stop; | 12 | $w->stop; |
13 | EV::loop; | 13 | EV::run; |
14 | print "ok 3\n"; | 14 | print "ok 3\n"; |
15 | 15 | ||
16 | my $w = EV::idle sub { print "ok 4\n"; $_[0]->stop }; | 16 | my $w = EV::idle sub { print "ok 4\n"; $_[0]->stop }; |
17 | $w->feed_event (EV::CUSTOM); | 17 | $w->feed_event (EV::CUSTOM); |
18 | $w->clear_pending; | 18 | $w->clear_pending; |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |