1 | =head1 NAME | 1 | =head1 NAME |
---|---|---|---|
2 | 2 | ||
3 | Coro - create an manage coroutines | 3 | Coro - create and manage coroutines |
4 | 4 | ||
5 | =head1 SYNOPSIS | 5 | =head1 SYNOPSIS |
6 | 6 | ||
7 | use Coro; | 7 | use Coro; |
8 | 8 | ||
… | … | ||
90 | eval { &$proc->resume }; | 90 | eval { &$proc->resume }; |
91 | if ($@) { | 91 | if ($@) { |
92 | ($error_msg, $error_coro) = ($@, $current); | 92 | ($error_msg, $error_coro) = ($@, $current); |
93 | $error->resume; | 93 | $error->resume; |
94 | } | 94 | } |
95 | } while (); | 95 | } while (1); |
96 | }, $class; | 96 | }, $class; |
97 | } | 97 | } |
98 | 98 | ||
99 | =item $coro->resume | 99 | =item $coro->resume |
100 | 100 |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |