module.c (load_commons): Initialize flags to 0 to silecne -Wmaybe-uninitialized warning.

	* module.c (load_commons): Initialize flags to 0 to silecne
	-Wmaybe-uninitialized warning.
	(read_module): Likewise for n and comp_name.

From-SVN: r276464

diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index 8d7a2cf4c26c4468d6b940e7030dca75f3462a27..51c393a8e267bdb6a5096917ca77398b688c4dde 100644 (file)
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,9 @@
+2019-10-01  Jan Hubicka  <jh@suse.cz>
+
+       * module.c (load_commons): Initialize flags to 0 to silecne
+       -Wmaybe-uninitialized warning.
+       (read_module): Likewise for n and comp_name.
+
 2019-10-02  Tobias Burnus  <tobias@codesourcery.com>
 
        * dump-parse-tree.c (show_omp_clauses): Handle OMP_LIST_USE_DEVICE_ADDR.
@@ -33,6 +39,7 @@
        (lang_decl): Add new optional_arg field.
        (GFC_DECL_OPTIONAL_ARGUMENT): New macro.
 
+>>>>>>> .r276463
 2019-10-01  David Malcolm  <dmalcolm@redhat.com>
 
        * error.c (gfc_diagnostic_starter): Clear the prefix before

diff --git a/gcc/fortran/module.c b/gcc/fortran/module.c
index 533445e2655ed9c660a55ada48d9d8bdd9b68526..1ca15352e7e4bfcdc73eef12dbf1d6e51a7034b6 100644 (file)
--- a/gcc/fortran/module.c
+++ b/gcc/fortran/module.c
@@ -4745,7 +4745,7 @@ load_commons (void)
 
   while (peek_atom () != ATOM_RPAREN)
     {
-      int flags;
+      int flags = 0;
       char* label;
       mio_lparen ();
       mio_internal_string (name);
@@ -5243,8 +5243,8 @@ read_module (void)
          for (c = sym->components; c; c = c->next)
            {
              pointer_info *p;
-             const char *comp_name;
-             int n;
+             const char *comp_name = NULL;
+             int n = 0;
 
              mio_lparen (); /* component opening.  */
              mio_integer (&n);