summaryrefslogtreecommitdiff
path: root/util.c
diff options
context:
space:
mode:
authorRichard Soderberg <p5-authors@crystalflame.net>2001-06-28 20:35:11 -0700
committerJarkko Hietaniemi <jhi@iki.fi>2001-06-29 12:21:51 +0000
commita674cc9519a30d3c9f6c9b760fccd58e038f3649 (patch)
treeacf53e96d61dd768148f38df29eaa8f6fdac4e3f /util.c
parent56dbb9401d7315e0967c858ef22519111cd3f5c8 (diff)
downloadperl-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 'util.c')
-rw-r--r--util.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/util.c b/util.c
index ab8356eab7..1ab05e667c 100644
--- a/util.c
+++ b/util.c
@@ -2848,7 +2848,7 @@ Perl_condpair_magic(pTHX_ SV *sv)
mg->mg_len = sizeof(cp);
UNLOCK_CRED_MUTEX; /* XXX need separate mutex? */
DEBUG_S(WITH_THR(PerlIO_printf(Perl_debug_log,
- "%p: condpair_magic %p\n", thr, sv));)
+ "%p: condpair_magic %p\n", thr, sv)));
}
}
return mg;
@@ -2875,7 +2875,7 @@ Perl_sv_lock(pTHX_ SV *osv)
MgOWNER(mg) = thr;
DEBUG_S(PerlIO_printf(Perl_debug_log,
"0x%"UVxf": Perl_lock lock 0x%"UVxf"\n",
- PTR2UV(thr), PTR2UV(sv));)
+ PTR2UV(thr), PTR2UV(sv)));
MUTEX_UNLOCK(MgMUTEXP(mg));
SAVEDESTRUCTOR_X(Perl_unlock_condpair, sv);
}