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.155 by root, Fri Sep 21 01:09:36 2007 UTC vs.
Revision 1.157 by root, Fri Sep 21 02:01:13 2007 UTC

395 /* 395 /*
396 * the worst thing you can imagine happens first - we have to save 396 * the worst thing you can imagine happens first - we have to save
397 * (and reinitialize) all cv's in the whole callchain :( 397 * (and reinitialize) all cv's in the whole callchain :(
398 */ 398 */
399 399
400 EXTEND (SP, 3 + 1);
401 PUSHs (Nullsv); 400 XPUSHs (Nullsv);
402 /* this loop was inspired by pp_caller */ 401 /* this loop was inspired by pp_caller */
403 for (;;) 402 for (;;)
404 { 403 {
405 while (cxix >= 0) 404 while (cxix >= 0)
406 { 405 {
455# define coro_init_stacks init_stacks 454# define coro_init_stacks init_stacks
456#else 455#else
457static void 456static void
458coro_init_stacks (pTHX) 457coro_init_stacks (pTHX)
459{ 458{
460 PL_curstackinfo = new_stackinfo(64, 4); 459 PL_curstackinfo = new_stackinfo(64, 6);
461 PL_curstackinfo->si_type = PERLSI_MAIN; 460 PL_curstackinfo->si_type = PERLSI_MAIN;
462 PL_curstack = PL_curstackinfo->si_stack; 461 PL_curstack = PL_curstackinfo->si_stack;
463 PL_mainstack = PL_curstack; /* remember in case we switch stacks */ 462 PL_mainstack = PL_curstack; /* remember in case we switch stacks */
464 463
465 PL_stack_base = AvARRAY(PL_curstack); 464 PL_stack_base = AvARRAY(PL_curstack);
486 New(54,PL_savestack,64,ANY); 485 New(54,PL_savestack,64,ANY);
487 PL_savestack_ix = 0; 486 PL_savestack_ix = 0;
488 PL_savestack_max = 64; 487 PL_savestack_max = 64;
489 488
490#if !PERL_VERSION_ATLEAST (5,9,0) 489#if !PERL_VERSION_ATLEAST (5,9,0)
491 New(54,PL_retstack,8,OP*); 490 New(54,PL_retstack,4,OP*);
492 PL_retstack_ix = 0; 491 PL_retstack_ix = 0;
493 PL_retstack_max = 8; 492 PL_retstack_max = 4;
494#endif 493#endif
495} 494}
496#endif 495#endif
497 496
498/* 497/*

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines