[AArch64] Merge stores of D-register values with different modes
[official-gcc.git] / gcc / testsuite / gfortran.dg / comma_format_extension_4.f
blob30f07e803c52bee611b320e333f50fbc2aca2790
1 ! PR fortran/13257
2 ! Note the missing , before i1 in the format.
3 ! { dg-do run }
4 ! { dg-options "" }
5 character*6 c
6 write (c,1001) 1
7 if (c .ne. ' 1 ') STOP 1
9 1001 format (' ',i4' ')
10 end