dec_structure_14.f90: New testcase.

2016-09-13  Jim MacArthur  <jim.macarthur@codethink.co.uk>

	* gcc/testsuite/gfortran.dg/dec_structure_14.f90: New testcase.

From-SVN: r240134
This commit is contained in:
Jim MacArthur 2016-09-14 12:13:03 +00:00 committed by Fritz Reese
parent 48975b3de6
commit a90638d430
2 changed files with 22 additions and 0 deletions

View file

@ -1,3 +1,7 @@
2016-09-13 Jim MacArthur <jim.macarthur@codethink.co.uk>
* gfortran.dg/dec_structure_14.f90: New testcase.
2016-09-14 Jakub Jelinek <jakub@redhat.com>
PR sanitizer/68260

View file

@ -0,0 +1,18 @@
! { dg-do "compile" }
! { dg-options "-fdec-structure" }
!
! Test that structures inside a common block do not require the
! SEQUENCE attribute, as derived types do.
!
common var
structure /s/
integer i
integer j
real r
end structure
record /s/ var
end