[gcc/devel/ranger] Fix typo in gfortran.dg/asynchronous_5.f03 from last commit.
Aldy Hernandez
aldyh@gcc.gnu.org
Wed Jun 17 20:21:55 GMT 2020
https://gcc.gnu.org/g:e26bd694c790b7c8f68c6736b2683c60a8fcbcfe
commit e26bd694c790b7c8f68c6736b2683c60a8fcbcfe
Author: Fritz Reese <foreese@gcc.gnu.org>
Date: Fri Apr 10 11:28:45 2020 -0400
Fix typo in gfortran.dg/asynchronous_5.f03 from last commit.
2020-04-10 Fritz Reese <foreese@gcc.gnu.org>
* gfortran.dg/asynchronous_5.f03: Fix typo in testcase and add
IMPLICIT NONE.
Diff:
---
gcc/testsuite/ChangeLog | 5 +++++
gcc/testsuite/gfortran.dg/asynchronous_5.f03 | 4 +++-
2 files changed, 8 insertions(+), 1 deletion(-)
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 833c559f2f5..407bfef453f 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+2020-04-10 Fritz Reese <foreese@gcc.gnu.org>
+
+ * gfortran.dg/asynchronous_5.f03: Fix typo in testcase and add
+ IMPLICIT NONE.
+
2020-04-10 Fritz Reese <foreese@gcc.gnu.org>
* gfortran.dg/asynchronous_5.f03: Add -fdump-tree-original and fix
diff --git a/gcc/testsuite/gfortran.dg/asynchronous_5.f03 b/gcc/testsuite/gfortran.dg/asynchronous_5.f03
index 6a0ee2437a2..88ed2c9d7c9 100644
--- a/gcc/testsuite/gfortran.dg/asynchronous_5.f03
+++ b/gcc/testsuite/gfortran.dg/asynchronous_5.f03
@@ -10,6 +10,8 @@
! should obtain the "volatile" specifier in its declaration.
!
+implicit none
+
type t
character(4) :: comp_async
end type
@@ -23,7 +25,7 @@ integer :: ivar_noasync
namelist /names/ ivar_async, rvar_async, lvar_async
open(1, asynchronous="yes")
-write(1, asynchronous="yes") dvar_async, ccvar_async
+write(1, asynchronous="yes") dvar_async
write(1, asynchronous="yes") dvar_async%comp_async
read(1, asynchronous="yes", nml=names)
More information about the Gcc-cvs
mailing list