diff options
| author | Andy Dougherty <doughera@lafayette.edu> | 1998-07-30 06:22:36 -0400 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-08-02 04:27:02 +0000 |
| commit | 757bacf18b7701025bd8ce289fb64c6895ed088b (patch) | |
| tree | 18a631d924a55861738df6e67d23120741b6a3d4 | |
| parent | f740b75152b519ddef57365a83e8683688c47906 (diff) | |
| download | perl-757bacf18b7701025bd8ce289fb64c6895ed088b.tar.gz | |
Remove redundant dTHR
Message-Id: <Pine.SUN.3.96.980730101627.17514B-100000@newton.phys>
p4raw-id: //depot/maint-5.005/perl@1689
| -rw-r--r-- | mg.c | 1 | ||||
| -rw-r--r-- | sv.c | 1 |
2 files changed, 0 insertions, 2 deletions
@@ -520,7 +520,6 @@ magic_get(SV *sv, MAGIC *mg) break; case '?': { - dTHR; sv_setiv(sv, (IV)STATUS_CURRENT); #ifdef COMPLEX_STATUS LvTARGOFF(sv) = PL_statusvalue; @@ -2097,7 +2097,6 @@ sv_setsv(SV *dstr, register SV *sstr) if (sflags & SVf_ROK) { if (dtype >= SVt_PV) { if (dtype == SVt_PVGV) { - dTHR; SV *sref = SvREFCNT_inc(SvRV(sstr)); SV *dref = 0; int intro = GvINTRO(dstr); |