summaryrefslogtreecommitdiff
path: root/pp_ctl.c
diff options
context:
space:
mode:
authorDavid Mitchell <davem@iabyn.com>2012-12-17 14:53:11 +0000
committerDavid Mitchell <davem@iabyn.com>2012-12-17 14:53:11 +0000
commitcb65b68777357c80fe35f4b74d7ac36c7b471b66 (patch)
tree840469897e12676bc4a63decac9b832767bb0721 /pp_ctl.c
parent4800031444245dc3dac9967b46b4860ff3863d32 (diff)
downloadperl-cb65b68777357c80fe35f4b74d7ac36c7b471b66.tar.gz
use PERL_UNUSED_VAR rather than PERL_UNUSED_DECL
PERL_UNUSED_DECL doesn't do anything under g++, so doing this silences some g++ warnings.
Diffstat (limited to 'pp_ctl.c')
-rw-r--r--pp_ctl.c7
1 files changed, 5 insertions, 2 deletions
diff --git a/pp_ctl.c b/pp_ctl.c
index cd5033f6aa..199df1fe3c 100644
--- a/pp_ctl.c
+++ b/pp_ctl.c
@@ -2867,11 +2867,14 @@ PP(pp_goto)
SAVEFREESV(cv); /* later, undo the 'avoid premature free' hack */
if (CvISXSUB(cv)) {
OP* const retop = cx->blk_sub.retop;
- SV **newsp PERL_UNUSED_DECL;
- I32 gimme PERL_UNUSED_DECL;
+ SV **newsp;
+ I32 gimme;
const SSize_t items = AvFILLp(arg) + 1;
SV** mark;
+ PERL_UNUSED_VAR(newsp);
+ PERL_UNUSED_VAR(gimme);
+
/* put GvAV(defgv) back onto stack */
EXTEND(SP, items+1); /* @_ could have been extended. */
Copy(AvARRAY(arg), SP + 1, items, SV*);