[Bug fortran/67679] [7/8/9 Regression] -Wunitialized reports on compiler-generated variables

[tkoenig at gcc dot gnu.org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=67679

--- Comment #5 from Thomas Koenig <tkoenig at gcc dot gnu.org> ---
This patch

Index: trans-array.c
===================================================================
--- trans-array.c       (Revision 268432)
+++ trans-array.c       (Arbeitskopie)
@@ -5960,19 +5960,7 @@ gfc_array_allocate (gfc_se * se, gfc_expr * expr,
     }

   set_descriptor = gfc_finish_block (&set_descriptor_block);
-  if (status != NULL_TREE)
-    {
-      cond = fold_build2_loc (input_location, EQ_EXPR,
-                         logical_type_node, status,
-                         build_int_cst (TREE_TYPE (status), 0));
-      gfc_add_expr_to_block (&se->pre,
-                fold_build3_loc (input_location, COND_EXPR, void_type_node,
-                                 cond,
-                                 set_descriptor,
-                                 build_empty_stmt (input_location)));
-    }
-  else
-      gfc_add_expr_to_block (&se->pre, set_descriptor);
+  gfc_add_expr_to_block (&se->pre, set_descriptor);

   return true;
 }

gets rid of the undefined warnings, but it would also change
the array bounds after a failed allocation.  Not sure if this
is standard conforming (see PR 49755).