This is a live mirror of the Perl 5 development currently hosted at
https://github.com/perl/perl5
https://perl5.git.perl.org
/
perl5.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
bb85144
)
Fix unused variable warning in 5.30
author
Nicolas R
<atoomic@cpan.org>
Fri, 14 Jun 2019 15:05:43 +0000
(09:05 -0600)
committer
Nicolas R
<atoomic@cpan.org>
Fri, 21 Jun 2019 20:26:59 +0000
(16:26 -0400)
Fixes #99
(cherry picked from commit
4aa658c84dee2b1ea29f2683151bab5543da6c6e
)
Signed-off-by: Nicolas R <atoomic@cpan.org>
dist/Devel-PPPort/parts/inc/uv
patch
|
blob
|
blame
|
history
diff --git
a/dist/Devel-PPPort/parts/inc/uv
b/dist/Devel-PPPort/parts/inc/uv
index
9e27c62
..
11b8370
100644
(file)
--- a/
dist/Devel-PPPort/parts/inc/uv
+++ b/
dist/Devel-PPPort/parts/inc/uv
@@
-133,7
+133,9
@@
utf8_to_uvchr_buf(pTHX_ const U8 *s, const U8 *send, STRLEN *retlen)
bool overflows = 0;
const U8 *cur_s = s;
const bool do_warnings = ckWARN_d(WARN_UTF8);
+# if { VERSION < 5.26.0 } && ! defined(EBCDIC)
STRLEN overflow_length = 0;
+# endif
if (send > s) {
curlen = send - s;