ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/Coro/Coro/State.xs
(Generate patch)

Comparing Coro/Coro/State.xs (file contents):
Revision 1.314 by root, Thu Nov 20 03:24:39 2008 UTC vs.
Revision 1.315 by root, Thu Nov 20 05:25:17 2008 UTC

… …
183static SV *sv_pool_size; 183static SV *sv_pool_size;
184static SV *sv_async_pool_idle; 184static SV *sv_async_pool_idle;
185static AV *av_async_pool; 185static AV *av_async_pool;
186static SV *sv_Coro; 186static SV *sv_Coro;
187static CV *cv_pool_handler; 187static CV *cv_pool_handler;
188static CV *cv_coro_new; 188static CV *cv_coro_state_new;
189 189
190/* Coro::AnyEvent */ 190/* Coro::AnyEvent */
191static SV *sv_activity; 191static SV *sv_activity;
192 192
193static struct coro_cctx *cctx_first; 193static struct coro_cctx *cctx_first;
… …
2957 2957
2958 av_async_pool = coro_get_av (aTHX_ "Coro::async_pool", TRUE); 2958 av_async_pool = coro_get_av (aTHX_ "Coro::async_pool", TRUE);
2959 sv_pool_rss = coro_get_sv (aTHX_ "Coro::POOL_RSS" , TRUE); 2959 sv_pool_rss = coro_get_sv (aTHX_ "Coro::POOL_RSS" , TRUE);
2960 sv_pool_size = coro_get_sv (aTHX_ "Coro::POOL_SIZE" , TRUE); 2960 sv_pool_size = coro_get_sv (aTHX_ "Coro::POOL_SIZE" , TRUE);
2961 cv_coro_run = get_cv ( "Coro::_terminate", GV_ADD); 2961 cv_coro_run = get_cv ( "Coro::_terminate", GV_ADD);
2962 cv_coro_terminate = get_cv ( "Coro::terminate", GV_ADD); 2962 cv_coro_terminate = get_cv ( "Coro::terminate" , GV_ADD);
2963 coro_current = coro_get_sv (aTHX_ "Coro::current" , FALSE); 2963 coro_current = coro_get_sv (aTHX_ "Coro::current" , FALSE); SvREADONLY_on (coro_current);
2964 SvREADONLY_on (coro_current);
2965 2964
2966 sv_async_pool_idle = newSVpv ("[async pool idle]", 0); SvREADONLY_on (sv_async_pool_idle); 2965 sv_async_pool_idle = newSVpv ("[async pool idle]", 0); SvREADONLY_on (sv_async_pool_idle);
2967 sv_Coro = newSVpv ("Coro", 0); SvREADONLY_on (sv_Coro); 2966 sv_Coro = newSVpv ("Coro", 0); SvREADONLY_on (sv_Coro);
2968 cv_pool_handler = get_cv ("Coro::_pool_handler", 0); SvREADONLY_on (cv_pool_handler); 2967 cv_pool_handler = get_cv ("Coro::pool_handler", GV_ADD); SvREADONLY_on (cv_pool_handler);
2969 cv_coro_new = get_cv ("Coro::new", 0); SvREADONLY_on (cv_coro_new); 2968 cv_coro_state_new = get_cv ("Coro::State::new", 0); SvREADONLY_on (cv_coro_state_new);
2970 2969
2971 coro_stash = gv_stashpv ("Coro", TRUE); 2970 coro_stash = gv_stashpv ("Coro", TRUE);
2972 2971
2973 newCONSTSUB (coro_stash, "PRIO_MAX", newSViv (PRIO_MAX)); 2972 newCONSTSUB (coro_stash, "PRIO_MAX", newSViv (PRIO_MAX));
2974 newCONSTSUB (coro_stash, "PRIO_HIGH", newSViv (PRIO_HIGH)); 2973 newCONSTSUB (coro_stash, "PRIO_HIGH", newSViv (PRIO_HIGH));
… …
3089 PUSHMARK (SP); 3088 PUSHMARK (SP);
3090 EXTEND (SP, 2); 3089 EXTEND (SP, 2);
3091 PUSHs (sv_Coro); 3090 PUSHs (sv_Coro);
3092 PUSHs ((SV *)cv_pool_handler); 3091 PUSHs ((SV *)cv_pool_handler);
3093 PUTBACK; 3092 PUTBACK;
3094 call_sv ((SV *)cv_coro_new, G_SCALAR); 3093 call_sv ((SV *)cv_coro_state_new, G_SCALAR);
3095 SPAGAIN; 3094 SPAGAIN;
3096 3095
3097 hv = (HV *)SvREFCNT_inc_NN (SvRV (POPs)); 3096 hv = (HV *)SvREFCNT_inc_NN (SvRV (POPs));
3098 } 3097 }
3099 3098

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines