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 | a674cc9519a30d3c9f6c9b760fccd58e038f3649 (patch) | |
| tree | acf53e96d61dd768148f38df29eaa8f6fdac4e3f /pp_hot.c | |
| parent | 56dbb9401d7315e0967c858ef22519111cd3f5c8 (diff) | |
| download | perl-a674cc9519a30d3c9f6c9b760fccd58e038f3649.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)); |