fix pr/45972
[official-gcc.git] / gcc / testsuite / gfortran.dg / read_1.f90
blob27f2a11245c31031f3e8c2be80d551f57495ecc2
1 ! { dg-do compile }
3 ! Cf. PR fortran/33232
4 program test
5 implicit none
6 integer :: a
7 READ *, a
8 READ '(i3)', a
9 end program test