[to-be-committed] [RISC-V] Use Zbkb for general 64 bit constants when profitable
[official-gcc.git] / gcc / testsuite / gfortran.dg / pr85521_2.f90
blob737b61a11b980f8d1ba900fafe4c0f0e9c2f3c2c
1 ! { dg-do compile }
2 ! PR fortran/85521
3 program p
4 character(3) :: c = 'abc'
5 character(3) :: z(1)
6 z = [ c(:-2) ]
7 print *, z
8 end