Fortran: Silence -Wmaybe-uninitialized warning

gcc/fortran/ChangeLog:

	* resolve.c (resolve_fl_procedure): Initialize
	allocatable_or_pointer.

diff --git a/gcc/fortran/resolve.c b/gcc/fortran/resolve.c
index 8da396b32ecbb571e803ff949ce40e14fa935f8d..21126cba262620e0d3f4a41d860b625c6a02450a 100644 (file)
--- a/gcc/fortran/resolve.c
+++ b/gcc/fortran/resolve.c
@@ -13179,7 +13179,7 @@ static bool
 resolve_fl_procedure (gfc_symbol *sym, int mp_flag)
 {
   gfc_formal_arglist *arg;
-  bool allocatable_or_pointer;
+  bool allocatable_or_pointer = false;
 
   if (sym->attr.function
       && !resolve_fl_var_and_proc (sym, mp_flag))