From: Andy Lester Date: Wed, 8 Mar 2006 00:45:29 +0000 (-0600) Subject: Removed unused check and assignment in pp_hot.c X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=92adfbd49af0758bcc9a198cf2df2bd78c4176b9;p=p5sagit%2Fp5-mst-13.2.git Removed unused check and assignment in pp_hot.c Message-ID: <20060308064529.GA16499@petdance.com> p4raw-id: //depot/perl@27414 --- diff --git a/pp_hot.c b/pp_hot.c index 3292332..f28b042 100644 --- a/pp_hot.c +++ b/pp_hot.c @@ -2645,13 +2645,12 @@ S_get_db_sub(pTHX_ SV **svp, CV *cv) save_item(dbsv); if (!PERLDB_SUB_NN) { - GV *gv = CvGV(cv); + GV * const gv = CvGV(cv); if ( (CvFLAGS(cv) & (CVf_ANON | CVf_CLONED)) || strEQ(GvNAME(gv), "END") || ((GvCV(gv) != cv) && /* Could be imported, and old sub redefined. */ - !( (SvTYPE(*svp) == SVt_PVGV) && (GvCV((GV*)*svp) == cv) - && (gv = (GV*)*svp) ))) { + !( (SvTYPE(*svp) == SVt_PVGV) && (GvCV((GV*)*svp) == cv) ))) { /* Use GV from the stack as a fallback. */ /* GV is potentially non-unique, or contain different CV. */ SV * const tmp = newRV((SV*)cv);