… | |
… | |
1578 | if (coro_rss (coro) > SvIV (sv_pool_rss) |
1578 | if (coro_rss (coro) > SvIV (sv_pool_rss) |
1579 | || av_len (av_async_pool) + 1 >= SvIV (sv_pool_size)) |
1579 | || av_len (av_async_pool) + 1 >= SvIV (sv_pool_size)) |
1580 | croak ("\3terminate\2\n"); |
1580 | croak ("\3terminate\2\n"); |
1581 | |
1581 | |
1582 | av_clear (GvAV (PL_defgv)); |
1582 | av_clear (GvAV (PL_defgv)); |
1583 | hv_store (SvRV (coro_current), "desc", sizeof ("desc") - 1, |
1583 | hv_store ((HV *)SvRV (coro_current), "desc", sizeof ("desc") - 1, |
1584 | newSVpvn ("[async_pool idle]", sizeof ("[async_pool idle]") - 1), 0); |
1584 | newSVpvn ("[async_pool idle]", sizeof ("[async_pool idle]") - 1), 0); |
1585 | coro->save = CORO_SAVE_DEF; |
1585 | coro->save = CORO_SAVE_DEF; |
1586 | coro->prio = 0; |
1586 | coro->prio = 0; |
1587 | av_push (av_async_pool, newSVsv (coro_current)); |
1587 | av_push (av_async_pool, newSVsv (coro_current)); |
1588 | } |
1588 | } |