From: Philip Newton <pne@cpan.org>
Date: Tue, 3 Jul 2001 17:03:34 +0000 (+0200)
Subject: Re: [PATCH @11016] Fixes compile errors in four files
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=755b07768b3bf7930fd2f87a7590e9b3fac62861;p=p5sagit%2Fp5-mst-13.2.git

Re: [PATCH @11016] Fixes compile errors in four files
Message-ID: <3B41FAE6.29564.660E117@localhost>

p4raw-id: //depot/perl@11122
---

diff --git a/pp_hot.c b/pp_hot.c
index 296ed44..ee6c28a 100644
--- a/pp_hot.c
+++ b/pp_hot.c
@@ -2651,7 +2651,7 @@ try_autoload:
 	    }
 	    DEBUG_S(if (CvDEPTH(cv) != 0)
 			PerlIO_printf(Perl_debug_log, "depth %ld != 0\n",
-				      CvDEPTH(cv)));;
+                                     CvDEPTH(cv)));
 	    SAVEDESTRUCTOR_X(unset_cvowner, (void*) cv);
 	}
     }
@@ -3116,7 +3116,7 @@ unset_cvowner(pTHXo_ void *cvarg)
     MUTEX_LOCK(CvMUTEXP(cv));
     DEBUG_S(if (CvDEPTH(cv) != 0)
 		PerlIO_printf(Perl_debug_log, "depth %ld != 0\n",
-			      CvDEPTH(cv)));;
+                             CvDEPTH(cv)));
     assert(thr == CvOWNER(cv));
     CvOWNER(cv) = 0;
     MUTEX_UNLOCK(CvMUTEXP(cv));