module.c (load_commons): Initialize flags to 0 to silecne -Wmaybe-uninitialized warning.
authorJan Hubicka <hubicka@gcc.gnu.org>
Wed, 2 Oct 2019 15:07:52 +0000 (15:07 +0000)
committerJan Hubicka <hubicka@gcc.gnu.org>
Wed, 2 Oct 2019 15:07:52 +0000 (15:07 +0000)
* module.c (load_commons): Initialize flags to 0 to silecne
-Wmaybe-uninitialized warning.
(read_module): Likewise for n and comp_name.

From-SVN: r276464

gcc/fortran/ChangeLog
gcc/fortran/module.c

index 8d7a2cf..51c393a 100644 (file)
@@ -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
index 533445e..1ca1535 100644 (file)
@@ -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);