http://gcc.gnu.org/bugzilla/show_bug.cgi?id=53796
--- Comment #9 from Jerry DeLisle <jvdelisle at gcc dot gnu.org> 2012-06-29 23:43:23 UTC --- We have more then one thing to fix here. Try this variation: integer(kind=8) :: s, r open(unit=1, file='testsize.f90', status='old', recl=500) inquire(unit=1, size=s, recl=r) print *, 'size=', s, ' recl=', r end I will continue dabbling with this while we wait for the Comment #7 response.