From mboxrd@z Thu Jan 1 00:00:00 1970 From: David.Billinghurst@riotinto.com To: gcc-gnats@gcc.gnu.org Subject: libf2c/4392: Error with list directed format on internal file - ERR=XXX ignored Date: Tue, 25 Sep 2001 05:16:00 -0000 Message-id: <20010925120845.31978.qmail@sourceware.cygnus.com> X-SW-Source: 2001-09/msg00485.html List-Id: >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