[to-be-committed] [RISC-V] Use Zbkb for general 64 bit constants when profitable
[official-gcc.git] / gcc / testsuite / gfortran.dg / array_constructor_type_11.f03
blobe980158d64270dceb55149ae7fb72de56813cacb
1 ! { dg-do run }
3 ! PR fortran/27997
5 ! Empty array constructor with typespec.
7  integer :: i(3)
8  i(3:2) = (/ integer :: /)
9  if (len((/ character(5) :: /)) /= 5) STOP 1
10  if (kind((/ integer(8) :: /)) /= 8) STOP 2
11 end