… | |
… | |
240 | CV *startcv; /* the CV to execute */ |
240 | CV *startcv; /* the CV to execute */ |
241 | AV *args; /* data associated with this coroutine (initial args) */ |
241 | AV *args; /* data associated with this coroutine (initial args) */ |
242 | int refcnt; /* coroutines are refcounted, yes */ |
242 | int refcnt; /* coroutines are refcounted, yes */ |
243 | int flags; /* CF_ flags */ |
243 | int flags; /* CF_ flags */ |
244 | HV *hv; /* the perl hash associated with this coro, if any */ |
244 | HV *hv; /* the perl hash associated with this coro, if any */ |
245 | void (*on_destroy)(pTHX_ struct coro *coro); |
245 | void (*on_destroy)(pTHX_ struct coro *coro); /* for temporary use by xs in critical sections */ |
246 | |
246 | |
247 | /* statistics */ |
247 | /* statistics */ |
248 | int usecount; /* number of transfers to this coro */ |
248 | int usecount; /* number of transfers to this coro */ |
249 | |
249 | |
250 | /* coro process data */ |
250 | /* coro process data */ |