diff options
| author | Dave Mitchell <davem@fdisolutions.com> | 2001-03-08 12:06:57 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-03-09 01:20:39 +0000 |
| commit | aea4f609175b8d3694278560443a821f9cb5265c (patch) | |
| tree | 7da408a425212defbdef9241ff28e718f99633c8 /sv.c | |
| parent | be16fac9c9469295c8c71e007edeeaf65dd86c84 (diff) | |
| download | perl-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 'sv.c')
| -rw-r--r-- | sv.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -63,7 +63,7 @@ static void do_clean_all(pTHXo_ SV *sv); #define del_SV(p) \ STMT_START { \ LOCK_SV_MUTEX; \ - if (PL_debug & 32768) \ + if (DEBUG_D_TEST) \ del_sv(p); \ else \ plant_SV(p); \ @@ -73,7 +73,7 @@ static void do_clean_all(pTHXo_ SV *sv); STATIC void S_del_sv(pTHX_ SV *p) { - if (PL_debug & 32768) { + if (DEBUG_D_TEST) { SV* sva; SV* sv; SV* svend; |