Remove old autovect-branch by moving to "dead" directory.
[official-gcc.git] / old-autovect-branch / gcc / testsuite / gfortran.dg / data_constraints_2.f90
blob46de3c81434f5fdcaebe40f6ef06aa772a55b3af
1 ! { dg-do compile }
2 ! { dg-options "-std=f95" }
3 ! Tests constraints for variables in a data statement that are commonly
4 ! relaxed.
6 ! Contributed by Paul Thomas <pault@gcc.gnu.org>
8 common // a
9 common /b/ c
10 integer d
11 data a /1/ ! { dg-error "common block variable" }
12 data c /2/ ! { dg-error "common block variable" }
13 data d /3/
14 data d /4/ ! { dg-error " re-initialization" }
15 end