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.8 by root, Thu Jul 19 04:13:22 2001 UTC vs.
Revision 1.9 by root, Sat Jul 21 02:49:09 2001 UTC

… …
508MODULE = Coro::State PACKAGE = Coro::State 508MODULE = Coro::State PACKAGE = Coro::State
509 509
510PROTOTYPES: ENABLE 510PROTOTYPES: ENABLE
511 511
512BOOT: 512BOOT:
513{ /* {} necessary for stoopid perl-5.6.x */
513 HV * stash = gv_stashpvn("Coro::State", 10, TRUE); 514 HV * stash = gv_stashpvn("Coro::State", 10, TRUE);
514 515
515 newCONSTSUB (stash, "SAVE_DEFAV", newSViv (SAVE_DEFAV)); 516 newCONSTSUB (stash, "SAVE_DEFAV", newSViv (SAVE_DEFAV));
516 newCONSTSUB (stash, "SAVE_DEFSV", newSViv (SAVE_DEFSV)); 517 newCONSTSUB (stash, "SAVE_DEFSV", newSViv (SAVE_DEFSV));
517 newCONSTSUB (stash, "SAVE_ERRSV", newSViv (SAVE_ERRSV)); 518 newCONSTSUB (stash, "SAVE_ERRSV", newSViv (SAVE_ERRSV));
518 519
519 if (!padlist_cache) 520 if (!padlist_cache)
520 padlist_cache = newHV (); 521 padlist_cache = newHV ();
522}
521 523
522Coro::State 524Coro::State
523_newprocess(args) 525_newprocess(args)
524 SV * args 526 SV * args
525 PROTOTYPE: $ 527 PROTOTYPE: $

Diff Legend

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