1! { dg-do run }
2! PR 19595:  Handle end-of-record condition with pad=yes (default)
3program main
4  integer i1, i2
5  open(77,status='scratch')
6  write (77,'(A)') '123','456'
7  rewind(77)
8  read(77,'(2I2)',advance='no',eor=100) i1,i2
9  call abort
10100 continue
11  if (i1 /= 12 .or. i2 /= 3) call abort
12  close(77)
13end program main
14