RISC-V: Regenerate opt urls.
[official-gcc.git] / gcc / testsuite / gfortran.dg / pr87922.f90
blob8bdc6bc556b1001af06a354e106a3e86a9e557fb
1 ! { dg-do compile }
2 ! PR fortran/87922
3 subroutine p
4 read(1, asynchronous=['no']) ! { dg-error "must be scalar" }
5 read(1, asynchronous=[character::]) ! { dg-error "must be scalar" }
6 end
7 subroutine q
8 write(1, asynchronous=['no']) ! { dg-error "must be scalar" }
9 write(1, asynchronous=[character::]) ! { dg-error "must be scalar" }
10 end