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

gcc/testsuite/ChangeLog

+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

gcc/testsuite/gfortran.dg/dec_structure_14.f90

+  ! { 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