summaryrefslogtreecommitdiff
path: root/universal.c
diff options
context:
space:
mode:
authorAndy Lester <andy@petdance.com>2016-12-02 22:07:26 -0500
committerDavid Mitchell <davem@iabyn.com>2016-12-05 12:37:06 +0000
commite9b8343fa465fe1f17441bfe1c1349ea013e9288 (patch)
tree9a86dd13acd31780cb26e4a36c97babdf581e6ae /universal.c
parent1eb7a0dec318d22fee300bd4348df9d7c80e2a2a (diff)
downloadperl-e9b8343fa465fe1f17441bfe1c1349ea013e9288.tar.gz
Clean up warnings uncovered by 'clang -Weverything'.
For: RT #130195
Diffstat (limited to 'universal.c')
-rw-r--r--universal.c4
1 files changed, 0 insertions, 4 deletions
diff --git a/universal.c b/universal.c
index 06f595f5a7..95934ca694 100644
--- a/universal.c
+++ b/universal.c
@@ -554,7 +554,6 @@ XS(XS_Internals_SvREADONLY) /* This is dangerous stuff. */
dXSARGS;
SV * const svz = ST(0);
SV * sv;
- PERL_UNUSED_ARG(cv);
/* [perl #77776] - called as &foo() not foo() */
if (!SvROK(svz))
@@ -588,7 +587,6 @@ XS(XS_constant__make_const) /* This is dangerous stuff. */
dXSARGS;
SV * const svz = ST(0);
SV * sv;
- PERL_UNUSED_ARG(cv);
/* [perl #77776] - called as &foo() not foo() */
if (!SvROK(svz) || items != 1)
@@ -616,7 +614,6 @@ XS(XS_Internals_SvREFCNT) /* This is dangerous stuff. */
SV * const svz = ST(0);
SV * sv;
U32 refcnt;
- PERL_UNUSED_ARG(cv);
/* [perl #77776] - called as &foo() not foo() */
if ((items != 1 && items != 2) || !SvROK(svz))
@@ -777,7 +774,6 @@ XS(XS_re_is_regexp); /* prototype to pass -Wmissing-prototypes */
XS(XS_re_is_regexp)
{
dXSARGS;
- PERL_UNUSED_VAR(cv);
if (items != 1)
croak_xs_usage(cv, "sv");