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

Comparing Coro/Coro/State.xs (file contents):
Revision 1.133 by root, Thu Jan 4 20:14:19 2007 UTC vs.
Revision 1.134 by root, Thu Jan 4 23:49:27 2007 UTC

       /* free all temporaries */
       FREETMPS;
       assert (PL_tmps_ix == -1);
+      /* unwind all extra stacks */
       POPSTACK_TO (PL_mainstack);
+      /* unwind main stack */
+      dounwind (-1);
     }
   while (PL_curstackinfo->si_next)
     PL_curstackinfo = PL_curstackinfo->si_next;
 #define TRANSFER(ta) transfer ((ta).prev, (ta).next)
 static int
 coro_state_destroy (struct coro *coro)
 {
-  if (coro->refcnt--)
-    return 0;
   if (coro->flags & CF_DESTROYED)
     return 0;
   coro->flags |= CF_DESTROYED;
   return 1;
 }
 static int
-coro_state_clear (pTHX_ SV *sv, MAGIC *mg)
+coro_state_free (pTHX_ SV *sv, MAGIC *mg)
 {
   struct coro *coro = (struct coro *)mg->mg_ptr;
   mg->mg_ptr = 0;
+  if (--coro->refcnt < 0)
+    {
-  coro_state_destroy (coro);
+      coro_state_destroy (coro);
-  if (!coro->refcnt)
-    Safefree (coro);
+      Safefree (coro);
+    }
   return 0;
 }
 static int
   return 0;
 }
 static MGVTBL coro_state_vtbl = {
   0, 0, 0, 0,
-  coro_state_clear,
+  coro_state_free,
   0,
 #ifdef MGf_DUP
   coro_state_dup,
 #else
 # define MGf_DUP 0

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