1! { dg-do compile } 2! 3! Cf. PR fortran/33232 4program test 5 implicit none 6 integer :: a 7 READ *, a 8 READ '(i3)', a 9end program test 10