$ cat size_1.f90 ! { dg-do run } ! size= isn't implemented correctly at the moment. program main open(77,pad='yes') write(77,'(A)') '123' rewind(77) read(77,'(I2)',advance='no',size=i) j print *,i if (i /= 2) call abort end program main $ gfortran size_1.f90 $ ./a.out 0 Aborted $ gfortran -v Using built-in specs. Target: ia64-unknown-linux-gnu Configured with: ../gcc-4.1-20050403/configure --prefix=/home/zfkts --enable-languages=c,f95 Thread model: posix gcc version 4.1.0 20050403 (experimental)
-- Summary: size= isn't implemented correctly Product: gcc Version: 4.1.0 Status: UNCONFIRMED Severity: normal Priority: P2 Component: libfortran AssignedTo: unassigned at gcc dot gnu dot org ReportedBy: Thomas dot Koenig at online dot de CC: gcc-bugs at gcc dot gnu dot org http://gcc.gnu.org/bugzilla/show_bug.cgi?id=20744