summaryrefslogtreecommitdiff
path: root/mg.c
diff options
context:
space:
mode:
authorIlya Zakharevich <ilya@math.berkeley.edu>1998-07-20 17:40:00 -0400
committerGurusamy Sarathy <gsar@cpan.org>1998-08-02 06:16:03 +0000
commit8b73bbec3102cdf25a35c954eb1aab85acc07808 (patch)
tree52e125d1fa92882b072415b5ac465a817f731bc7 /mg.c
parentbd869e3a5834bd5d26dd079fef07f5c567f6ca97 (diff)
downloadperl-8b73bbec3102cdf25a35c954eb1aab85acc07808.tar.gz
tweaked version of suggested patch
Message-Id: <199807210140.VAA17186@monk.mps.ohio-state.edu> Subject: [PATCH 5.004_75] Enable -DS p4raw-id: //depot/maint-5.005/perl@1701
Diffstat (limited to 'mg.c')
-rw-r--r--mg.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/mg.c b/mg.c
index 1d78f1366e..9dfbd4ffb1 100644
--- a/mg.c
+++ b/mg.c
@@ -1845,7 +1845,7 @@ int
magic_mutexfree(SV *sv, MAGIC *mg)
{
dTHR;
- DEBUG_L(PerlIO_printf(PerlIO_stderr(), "0x%lx: magic_mutexfree 0x%lx\n",
+ DEBUG_S(PerlIO_printf(PerlIO_stderr(), "0x%lx: magic_mutexfree 0x%lx\n",
(unsigned long)thr, (unsigned long)sv);)
if (MgOWNER(mg))
croak("panic: magic_mutexfree");