diff mbox series

[fortran,committed] Another fallout from the INTENT(OUT) patch

Message ID eb33b739-b17e-9417-6d95-36579bdfefae@netcologne.de
State New
Headers show
Series [fortran,committed] Another fallout from the INTENT(OUT) patch | expand

Commit Message

Thomas Koenig Sept. 24, 2018, 5:16 p.m. UTC 
Hello world,

another obvious and simple one-line fix for fallout from the INTENT(OUT)
clobber patch.  Committed as r264539, after regression-testing.

It seems our testsuite is not testing as many combinations in the
language as I thought :-)

Regards

	Thomas

2018-09-24  Thomas Koenig  <tkoenig@gcc.gnu.org>

	PR fortran/87397
	* gfc_conv_procedure_call: Do not add clobber on INTENT(OUT)
	for variables in an associate statement.

2018-09-24  Thomas Koenig  <tkoenig@gcc.gnu.org>

	PR fortran/87401
	* gfortran.dg/intent_out_12.f90: New test.

Comments

Janus Weil Sept. 25, 2018, 6:44 a.m. UTC | #1 
Am Mo., 24. Sep. 2018 um 19:16 Uhr schrieb Thomas Koenig
<tkoenig@netcologne.de>:
>
> Hello world,
>
> another obvious and simple one-line fix for fallout from the INTENT(OUT)
> clobber patch.  Committed as r264539, after regression-testing.
>
> It seems our testsuite is not testing as many combinations in the
> language as I thought :-)

... but we keep on improving every day.

Thanks for the quick fix, Thomas!

Cheers,
Janus
diff mbox series

Patch

Index: trans-expr.c
===================================================================
--- trans-expr.c	(Revision 264538)
+++ trans-expr.c	(Arbeitskopie)
@@ -5282,6 +5282,7 @@  gfc_conv_procedure_call (gfc_se * se, gfc_symbol *
 			&& !e->symtree->n.sym->attr.dummy
 			/* FIXME - PR 87395 and PR 41453  */
 			&& e->symtree->n.sym->attr.save == SAVE_NONE 
+			&& !e->symtree->n.sym->attr.associate_var
 			&& e->ts.type != BT_CHARACTER && e->ts.type != BT_DERIVED
 			&& e->ts.type != BT_CLASS && !sym->attr.elemental;