summaryrefslogtreecommitdiff
path: root/pp.c
diff options
context:
space:
mode:
authorRobin Barker <rmbarker@cpan.org>2011-09-07 22:22:42 +0100
committerFather Chrysostomos <sprout@cpan.org>2011-09-08 08:24:31 -0700
commit14f0f125b45b58bbf2d9e275abf2fef1655f8a3e (patch)
treed1f498a7896c607ac46e1b049fbffa0848aa5bac /pp.c
parentf8ccc5c641d025d213119510fd38619b06273044 (diff)
downloadperl-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.c3
1 files changed, 1 insertions, 2 deletions
diff --git a/pp.c b/pp.c
index c732c5ba86..ba337b25f6 100644
--- a/pp.c
+++ b/pp.c
@@ -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);