diff options
| author | Richard Soderberg <p5-authors@crystalflame.net> | 2001-06-28 20:35:11 -0700 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-06-29 12:21:51 +0000 |
| commit | d38a3c64ceb7a99461e93be6554bf0570984161d (patch) | |
| tree | acf53e96d61dd768148f38df29eaa8f6fdac4e3f /pp_hot.c | |
| parent | 2af7e8ba533e3d5d63f3e2aa98c9b81963b3616b (diff) | |
| download | perl-d38a3c64ceb7a99461e93be6554bf0570984161d.tar.gz | |
Fixes compile errors in four files
Message-ID: <Pine.LNX.4.21.0106290333270.9768-100000@oregonnet.com>
p4raw-id: //depot/perl@11021
Diffstat (limited to 'pp_hot.c')
| -rw-r--r-- | pp_hot.c | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -2567,7 +2567,7 @@ try_autoload: COND_WAIT(MgOWNERCONDP(mg), MgMUTEXP(mg)); MgOWNER(mg) = thr; DEBUG_S(PerlIO_printf(Perl_debug_log, "%p: pp_entersub lock %p\n", - thr, sv);) + thr, sv)); MUTEX_UNLOCK(MgMUTEXP(mg)); SAVEDESTRUCTOR_X(Perl_unlock_condpair, sv); } @@ -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)); |