From b14d1255a11e717598f659b72f771e31cb236ae6 Mon Sep 17 00:00:00 2001 From: Andy Dougherty Date: Sun, 22 Nov 1998 16:35:14 +0000 Subject: [PATCH] "Remove spurious /* dTHR; */" , Nick Ing-Simmons Msg-ID: Files: mg.c sv.c p4raw-id: //depot/maint-5.004/perl@2276 --- mg.c | 1 - sv.c | 1 - 2 files changed, 2 deletions(-) diff --git a/mg.c b/mg.c index 65ea2fa0536b..97ea4c1d18bf 100644 --- a/mg.c +++ b/mg.c @@ -483,7 +483,6 @@ MAGIC *mg; break; case '?': { - /* dTHR; */ /* unneeded, and breaks SunOS 4.1.3 pre-ANSI cc */ sv_setiv(sv, (IV)STATUS_CURRENT); #ifdef COMPLEX_STATUS LvTARGOFF(sv) = statusvalue; diff --git a/sv.c b/sv.c index 9ab865a5e3e5..010164135db8 100644 --- a/sv.c +++ b/sv.c @@ -2043,7 +2043,6 @@ register SV *sstr; if (sflags & SVf_ROK) { if (dtype >= SVt_PV) { if (dtype == SVt_PVGV) { - /* dTHR; */ /* unneeded, and breaks SunOS 4.1.3 pre-ANSI cc */ SV *sref = SvREFCNT_inc(SvRV(sstr)); SV *dref = 0; int intro = GvINTRO(dstr);