summaryrefslogtreecommitdiff
path: root/perl.c
diff options
context:
space:
mode:
authorDave Mitchell <davem@fdisolutions.com>2001-03-08 12:06:57 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2001-03-09 01:20:39 +0000
commitaea4f609175b8d3694278560443a821f9cb5265c (patch)
tree7da408a425212defbdef9241ff28e718f99633c8 /perl.c
parentbe16fac9c9469295c8c71e007edeeaf65dd86c84 (diff)
downloadperl-aea4f609175b8d3694278560443a821f9cb5265c.tar.gz
Re: [ PATCH perl@8956 ] new debug option -DR shows ref counts
Message-Id: <200103081206.MAA06281@tiree.fdgroup.co.uk> p4raw-id: //depot/perl@9084
Diffstat (limited to 'perl.c')
-rw-r--r--perl.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl.c b/perl.c
index 0920a41d33..0c4d9072cd 100644
--- a/perl.c
+++ b/perl.c
@@ -2136,7 +2136,7 @@ Perl_moreswitches(pTHX_ char *s)
PL_debug = atoi(s+1);
for (s++; isDIGIT(*s); s++) ;
}
- PL_debug |= 0x80000000;
+ PL_debug |= DEBUG_TOP_FLAG;
#else
if (ckWARN_d(WARN_DEBUGGING))
Perl_warner(aTHX_ WARN_DEBUGGING,