From: Tobias Burnus <tobias@codesourcery.com>
Date: Fri, 8 Oct 2021 22:02:31 +0000 (-0700)
Subject: Fortran: Avoid var initialization in interfaces [PR54753]
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=88364f77fb60f84324bfaaa5d1dca2d01c3ee391;p=thirdparty%2Fgcc.git

Fortran: Avoid var initialization in interfaces [PR54753]

Intent(out) implies deallocation/default initialization; however, it is
pointless to do this for dummy-arguments symbols of procedures which are
inside an INTERFACE block. – This also fixes a bogus error for the attached
included testcase, but fixing the non-interface version still has to be done.

	PR fortran/54753

gcc/fortran/ChangeLog:

	* resolve.c (can_generate_init, resolve_fl_variable_derived,
	resolve_symbol): Only do initialization with intent(out) if not
	inside of an interface block.

(cherry picked from commit 51d9ef7747b2dc439f7456303f0784faf5cdb1d3)
---

diff --git a/gcc/fortran/ChangeLog.omp b/gcc/fortran/ChangeLog.omp
index 3e65e177e755..0fcac5b41767 100644
--- a/gcc/fortran/ChangeLog.omp
+++ b/gcc/fortran/ChangeLog.omp
@@ -1,3 +1,13 @@
+2021-10-08  Sandra Loosemore  <sandra@codesourcery.com?
+
+	Backport from master:
+	2021-10-04  Tobias Burnus  <tobias@codesourcery.com>
+
+	PR fortran/54753
+	* resolve.c (can_generate_init, resolve_fl_variable_derived,
+	resolve_symbol): Only do initialization with intent(out) if not
+	inside of an interface block.
+
 2021-10-01  Tobias Burnus  <tobias@codesourcery.com>
 
 	Backported from master: