"Remove spurious /* dTHR; */"

<gsar@engin.umich.edu>, Nick Ing-Simmons <nik@tiuk.ti.com> Msg-ID: <Pine.SUN.3.96.980730101045.17514A-100000@newton.phys> Files: mg.c sv.c p4raw-id: //depot/maint-5.004/perl@2276
Perl · Nov 22, 1998 · b14d125 · b14d125
1 parent 1362b41
commit b14d125
Show file tree

Hide file tree

Showing 2 changed files with 0 additions and 2 deletions.
diff --git 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
@@ -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);