diff options
author | Robin Barker <rmbarker@cpan.org> | 2011-09-07 22:22:42 +0100 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2011-09-08 08:24:31 -0700 |
commit | 14f0f125b45b58bbf2d9e275abf2fef1655f8a3e (patch) | |
tree | d1f498a7896c607ac46e1b049fbffa0848aa5bac /pp.c | |
parent | f8ccc5c641d025d213119510fd38619b06273044 (diff) | |
download | perl-14f0f125b45b58bbf2d9e275abf2fef1655f8a3e.tar.gz |
remove unused variables and assignments
and silences some compiler warnings.
I do not understand the code in toke.c but the change aligns the code
with other uses of FUN0OP, it has no warnings and does not break any test.
Diffstat (limited to 'pp.c')
-rw-r--r-- | pp.c | 3 |
1 files changed, 1 insertions, 2 deletions
@@ -155,12 +155,11 @@ static SV * S_rv2gv(pTHX_ SV *sv, const bool vivify_sv, const bool strict, const bool noinit) { - dSP; dVAR; + dVAR; if (!isGV(sv) || SvFAKE(sv)) SvGETMAGIC(sv); if (SvROK(sv)) { if (SvAMAGIC(sv)) { sv = amagic_deref_call(sv, to_gv_amg); - SPAGAIN; } wasref: sv = SvRV(sv); |