[Bug libfortran/19064] New: runtime error when reading complex*16 using formatted I/O

[Bug libfortran/19064] New: runtime error when reading complex*16 using formatted I/O

[rmunk at quake dot stanford dot edu]

gfortran (snapshot as of 12/17/04) compiled code gives a runtime error when 
reading formatted complex*16 values using the following program:

      program testIO
      implicit none
      integer i
      complex*16 values(5)
     
      open(7,file='test1.dat',status='old')
      read ( 7, '(5E15.8)' ) ( values (i), i = 1, 5 )
      print *, ( values (i), i = 1, 5 )      
      end

The text file "test1.dat" contains:

 2.00000000E+00 0.00000000E+00 2.52505826E-01 0.00000000E+00 1.44380768E-04
-1.11464849E-18 1.01002561E-01 0.00000000E+00-2.52507036E-02 0.00000000E+00

The code was compiled and executed with "gfortran bug.f; a.out", and produced
the following error message:

At line 8 of file bug2.f
Fortran runtime error: End of file

The code works correctly when compiled with g77 and ifort (Intel Fortran),
and produces the output (g77):

 (2.,0.) (0.252505826,0.) (0.000144380768,-1.11464849E-18) (0.101002561,0.)
 (-0.0252507036,0.)


The code and data was extracted from the Harwell-Boeing collection of sparse
matrices, which is a commonly used format for sparse matrix computations.
See http://math.nist.gov/MatrixMarket/collections/hb.html.

Additional information:

"gfortran -v" gives:

Reading specs from
/auto/home0/rmunk/temp_gfortran/irun/bin/../lib/gcc/i686-pc-linux-gnu/4.0.0/specs
Configured with: ../gcc/configure --enable-languages=c,f95
--prefix=/usr/work/2004352/irun
Thread model: posix
gcc version 4.0.0 20041217 (experimental)


Best regards,
  Rasmus Munk Larsen, Stanford University

-- 
           Summary: runtime error when reading complex*16 using formatted
                    I/O
           Product: gcc
           Version: 4.0.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: libfortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: rmunk at quake dot stanford dot edu
                CC: gcc-bugs at gcc dot gnu dot org


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

[Bug libfortran/19064] runtime error when reading complex*16 using formatted I/O

[pinskia at gcc dot gnu dot org]

------- Additional Comments From pinskia at gcc dot gnu dot org  2004-12-18 03:48 -------
Confirmed.

-- 
           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |NEW
     Ever Confirmed|                            |1
   Last reconfirmed|0000-00-00 00:00:00         |2004-12-18 03:48:12
               date|                            |


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

[Bug libfortran/19064] runtime error when reading complex*16 using formatted I/O

[pinskia at gcc dot gnu dot org]

------- Additional Comments From pinskia at gcc dot gnu dot org  2004-12-21 18:51 -------
*** Bug 19114 has been marked as a duplicate of this bug. ***

-- 


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

[Bug libfortran/19064] runtime error when reading complex*16 using formatted I/O

[bdavis at gcc dot gnu dot org]

------- Additional Comments From bdavis at gcc dot gnu dot org  2004-12-24 00:29 -------
maybe fixed by pr19071, please check !!


-- 


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

[Bug libfortran/19064] runtime error when reading complex*16 using formatted I/O

[Thomas dot Koenig at online dot de]

------- Additional Comments From Thomas dot Koenig at online dot de  2004-12-25 09:34 -------
(In reply to comment #3)
> maybe fixed by pr19071, please check !!

Yes, it is fixed.

$ ./a.out
 (  2.00000000000000     ,  0.00000000000000     ) ( 0.252505826000000     , 
0.00000000000000     ) ( 1.443807680000000E-004,-1.114648490000000E-018) (
0.101002561000000     ,  0.00000000000000     ) (-2.525070360000000E-002, 
0.00000000000000     )
$ gfortran -v
Using built-in specs.
Configured with: ../gcc/configure --prefix=/home/ig25 --enable-languages=c,c++,f95
Thread model: posix
gcc version 4.0.0 20041224 (experimental)




-- 


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

[Bug libfortran/19064] runtime error when reading complex*16 using formatted I/O

[bdavis at gcc dot gnu dot org]

------- Additional Comments From bdavis at gcc dot gnu dot org  2004-12-29 07:59 -------
closing, as all interested report it fixed.


-- 
           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|NEW                         |RESOLVED
         Resolution|                            |FIXED


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

[Bug libfortran/19064] runtime error when reading complex*16 using formatted I/O

[pinskia at gcc dot gnu dot org]

-- 
           What    |Removed                     |Added
----------------------------------------------------------------------------
   Target Milestone|---                         |4.0.0


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