… | |
… | |
3331 | sv_idle = coro_get_sv (aTHX_ "Coro::idle" , TRUE); |
3331 | sv_idle = coro_get_sv (aTHX_ "Coro::idle" , TRUE); |
3332 | |
3332 | |
3333 | sv_async_pool_idle = newSVpv ("[async pool idle]", 0); SvREADONLY_on (sv_async_pool_idle); |
3333 | sv_async_pool_idle = newSVpv ("[async pool idle]", 0); SvREADONLY_on (sv_async_pool_idle); |
3334 | sv_Coro = newSVpv ("Coro", 0); SvREADONLY_on (sv_Coro); |
3334 | sv_Coro = newSVpv ("Coro", 0); SvREADONLY_on (sv_Coro); |
3335 | cv_pool_handler = get_cv ("Coro::pool_handler", GV_ADD); SvREADONLY_on (cv_pool_handler); |
3335 | cv_pool_handler = get_cv ("Coro::pool_handler", GV_ADD); SvREADONLY_on (cv_pool_handler); |
3336 | |
3336 | CvNODEBUG_on (get_cv ("Coro::_pool_handler", 0)); /* work around a debugger bug */ |
|
|
3337 | |
3337 | coro_stash = gv_stashpv ("Coro", TRUE); |
3338 | coro_stash = gv_stashpv ("Coro", TRUE); |
3338 | |
3339 | |
3339 | newCONSTSUB (coro_stash, "PRIO_MAX", newSViv (CORO_PRIO_MAX)); |
3340 | newCONSTSUB (coro_stash, "PRIO_MAX", newSViv (CORO_PRIO_MAX)); |
3340 | newCONSTSUB (coro_stash, "PRIO_HIGH", newSViv (CORO_PRIO_HIGH)); |
3341 | newCONSTSUB (coro_stash, "PRIO_HIGH", newSViv (CORO_PRIO_HIGH)); |
3341 | newCONSTSUB (coro_stash, "PRIO_NORMAL", newSViv (CORO_PRIO_NORMAL)); |
3342 | newCONSTSUB (coro_stash, "PRIO_NORMAL", newSViv (CORO_PRIO_NORMAL)); |