diff options
author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2007-09-21 07:54:47 +0000 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2007-09-21 07:54:47 +0000 |
commit | 04fe65b0c880322a5ab5677fef6303b6149b8676 (patch) | |
tree | e6b7468efe5ca179a39da26a21b3da5942aa7ce8 /op.c | |
parent | 166cd87e025da3b73833dbe6f3ac8a9279710d12 (diff) | |
download | perl-04fe65b0c880322a5ab5677fef6303b6149b8676.tar.gz |
Silence a load of "value computed is not used" warnings
p4raw-id: //depot/perl@31936
Diffstat (limited to 'op.c')
-rw-r--r-- | op.c | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -5580,7 +5580,8 @@ Perl_newATTRSUB(pTHX_ I32 floor, OP *o, OP *proto, OP *attrs, OP *block) CopFILE(PL_curcop), (long)PL_subline, (long)CopLINE(PL_curcop)); gv_efullname3(tmpstr, gv, NULL); - hv_store(GvHV(PL_DBsub), SvPVX_const(tmpstr), SvCUR(tmpstr), sv, 0); + (void)hv_store(GvHV(PL_DBsub), SvPVX_const(tmpstr), + SvCUR(tmpstr), sv, 0); hv = GvHVn(db_postponed); if (HvFILL(hv) > 0 && hv_exists(hv, SvPVX_const(tmpstr), SvCUR(tmpstr))) { CV * const pcv = GvCV(db_postponed); |