[Bug fortran/43605] [4.4/4.5 Regression] wrong results with ftell

[dominiq at lps dot ens dot fr]

------- Comment #12 from dominiq at lps dot ens dot fr  2010-04-01 16:43 -------
The following test

      integer i
      character*99 buffer
      open(10,FILE="telltest.txt")
      call ftell(10,i)
      print*,i
      read(10,'(a)') buffer
      print *, "'",trim(buffer),"'"
      call ftell(10,i)
      print*,i
      read(10,*) buffer
      print *, "'",trim(buffer),"'"
      call ftell(10,i)
      print*,i
      close(10)
      end

gives

           0
 '123456'
           7
 'DDDDDDDDDDDDD'
         113

I would expect '789' and 10. Am I wrong?


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=43605