[ViewVC] Diff of: cvs/Coro/Coro/State.xs

Comparing Coro/Coro/State.xs (file contents):
Revision 1.236 by root, Sat May 10 17:43:41 2008 UTC vs.
Revision 1.237 by root, Fri May 23 00:27:06 2008 UTC

 static int
 api_ready (SV *coro_sv)
 {
   dTHX;
   struct coro *coro;
-  SV *hook;
+  SV *sv_hook;
+  void (*xs_hook)(void);
   if (SvROK (coro_sv))
     coro_sv = SvRV (coro_sv);
   coro = SvSTATE (coro_sv);
   coro->flags |= CF_READY;
   LOCK;
-  hook = coro_nready ? 0 : coro_readyhook;
+  sv_hook = coro_nready ? 0 : coro_readyhook;
+  xs_hook = coro_nready ? 0 : coroapi.readyhook;
   coro_enq (aTHX_ SvREFCNT_inc (coro_sv));
   ++coro_nready;
   UNLOCK;
-  if (hook)
+  if (sv_hook)
     {
       dSP;
       ENTER;
       SAVETMPS;
       PUSHMARK (SP);
       PUTBACK;
-      call_sv (hook, G_DISCARD);
+      call_sv (sv_hook, G_DISCARD);
       SPAGAIN;
       FREETMPS;
       LEAVE;
     }
+  if (xs_hook)
+    xs_hook ();
   return 1;
 }
 static int
         main_top_env   = PL_top_env;
         while (main_top_env->je_prev)
           main_top_env = main_top_env->je_prev;
-        coroapi.ver      = CORO_API_VERSION;
+        coroapi.ver       = CORO_API_VERSION;
-        coroapi.rev      = CORO_API_REVISION;
+        coroapi.rev       = CORO_API_REVISION;
-        coroapi.transfer = api_transfer;
+        coroapi.transfer  = api_transfer;
         assert (("PRIO_NORMAL must be 0", !PRIO_NORMAL));
 }
 SV *
 BOOT:
         sv_activity = coro_get_sv (aTHX_ "Coro::AnyEvent::ACTIVITY", TRUE);
 SV *
-_schedule ()
+_schedule (...)
 	PROTOTYPE: @
 	CODE:
 {
   	static int incede;

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