annotate gcc/testsuite/gfortran.dg/pr49540-2.f90 @ 131:84e7813d76e9

gcc-8.2
author mir3636
date Thu, 25 Oct 2018 07:37:49 +0900
parents 04ced10e8804
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
111
kono
parents:
diff changeset
1 ! PR fortran/49540
kono
parents:
diff changeset
2 ! { dg-do compile }
kono
parents:
diff changeset
3 ! { dg-options "" }
kono
parents:
diff changeset
4 block data
kono
parents:
diff changeset
5 common /a/ i(5,5)
kono
parents:
diff changeset
6 data i /4, 23 * 5, 6/
kono
parents:
diff changeset
7 data i(:,2) /1, 3 * 2, 3/
kono
parents:
diff changeset
8 common /b/ j(5,5)
kono
parents:
diff changeset
9 data j(2,:) /1, 3 * 2, 3/
kono
parents:
diff changeset
10 data j /4, 23 * 5, 6/
kono
parents:
diff changeset
11 common /c/ k(5,5)
kono
parents:
diff changeset
12 data k(:,2) /1, 3 * 2, 3/
kono
parents:
diff changeset
13 data k /4, 23 * 5, 6/
kono
parents:
diff changeset
14 common /d/ l(5,5)
kono
parents:
diff changeset
15 data l /4, 23 * 5, 6/
kono
parents:
diff changeset
16 data l(2,:) /1, 3 * 2, 3/
kono
parents:
diff changeset
17 end block data