… | … | ||
---|---|---|---|
15 | my $timer = EV::timer_ns 1, 0.3, sub { print "ok 7\n"; $_[0]->stop }; | 15 | my $timer = EV::timer_ns 1, 0.3, sub { print "ok 7\n"; $_[0]->stop }; |
16 | 16 | ||
17 | $timer->keepalive (1); | 17 | $timer->keepalive (1); |
18 | 18 | ||
19 | print "ok 1\n"; | 19 | print "ok 1\n"; |
20 | EV::loop; | 20 | EV::run; |
21 | print "ok 2\n"; | 21 | print "ok 2\n"; |
22 | 22 | ||
23 | $timer->start; | 23 | $timer->start; |
24 | 24 | ||
25 | $timer->keepalive (0); | 25 | $timer->keepalive (0); |
… | … | ||
30 | 30 | ||
31 | my $timer2 = EV::timer -1, 0, sub { print "ok 4\n" }; | 31 | my $timer2 = EV::timer -1, 0, sub { print "ok 4\n" }; |
32 | $timer2->keepalive (0); | 32 | $timer2->keepalive (0); |
33 | 33 | ||
34 | print "ok 3\n"; | 34 | print "ok 3\n"; |
35 | EV::loop; | 35 | EV::run; |
36 | print "ok 5\n"; | 36 | print "ok 5\n"; |
37 | 37 | ||
38 | $timer->keepalive (1); | 38 | $timer->keepalive (1); |
39 | 39 | ||
40 | print "ok 6\n"; | 40 | print "ok 6\n"; |
41 | EV::loop; | 41 | EV::run; |
42 | print "ok 8\n"; | 42 | print "ok 8\n"; |
43 | 43 |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |