summaryrefslogtreecommitdiff
path: root/sv.c
diff options
context:
space:
mode:
authorAndy Dougherty <doughera@lafayette.edu>1998-07-30 06:22:36 -0400
committerGurusamy Sarathy <gsar@cpan.org>1998-08-02 04:27:02 +0000
commit757bacf18b7701025bd8ce289fb64c6895ed088b (patch)
tree18a631d924a55861738df6e67d23120741b6a3d4 /sv.c
parentf740b75152b519ddef57365a83e8683688c47906 (diff)
downloadperl-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
Diffstat (limited to 'sv.c')
-rw-r--r--sv.c1
1 files changed, 0 insertions, 1 deletions
diff --git a/sv.c b/sv.c
index 72007b13cb..d669ee71a6 100644
--- a/sv.c
+++ b/sv.c
@@ -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);