diff options
| author | Marcus Holland-Moritz <mhx-perl@gmx.net> | 2004-08-01 14:46:48 +0200 |
|---|---|---|
| committer | Marcus Holland-Moritz <mhx-perl@gmx.net> | 2004-09-08 16:49:59 +0000 |
| commit | 0c34ef67a6aacb77e2b5421df56439f11f4d78c0 (patch) | |
| tree | 43e67efbabfb5340312bcb8c06c91ea20c158930 /pp.c | |
| parent | 59ca07c7edc9811274fdf723986979460325278a (diff) | |
| download | perl-0c34ef67a6aacb77e2b5421df56439f11f4d78c0.tar.gz | |
SvO?OK_off()'s return value
Message-Id: <20040801124648.7f9b3cee@r2d2>
Move (void) casts into SvOOK_off macro.
p4raw-id: //depot/perl@23277
Diffstat (limited to 'pp.c')
| -rw-r--r-- | pp.c | 8 |
1 files changed, 4 insertions, 4 deletions
@@ -176,7 +176,7 @@ PP(pp_rv2gv) if (SvTYPE(sv) < SVt_RV) sv_upgrade(sv, SVt_RV); if (SvPVX(sv)) { - (void)SvOOK_off(sv); /* backoff */ + SvOOK_off(sv); /* backoff */ if (SvLEN(sv)) Safefree(SvPVX(sv)); SvLEN(sv)=SvCUR(sv)=0; @@ -828,12 +828,12 @@ PP(pp_undef) break; default: if (SvTYPE(sv) >= SVt_PV && SvPVX(sv) && SvLEN(sv)) { - (void)SvOOK_off(sv); + SvOOK_off(sv); Safefree(SvPVX(sv)); SvPV_set(sv, Nullch); SvLEN_set(sv, 0); } - (void)SvOK_off(sv); + SvOK_off(sv); SvSETMAGIC(sv); } @@ -3141,7 +3141,7 @@ PP(pp_substr) sv_magic(TARG, Nullsv, PERL_MAGIC_substr, Nullch, 0); } else - (void)SvOK_off(TARG); + SvOK_off(TARG); LvTYPE(TARG) = 'x'; if (LvTARG(TARG) != sv) { |