… | … | ||
---|---|---|---|
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 |