Don't require CvDEPTH == 0 when bombing out of subs.

p4raw-id: //depot/thrperl@9

diff --git a/pp_hot.c b/pp_hot.c
index 2aee061..5d70aa3 100644 (file)
--- a/pp_hot.c
+++ b/pp_hot.c
@@ -33,7 +33,7 @@ void *cvarg;
     DEBUG_L((fprintf(stderr, "0x%lx unsetting CvOWNER of 0x%lx:%s\n",
                     (unsigned long)thr, (unsigned long)cv, SvPEEK((SV*)cv))));
     MUTEX_LOCK(CvMUTEXP(cv));
-    assert(CvDEPTH(cv) == 0);
+    /* assert(CvDEPTH(cv) == 0); */
     assert(thr == CvOWNER(cv));
     CvOWNER(cv) = 0;
     if (CvCONDP(cv))