diff options
author | Karl Williamson <khw@cpan.org> | 2016-12-28 21:49:06 -0700 |
---|---|---|
committer | James E Keenan <jkeenan@cpan.org> | 2016-12-29 08:25:22 -0500 |
commit | b3611286c90f556f03af31aa41e42e4fe258f142 (patch) | |
tree | 09988ffde47d3ba25ebebbc5c2887b16262d6766 /ext | |
parent | d60679e1ba847357b5082ddfc26f2ab5c7328f5f (diff) | |
download | perl-b3611286c90f556f03af31aa41e42e4fe258f142.tar.gz |
APItest.xs: Silence compiler warnings
See: http://www.nntp.perl.org/group/perl.perl5.porters/2016/12/msg241877.html
Diffstat (limited to 'ext')
-rw-r--r-- | ext/XS-APItest/APItest.xs | 14 |
1 files changed, 10 insertions, 4 deletions
diff --git a/ext/XS-APItest/APItest.xs b/ext/XS-APItest/APItest.xs index 39af336fb2..e3e1593dbf 100644 --- a/ext/XS-APItest/APItest.xs +++ b/ext/XS-APItest/APItest.xs @@ -5320,6 +5320,9 @@ test_isASCII_utf8(unsigned char * p, int type) PREINIT: const unsigned char * e; CODE: +#ifndef DEBUGGING + PERL_UNUSED_VAR(e); +#endif if (type >= 0) { e = p + UTF8SKIP(p) - type; RETVAL = isASCII_utf8_safe(p, e); @@ -5335,6 +5338,9 @@ test_isASCII_LC_utf8(unsigned char * p, int type) PREINIT: const unsigned char * e; CODE: +#ifndef DEBUGGING + PERL_UNUSED_VAR(e); +#endif if (type >= 0) { e = p + UTF8SKIP(p) - type; RETVAL = isASCII_LC_utf8_safe(p, e); @@ -6205,7 +6211,7 @@ test_toLOWER_utf8(SV * p, int type) AV *av; SV *utf8; const unsigned char * e; - UV resultant_cp; + UV resultant_cp = UV_MAX; /* Initialized because of dumb compilers */ CODE: input = (U8 *) SvPV(p, len); av = newAV(); @@ -6295,7 +6301,7 @@ test_toFOLD_utf8(SV * p, int type) AV *av; SV *utf8; const unsigned char * e; - UV resultant_cp; + UV resultant_cp = UV_MAX; CODE: input = (U8 *) SvPV(p, len); av = newAV(); @@ -6385,7 +6391,7 @@ test_toUPPER_utf8(SV * p, int type) AV *av; SV *utf8; const unsigned char * e; - UV resultant_cp; + UV resultant_cp = UV_MAX; CODE: input = (U8 *) SvPV(p, len); av = newAV(); @@ -6468,7 +6474,7 @@ test_toTITLE_utf8(SV * p, int type) AV *av; SV *utf8; const unsigned char * e; - UV resultant_cp; + UV resultant_cp = UV_MAX; CODE: input = (U8 *) SvPV(p, len); av = newAV(); |