libf2c/4392: Error with list directed format on internal file - ERR=XXX ignored

libf2c/4392: Error with list directed format on internal file - ERR=XXX ignored

[David.Billinghurst]

>Number:         4392
>Category:       libf2c
>Synopsis:       Error with list directed format on internal file - ERR=XXX ignored
>Confidential:   no
>Severity:       serious
>Priority:       medium
>Responsible:    unassigned
>State:          open
>Class:          sw-bug
>Submitter-Id:   net
>Arrival-Date:   Tue Sep 25 05:16:00 PDT 2001
>Closed-Date:
>Last-Modified:
>Originator:     David Billinghurst
>Release:        g77 2.95.3 and 3.1
>Organization:
>Environment:
i686-pc-cygwin 
>Description:
Attached program dumps core when run.  (Yes, I know it does not conform to Fortran 77 standard).

Works as expected when:
* string is not empty, eg a = 'x', or 
* if a format specifier is supplied.

g77 -O0 bug.f
./a.exe
list in: end of file
apparent state: internal I/O
lately reading direct formatted internal IO
      0 [sig] a 1188 open_stackdumpfile: Dumping stack trace to a.exe.stackdump
Aborted (core dumped)

>How-To-Repeat:
g77 -o bug.exe -O0 bug.f
./bug
>Fix:

>Release-Note:
>Audit-Trail:
>Unformatted:
----gnatsweb-attachment----
Content-Type: text/plain; name="bug.f"
Content-Disposition: inline; filename="bug.f"

      real x
      character*8 a
      a = ' '
      read(a,*,err=999) x
 999  continue
      end

Re: libf2c/4392: Error with list directed format on internal file - ERR=XXX ignored

[toon]

Synopsis: Error with list directed format on internal file - ERR=XXX ignored

Responsible-Changed-From-To: unassigned->toon
Responsible-Changed-By: toon
Responsible-Changed-When: Sat Feb  2 03:33:14 2002
Responsible-Changed-Why:
    My job.
State-Changed-From-To: open->closed
State-Changed-By: toon
State-Changed-When: Sat Feb  2 03:33:14 2002
State-Changed-Why:
    Not a bug.  Error and end-of-file conditions are separate.
    ERR= tests for the first condition, END= for the second.
    
    Granted, the wording in the respective Fortran Standards
    on this is murky - F2K will address that issue.

http://gcc.gnu.org/cgi-bin/gnatsweb.pl?cmd=view%20audit-trail&database=gcc&pr=4392