From f09270f1b9be9430d957991720e66bcc93b6a7c9 Mon Sep 17 00:00:00 2001 From: Uros Bizjak Date: Sun, 27 Jan 2019 21:53:30 +0100 Subject: [PATCH] re PR fortran/70696 ([Coarray] ICE on EVENT POST of host-associated EVENT_TYPE coarray) PR fortran/70696 * gfortran.dg/coarray/event_3.f0: Add save attribue to x. From-SVN: r268327 --- gcc/testsuite/ChangeLog | 5 +++++ gcc/testsuite/gfortran.dg/coarray/event_3.f08 | 4 ++-- 2 files changed, 7 insertions(+), 2 deletions(-) diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 10f4c267c9fa..108a9dd1a398 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2019-01-27 Uroš Bizjak + + PR fortran/70696 + * gfortran.dg/coarray/event_3.f0: Add save attribue to x. + 2019-01-27 Paul Thomas Backport from trunk diff --git a/gcc/testsuite/gfortran.dg/coarray/event_3.f08 b/gcc/testsuite/gfortran.dg/coarray/event_3.f08 index f6e28b78c8db..60d3193f776d 100644 --- a/gcc/testsuite/gfortran.dg/coarray/event_3.f08 +++ b/gcc/testsuite/gfortran.dg/coarray/event_3.f08 @@ -3,9 +3,9 @@ ! Check PR fortran/70696 is fixed. program global_event - use iso_fortran_env , only : event_type + use iso_fortran_env, only : event_type implicit none - type(event_type) :: x[*] + type(event_type), save :: x[*] call exchange contains -- 2.47.2