… | |
… | |
3179 | CODE: |
3179 | CODE: |
3180 | { |
3180 | { |
3181 | struct coro *current = SvSTATE_current; |
3181 | struct coro *current = SvSTATE_current; |
3182 | SV **throwp = self == current ? &CORO_THROW : &self->except; |
3182 | SV **throwp = self == current ? &CORO_THROW : &self->except; |
3183 | SvREFCNT_dec (*throwp); |
3183 | SvREFCNT_dec (*throwp); |
|
|
3184 | SvGETMAGIC (throw); |
3184 | *throwp = SvOK (throw) ? newSVsv (throw) : 0; |
3185 | *throwp = SvOK (throw) ? newSVsv (throw) : 0; |
3185 | } |
3186 | } |
3186 | |
3187 | |
3187 | void |
3188 | void |
3188 | api_trace (SV *coro, int flags = CC_TRACE | CC_TRACE_SUB) |
3189 | api_trace (SV *coro, int flags = CC_TRACE | CC_TRACE_SUB) |
… | |
… | |
3335 | void |
3336 | void |
3336 | _set_readyhook (SV *hook) |
3337 | _set_readyhook (SV *hook) |
3337 | PROTOTYPE: $ |
3338 | PROTOTYPE: $ |
3338 | CODE: |
3339 | CODE: |
3339 | SvREFCNT_dec (coro_readyhook); |
3340 | SvREFCNT_dec (coro_readyhook); |
|
|
3341 | SvGETMAGIC (hook); |
3340 | coro_readyhook = SvOK (hook) ? newSVsv (hook) : 0; |
3342 | coro_readyhook = SvOK (hook) ? newSVsv (hook) : 0; |
3341 | |
3343 | |
3342 | int |
3344 | int |
3343 | prio (Coro::State coro, int newprio = 0) |
3345 | prio (Coro::State coro, int newprio = 0) |
3344 | PROTOTYPE: $;$ |
3346 | PROTOTYPE: $;$ |