… | … | ||
---|---|---|---|
30 | 3 == $? >> 8 | 30 | 3 == $? >> 8 |
31 | ? "not " : "", "ok 3\n"; | 31 | ? "not " : "", "ok 3\n"; |
32 | 32 | ||
33 | my $coro = new Coro sub { | 33 | my $coro = new Coro sub { |
34 | print "ok 5\n"; | 34 | print "ok 5\n"; |
35 | Coro::State::_exit 0; | 35 | Coro::Util::_exit 0; |
36 | }; | 36 | }; |
37 | 37 | ||
38 | $Coro::idle = sub { | 38 | $Coro::idle = sub { |
39 | $coro->ready; | 39 | $coro->ready; |
40 | }; | 40 | }; |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |