This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
inline.h: Init a variable to silence stupid compilers
authorKarl Williamson <khw@cpan.org>
Fri, 3 Aug 2018 04:48:55 +0000 (22:48 -0600)
committerKarl 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

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;