1 ! { dg-do run { target fd_truncate } }
2 ! PR 19595: Handle end-of-record condition with pad=yes (default)
5 open(77,status
='scratch')
6 write (77,'(A)') '123','456'
8 read(77,'(2I2)',advance
='no',eor
=100) i1
,i2
11 if (i1
/= 12 .or
. i2
/= 3) call abort