RISC-V: Regenerate opt urls.
[official-gcc.git] / gcc / testsuite / gfortran.dg / pr86110.f90
blob890670f5854d06ee296c66551962063d29bd7c7b
1 ! { dg-do compile }
2 ! PR fortran/86110
3 program p
4 character(:), allocatable :: x, y
5 x = 'abc'
6 y = [x(:)] ! { dg-error "Incompatible ranks 0 and 1" }
7 end