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:
7364bfc
)
inline.h: Init a variable to silence stupid compilers
author
Karl Williamson
<khw@cpan.org>
Fri, 3 Aug 2018 04:48:55 +0000
(22:48 -0600)
committer
Karl Williamson
<khw@cpan.org>
Fri, 3 Aug 2018 04:50:49 +0000
(22:50 -0600)
In looking at smokes, I noticed some compilers wrongly warn that this
variable is used uninitialize. It's easiest to humor them.
inline.h
patch
|
blob
|
blame
|
history
diff --git
a/inline.h
b/inline.h
index
eab3d2f
..
638f818
100644
(file)
--- a/
inline.h
+++ b/
inline.h
@@
-1802,7
+1802,7
@@
S_utf8n_to_uvchr_msgs(const U8 *s,
const U8 * const s0 = s;
const U8 * send = s0 + curlen;
const U8 * const s0 = s;
const U8 * send = s0 + curlen;
- UV uv
;
+ UV uv
= 0; /* The 0 silences some stupid compilers */
UV state = 0;
PERL_ARGS_ASSERT_UTF8N_TO_UVCHR_MSGS;
UV state = 0;
PERL_ARGS_ASSERT_UTF8N_TO_UVCHR_MSGS;