aarch64: Add vector floating point extend pattern [PR113880, PR113869]
[official-gcc.git] / gcc / testsuite / gfortran.dg / pr49540-2.f90
blobf9a3d6df68db0ddab5458bb9aa7f0e42e38c40b1
1 ! PR fortran/49540
2 ! { dg-do compile }
3 ! { dg-options "" }
4 block data
5 common /a/ i(5,5)
6 data i /4, 23 * 5, 6/
7 data i(:,2) /1, 3 * 2, 3/
8 common /b/ j(5,5)
9 data j(2,:) /1, 3 * 2, 3/
10 data j /4, 23 * 5, 6/
11 common /c/ k(5,5)
12 data k(:,2) /1, 3 * 2, 3/
13 data k /4, 23 * 5, 6/
14 common /d/ l(5,5)
15 data l /4, 23 * 5, 6/
16 data l(2,:) /1, 3 * 2, 3/
17 end block data