https://gcc.gnu.org/bugzilla/show_bug.cgi?id=84506
--- Comment #4 from Steve Kargl <sgk at troutmask dot apl.washington.edu> --- The problem is related to UNIT. program TestInquire implicit none integer(4) :: iUnit integer(8) :: iPos open(newunit=iunit, file='output.txt', access='stream', status='replace') write(iUnit) 'TEXT' inquire(iUnit, pos=iPos) print *, iPos end program TestInquire The above gives the expected result. program TestInquire implicit none integer(8) :: iUnit integer(8) :: iPos open(newunit=iunit, file='output.txt', access='stream', status='replace') write(iUnit) 'TEXT' inquire(iUnit, pos=iPos) print *, iPos end program TestInquire This gives the wrong result.