public inbox for gcc-bugs@sourceware.org
help / color / mirror / Atom feed
* [Bug fortran/20163] New: gfortran - error opening direct access file
@ 2005-02-23 17:36 dir at lanl dot gov
  2005-02-23 17:40 ` [Bug libfortran/20163] " pinskia at gcc dot gnu dot org
                   ` (18 more replies)
  0 siblings, 19 replies; 20+ messages in thread
From: dir at lanl dot gov @ 2005-02-23 17:36 UTC (permalink / raw)
  To: gcc-bugs

This is the essence of one the errors that one of my programs is seeing. It is a
Double Wammy - first the open of the direct access file fails for no reason -
then it get an internal library error. g77 and Absoft are happy with it.

[dir:~/tests/gfortran] dir% gfortran -g -o recursive recursive.f
[dir:~/tests/gfortran] dir% recursive
At line 14 of file recursive.f
Internal Error: Recursive library calls not allowed
[dir:~/tests/gfortran] dir% cat recursive.f
      program main
      CHARACTER*8 STATUS
      STATUS='SCRATCH'
      NT=55
      NTAP29=29
      NRECL=64
      NPUINT=4
        OPEN(UNIT=NT,STATUS=STATUS,ACCESS='DIRECT',
     $     FORM='UNFORMATTED',RECL=NRECL*NPUINT,ERR=999)
       STOP      
      
  999 CONTINUE
  
          OPEN (NTAP29, STATUS='SCRATCH')
  
      STOP
      END

-- 
           Summary: gfortran - error opening direct access file
           Product: gcc
           Version: 4.0.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: dir at lanl dot gov
                CC: gcc-bugs at gcc dot gnu dot org
  GCC host triplet: powerpc-apple-darwin7.8.0


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


^ permalink raw reply	[flat|nested] 20+ messages in thread
* [Bug libfortran/20163] gfortran - error opening direct access file
  2005-02-23 17:36 [Bug fortran/20163] New: gfortran - error opening direct access file dir at lanl dot gov
@ 2005-02-23 17:40 ` pinskia at gcc dot gnu dot org
  2005-02-23 17:57 ` pinskia at gcc dot gnu dot org
                   ` (17 subsequent siblings)
  18 siblings, 0 replies; 20+ messages in thread
From: pinskia at gcc dot gnu dot org @ 2005-02-23 17:40 UTC (permalink / raw)
  To: gcc-bugs



-- 
           What    |Removed                     |Added
----------------------------------------------------------------------------
          Component|fortran                     |libfortran


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


^ permalink raw reply	[flat|nested] 20+ messages in thread
* [Bug libfortran/20163] gfortran - error opening direct access file
  2005-02-23 17:36 [Bug fortran/20163] New: gfortran - error opening direct access file dir at lanl dot gov
  2005-02-23 17:40 ` [Bug libfortran/20163] " pinskia at gcc dot gnu dot org
@ 2005-02-23 17:57 ` pinskia at gcc dot gnu dot org
  2005-02-24 13:19 ` Thomas dot Koenig at online dot de
                   ` (16 subsequent siblings)
  18 siblings, 0 replies; 20+ messages in thread
From: pinskia at gcc dot gnu dot org @ 2005-02-23 17:57 UTC (permalink / raw)
  To: gcc-bugs


------- Additional Comments From pinskia at gcc dot gnu dot org  2005-02-23 14:19 -------
Confirmed.

-- 
           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |NEW
     Ever Confirmed|                            |1
   Last reconfirmed|0000-00-00 00:00:00         |2005-02-23 14:19:57
               date|                            |


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


^ permalink raw reply	[flat|nested] 20+ messages in thread
* [Bug libfortran/20163] gfortran - error opening direct access file
  2005-02-23 17:36 [Bug fortran/20163] New: gfortran - error opening direct access file dir at lanl dot gov
  2005-02-23 17:40 ` [Bug libfortran/20163] " pinskia at gcc dot gnu dot org
  2005-02-23 17:57 ` pinskia at gcc dot gnu dot org
@ 2005-02-24 13:19 ` Thomas dot Koenig at online dot de
  2005-02-24 13:46 ` Thomas dot Koenig at online dot de
                   ` (15 subsequent siblings)
  18 siblings, 0 replies; 20+ messages in thread
From: Thomas dot Koenig at online dot de @ 2005-02-24 13:19 UTC (permalink / raw)
  To: gcc-bugs


------- Additional Comments From Thomas dot Koenig at online dot de  2005-02-23 23:09 -------
This is two bugs.

The first bug can be reduced to

$ cat open-opt.f
      open(unit=10,status="scratch ")
      end
$ gfortran open-opt.f
$ ./a.out
At line 1 of file open-opt.f
Fortran runtime error: Bad STATUS parameter in OPEN statement


-- 


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


^ permalink raw reply	[flat|nested] 20+ messages in thread
* [Bug libfortran/20163] gfortran - error opening direct access file
  2005-02-23 17:36 [Bug fortran/20163] New: gfortran - error opening direct access file dir at lanl dot gov
                   ` (2 preceding siblings ...)
  2005-02-24 13:19 ` Thomas dot Koenig at online dot de
@ 2005-02-24 13:46 ` Thomas dot Koenig at online dot de
  2005-02-27  9:03 ` Thomas dot Koenig at online dot de
                   ` (14 subsequent siblings)
  18 siblings, 0 replies; 20+ messages in thread
From: Thomas dot Koenig at online dot de @ 2005-02-24 13:46 UTC (permalink / raw)
  To: gcc-bugs


------- Additional Comments From Thomas dot Koenig at online dot de  2005-02-23 23:29 -------
This has a pretty good chance of fixing it.

Proper testing, Changelog entry, ... tomorrow.

Index: string.c
===================================================================
RCS file: /cvsroot/gcc/gcc/libgfortran/runtime/string.c,v
retrieving revision 1.4
diff -c -r1.4 string.c
*** string.c    12 Jan 2005 21:27:31 -0000      1.4
--- string.c    23 Feb 2005 23:28:02 -0000
***************
*** 41,57 ****
  compare0 (const char *s1, int s1_len, const char *s2)
  {
    int i;

!   if (strncasecmp (s1, s2, s1_len) != 0)
!     return 0;
!
!   /* The rest of s1 needs to be blanks for equality.  */
!
!   for (i = strlen (s2); i < s1_len; i++)
!     if (s1[i] != ' ')
!       return 0;
!
!   return 1;
  }


--- 41,51 ----
  compare0 (const char *s1, int s1_len, const char *s2)
  {
    int i;
+   int len;

!   /* Strip traling blanks from the Fortran string.  */
!   len = fstrlen(s1, s1_len);
!   return strncasecmp(s1,s2,len) == 0;
  }




-- 


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


^ permalink raw reply	[flat|nested] 20+ messages in thread
* [Bug libfortran/20163] gfortran - error opening direct access file
  2005-02-23 17:36 [Bug fortran/20163] New: gfortran - error opening direct access file dir at lanl dot gov
                   ` (3 preceding siblings ...)
  2005-02-24 13:46 ` Thomas dot Koenig at online dot de
@ 2005-02-27  9:03 ` Thomas dot Koenig at online dot de
  2005-02-27  9:11 ` Thomas dot Koenig at online dot de
                   ` (13 subsequent siblings)
  18 siblings, 0 replies; 20+ messages in thread
From: Thomas dot Koenig at online dot de @ 2005-02-27  9:03 UTC (permalink / raw)
  To: gcc-bugs


------- Additional Comments From Thomas dot Koenig at online dot de  2005-02-26 20:46 -------
Patch for the first bug here:

http://gcc.gnu.org/ml/gcc-patches/2005-02/msg01694.html

-- 


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


^ permalink raw reply	[flat|nested] 20+ messages in thread
* [Bug libfortran/20163] gfortran - error opening direct access file
  2005-02-23 17:36 [Bug fortran/20163] New: gfortran - error opening direct access file dir at lanl dot gov
                   ` (4 preceding siblings ...)
  2005-02-27  9:03 ` Thomas dot Koenig at online dot de
@ 2005-02-27  9:11 ` Thomas dot Koenig at online dot de
  2005-02-27 19:26 ` dir at lanl dot gov
                   ` (12 subsequent siblings)
  18 siblings, 0 replies; 20+ messages in thread
From: Thomas dot Koenig at online dot de @ 2005-02-27  9:11 UTC (permalink / raw)
  To: gcc-bugs


------- Additional Comments From Thomas dot Koenig at online dot de  2005-02-26 20:49 -------
Here is a reduced test case for the second error:

$ cat open-after-error.f
      open(10,status="foo",err=100)
      call abort
 100  continue
      open(10,status="scratch")
      end
$ cat open-after-error.f
      open(10,status="foo",err=100)
      call abort
 100  continue
      open(10,status="scratch")
      end
$ gfortran open-after-error.f
$ ./a.out
At line 4 of file open-after-error.f
Internal Error: Recursive library calls not allowed


-- 


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


^ permalink raw reply	[flat|nested] 20+ messages in thread
* [Bug libfortran/20163] gfortran - error opening direct access file
  2005-02-23 17:36 [Bug fortran/20163] New: gfortran - error opening direct access file dir at lanl dot gov
                   ` (5 preceding siblings ...)
  2005-02-27  9:11 ` Thomas dot Koenig at online dot de
@ 2005-02-27 19:26 ` dir at lanl dot gov
  2005-03-22 23:05 ` fxcoudert at gcc dot gnu dot org
                   ` (11 subsequent siblings)
  18 siblings, 0 replies; 20+ messages in thread
From: dir at lanl dot gov @ 2005-02-27 19:26 UTC (permalink / raw)
  To: gcc-bugs


------- Additional Comments From dir at lanl dot gov  2005-02-27 14:05 -------
Looks like a missing call to library_end ()in open.c. I added that one line and
the recursive error went away -

[dir:~/tests/gfortran] dir% gfortran -o recursive3 recursive3.f
[dir:~/tests/gfortran] dir% recursive3
[dir:~/tests/gfortran] dir% cat  recursive3.f
      open(10,status="foo",err=100)
      call abort
 100  continue
      open(10,status="scratch")
      end

> 
[dir:~] dir% diff -c /Users/dir/junk/io/open.c
/Users/dir/gfortran/gcc/libgfortran/io/open.c
*** /Users/dir/junk/io/open.c   Sat Jan 22 16:14:30 2005
--- /Users/dir/gfortran/gcc/libgfortran/io/open.c       Sat Feb 26 21:36:28 2005
***************
*** 480,488 ****
    if (flags.position == POSITION_UNSPECIFIED)
      flags.position = POSITION_ASIS;
  
!   if (ioparm.library_return != LIBRARY_OK)
      return;
! 
    u = find_unit (ioparm.unit);
  
    if (u == NULL)
--- 480,489 ----
    if (flags.position == POSITION_UNSPECIFIED)
      flags.position = POSITION_ASIS;
  
!   if (ioparm.library_return != LIBRARY_OK){
!     library_end ();
      return;
!   }
    u = find_unit (ioparm.unit);
  
    if (u == NULL)


(In reply to comment #5)
> Here is a reduced test case for the second error:
> 
> $ cat open-after-error.f
>       open(10,status="foo",err=100)
>       call abort
>  100  continue
>       open(10,status="scratch")
>       end
> $ cat open-after-error.f
>       open(10,status="foo",err=100)
>       call abort
>  100  continue
>       open(10,status="scratch")
>       end
> $ gfortran open-after-error.f
> $ ./a.out
> At line 4 of file open-after-error.f
> Internal Error: Recursive library calls not allowed
> 

-- 


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


^ permalink raw reply	[flat|nested] 20+ messages in thread
* [Bug libfortran/20163] gfortran - error opening direct access file
  2005-02-23 17:36 [Bug fortran/20163] New: gfortran - error opening direct access file dir at lanl dot gov
                   ` (6 preceding siblings ...)
  2005-02-27 19:26 ` dir at lanl dot gov
@ 2005-03-22 23:05 ` fxcoudert at gcc dot gnu dot org
  2005-03-29  8:38 ` cvs-commit at gcc dot gnu dot org
                   ` (10 subsequent siblings)
  18 siblings, 0 replies; 20+ messages in thread
From: fxcoudert at gcc dot gnu dot org @ 2005-03-22 23:05 UTC (permalink / raw)
  To: gcc-bugs



-- 
           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |fxcoudert at gcc dot gnu dot
                   |                            |org
           Keywords|                            |patch
   Last reconfirmed|2005-02-23 14:19:57         |2005-03-22 23:05:08
               date|                            |


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


^ permalink raw reply	[flat|nested] 20+ messages in thread
* [Bug libfortran/20163] gfortran - error opening direct access file
  2005-02-23 17:36 [Bug fortran/20163] New: gfortran - error opening direct access file dir at lanl dot gov
                   ` (7 preceding siblings ...)
  2005-03-22 23:05 ` fxcoudert at gcc dot gnu dot org
@ 2005-03-29  8:38 ` cvs-commit at gcc dot gnu dot org
  2005-03-29  8:42 ` fxcoudert at gcc dot gnu dot org
                   ` (9 subsequent siblings)
  18 siblings, 0 replies; 20+ messages in thread
From: cvs-commit at gcc dot gnu dot org @ 2005-03-29  8:38 UTC (permalink / raw)
  To: gcc-bugs


------- Additional Comments From cvs-commit at gcc dot gnu dot org  2005-03-29 08:37 -------
Subject: Bug 20163

CVSROOT:	/cvs/gcc
Module name:	gcc
Changes by:	fxcoudert@gcc.gnu.org	2005-03-29 08:37:32

Modified files:
	gcc/testsuite  : ChangeLog 
	libgfortran    : ChangeLog 
	libgfortran/io : open.c 
Added files:
	gcc/testsuite/gfortran.dg: pr20163-2.f 

Log message:
	PR libfortran/20163
	* io/open.c (st_open): call library_end() before returning even if
	an error arises.
	
	* gfortran.dg/pr20163-2.f: New test.

Patches:
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/ChangeLog.diff?cvsroot=gcc&r1=1.5228&r2=1.5229
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/gfortran.dg/pr20163-2.f.diff?cvsroot=gcc&r1=NONE&r2=1.1
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/libgfortran/ChangeLog.diff?cvsroot=gcc&r1=1.178&r2=1.179
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/libgfortran/io/open.c.diff?cvsroot=gcc&r1=1.11&r2=1.12



-- 


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


^ permalink raw reply	[flat|nested] 20+ messages in thread
* [Bug libfortran/20163] gfortran - error opening direct access file
  2005-02-23 17:36 [Bug fortran/20163] New: gfortran - error opening direct access file dir at lanl dot gov
                   ` (9 preceding siblings ...)
  2005-03-29  8:42 ` fxcoudert at gcc dot gnu dot org
@ 2005-03-29  8:42 ` cvs-commit at gcc dot gnu dot org
  2005-04-09 19:37 ` cvs-commit at gcc dot gnu dot org
                   ` (7 subsequent siblings)
  18 siblings, 0 replies; 20+ messages in thread
From: cvs-commit at gcc dot gnu dot org @ 2005-03-29  8:42 UTC (permalink / raw)
  To: gcc-bugs


------- Additional Comments From cvs-commit at gcc dot gnu dot org  2005-03-29 08:42 -------
Subject: Bug 20163

CVSROOT:	/cvs/gcc
Module name:	gcc
Branch: 	gcc-4_0-branch
Changes by:	fxcoudert@gcc.gnu.org	2005-03-29 08:41:58

Modified files:
	gcc/testsuite  : ChangeLog 
	libgfortran    : ChangeLog 
	libgfortran/io : open.c 
Added files:
	gcc/testsuite/gfortran.dg: pr20163-2.f 

Log message:
	PR libfortran/20163
	* io/open.c (st_open): call library_end() before returning even if
	an error arises.
	
	* gfortran.dg/pr20163-2.f: New test.

Patches:
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/ChangeLog.diff?cvsroot=gcc&only_with_tag=gcc-4_0-branch&r1=1.5084.2.71&r2=1.5084.2.72
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/gfortran.dg/pr20163-2.f.diff?cvsroot=gcc&only_with_tag=gcc-4_0-branch&r1=NONE&r2=1.1.2.1
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/libgfortran/ChangeLog.diff?cvsroot=gcc&only_with_tag=gcc-4_0-branch&r1=1.163.2.11&r2=1.163.2.12
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/libgfortran/io/open.c.diff?cvsroot=gcc&only_with_tag=gcc-4_0-branch&r1=1.10.10.1&r2=1.10.10.2



-- 


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


^ permalink raw reply	[flat|nested] 20+ messages in thread
* [Bug libfortran/20163] gfortran - error opening direct access file
  2005-02-23 17:36 [Bug fortran/20163] New: gfortran - error opening direct access file dir at lanl dot gov
                   ` (8 preceding siblings ...)
  2005-03-29  8:38 ` cvs-commit at gcc dot gnu dot org
@ 2005-03-29  8:42 ` fxcoudert at gcc dot gnu dot org
  2005-03-29  8:42 ` cvs-commit at gcc dot gnu dot org
                   ` (8 subsequent siblings)
  18 siblings, 0 replies; 20+ messages in thread
From: fxcoudert at gcc dot gnu dot org @ 2005-03-29  8:42 UTC (permalink / raw)
  To: gcc-bugs


------- Additional Comments From fxcoudert at gcc dot gnu dot org  2005-03-29 08:42 -------
Fixed.

-- 
           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|NEW                         |RESOLVED
         Resolution|                            |FIXED
   Target Milestone|---                         |4.0.0


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


^ permalink raw reply	[flat|nested] 20+ messages in thread
* [Bug libfortran/20163] gfortran - error opening direct access file
  2005-02-23 17:36 [Bug fortran/20163] New: gfortran - error opening direct access file dir at lanl dot gov
                   ` (10 preceding siblings ...)
  2005-03-29  8:42 ` cvs-commit at gcc dot gnu dot org
@ 2005-04-09 19:37 ` cvs-commit at gcc dot gnu dot org
  2005-04-09 19:40 ` cvs-commit at gcc dot gnu dot org
                   ` (6 subsequent siblings)
  18 siblings, 0 replies; 20+ messages in thread
From: cvs-commit at gcc dot gnu dot org @ 2005-04-09 19:37 UTC (permalink / raw)
  To: gcc-bugs


------- Additional Comments From cvs-commit at gcc dot gnu dot org  2005-04-09 19:37 -------
Subject: Bug 20163

CVSROOT:	/cvs/gcc
Module name:	gcc
Changes by:	tkoenig@gcc.gnu.org	2005-04-09 19:37:14

Modified files:
	libgfortran    : ChangeLog 
	libgfortran/runtime: string.c 

Log message:
	2005-04-09  Thomas Koenig <Thomas.Koenig@online.de>
	
	PR libfortran/20163
	* runtime/string.c (compare0): Use fstrlen() to
	strip trailing blanks from option string.

Patches:
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/libgfortran/ChangeLog.diff?cvsroot=gcc&r1=1.185&r2=1.186
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/libgfortran/runtime/string.c.diff?cvsroot=gcc&r1=1.4&r2=1.5



-- 


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


^ permalink raw reply	[flat|nested] 20+ messages in thread
* [Bug libfortran/20163] gfortran - error opening direct access file
  2005-02-23 17:36 [Bug fortran/20163] New: gfortran - error opening direct access file dir at lanl dot gov
                   ` (11 preceding siblings ...)
  2005-04-09 19:37 ` cvs-commit at gcc dot gnu dot org
@ 2005-04-09 19:40 ` cvs-commit at gcc dot gnu dot org
  2005-04-10  9:41 ` [Bug libfortran/20163] [4.0 only] " tkoenig at gcc dot gnu dot org
                   ` (5 subsequent siblings)
  18 siblings, 0 replies; 20+ messages in thread
From: cvs-commit at gcc dot gnu dot org @ 2005-04-09 19:40 UTC (permalink / raw)
  To: gcc-bugs


------- Additional Comments From cvs-commit at gcc dot gnu dot org  2005-04-09 19:40 -------
Subject: Bug 20163

CVSROOT:	/cvs/gcc
Module name:	gcc
Changes by:	tkoenig@gcc.gnu.org	2005-04-09 19:40:48

Modified files:
	gcc/testsuite  : ChangeLog 
Added files:
	gcc/testsuite/gfortran.dg: open-options-blanks.f 

Log message:
	2005-04-09  Thomas Koenig  <Thomas.Koenig@online.de>
	
	PR libfortran/20163
	* gfortran.dg/open-options-blanks.f:  New test.

Patches:
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/ChangeLog.diff?cvsroot=gcc&r1=1.5313&r2=1.5314
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/gfortran.dg/open-options-blanks.f.diff?cvsroot=gcc&r1=NONE&r2=1.1



-- 


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


^ permalink raw reply	[flat|nested] 20+ messages in thread
* [Bug libfortran/20163] [4.0 only] gfortran - error opening direct access file
  2005-02-23 17:36 [Bug fortran/20163] New: gfortran - error opening direct access file dir at lanl dot gov
                   ` (12 preceding siblings ...)
  2005-04-09 19:40 ` cvs-commit at gcc dot gnu dot org
@ 2005-04-10  9:41 ` tkoenig at gcc dot gnu dot org
  2005-04-10 12:53 ` pinskia at gcc dot gnu dot org
                   ` (4 subsequent siblings)
  18 siblings, 0 replies; 20+ messages in thread
From: tkoenig at gcc dot gnu dot org @ 2005-04-10  9:41 UTC (permalink / raw)
  To: gcc-bugs


------- Additional Comments From tkoenig at gcc dot gnu dot org  2005-04-10 09:41 -------
First half is ixed in 4.1.0 - waiting for 4.0 to reopen.

-- 
           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|RESOLVED                    |REOPENED
      Known to work|                            |4.1.0
         Resolution|FIXED                       |
            Summary|gfortran - error opening    |[4.0 only] gfortran - error
                   |direct access file          |opening direct access file


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


^ permalink raw reply	[flat|nested] 20+ messages in thread
* [Bug libfortran/20163] [4.0 only] gfortran - error opening direct access file
  2005-02-23 17:36 [Bug fortran/20163] New: gfortran - error opening direct access file dir at lanl dot gov
                   ` (13 preceding siblings ...)
  2005-04-10  9:41 ` [Bug libfortran/20163] [4.0 only] " tkoenig at gcc dot gnu dot org
@ 2005-04-10 12:53 ` pinskia at gcc dot gnu dot org
  2005-04-12  8:50 ` fxcoudert at gcc dot gnu dot org
                   ` (3 subsequent siblings)
  18 siblings, 0 replies; 20+ messages in thread
From: pinskia at gcc dot gnu dot org @ 2005-04-10 12:53 UTC (permalink / raw)
  To: gcc-bugs



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


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


^ permalink raw reply	[flat|nested] 20+ messages in thread
* [Bug libfortran/20163] [4.0 only] gfortran - error opening direct access file
  2005-02-23 17:36 [Bug fortran/20163] New: gfortran - error opening direct access file dir at lanl dot gov
                   ` (14 preceding siblings ...)
  2005-04-10 12:53 ` pinskia at gcc dot gnu dot org
@ 2005-04-12  8:50 ` fxcoudert at gcc dot gnu dot org
  2005-04-13 20:48 ` cvs-commit at gcc dot gnu dot org
                   ` (2 subsequent siblings)
  18 siblings, 0 replies; 20+ messages in thread
From: fxcoudert at gcc dot gnu dot org @ 2005-04-12  8:50 UTC (permalink / raw)
  To: gcc-bugs


------- Additional Comments From fxcoudert at gcc dot gnu dot org  2005-04-12 08:50 -------
*** Bug 20749 has been marked as a duplicate of this bug. ***

-- 


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


^ permalink raw reply	[flat|nested] 20+ messages in thread
* [Bug libfortran/20163] [4.0 only] gfortran - error opening direct access file
  2005-02-23 17:36 [Bug fortran/20163] New: gfortran - error opening direct access file dir at lanl dot gov
                   ` (15 preceding siblings ...)
  2005-04-12  8:50 ` fxcoudert at gcc dot gnu dot org
@ 2005-04-13 20:48 ` cvs-commit at gcc dot gnu dot org
  2005-04-13 20:49 ` tkoenig at gcc dot gnu dot org
  2005-04-13 21:02 ` pinskia at gcc dot gnu dot org
  18 siblings, 0 replies; 20+ messages in thread
From: cvs-commit at gcc dot gnu dot org @ 2005-04-13 20:48 UTC (permalink / raw)
  To: gcc-bugs


------- Additional Comments From cvs-commit at gcc dot gnu dot org  2005-04-13 20:48 -------
Subject: Bug 20163

CVSROOT:	/cvs/gcc
Module name:	gcc
Branch: 	gcc-4_0-branch
Changes by:	tkoenig@gcc.gnu.org	2005-04-13 20:48:16

Modified files:
	libgfortran    : ChangeLog 
	libgfortran/runtime: string.c 
	gcc/testsuite  : ChangeLog 
Added files:
	gcc/testsuite/gfortran.dg: open-options-blanks.f 

Log message:
	Committed after approval on
	http://gcc.gnu.org/ml/gcc/2005-04/msg00613.html.
	
	2005-04-13  Thomas Koenig <Thomas.Koenig@online.de>
	
	PR libfortran/20163
	* runtime/string.c (compare0): Use fstrlen() to
	strip trailing blanks from option string.
	
	2005-04-13  Thomas Koenig  <Thomas.Koenig@online.de>
	
	PR libfortran/20163
	* gfortran.dg/open-options-blanks.f:  New test.

Patches:
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/libgfortran/ChangeLog.diff?cvsroot=gcc&only_with_tag=gcc-4_0-branch&r1=1.163.2.17&r2=1.163.2.18
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/libgfortran/runtime/string.c.diff?cvsroot=gcc&only_with_tag=gcc-4_0-branch&r1=1.4&r2=1.4.12.1
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/ChangeLog.diff?cvsroot=gcc&only_with_tag=gcc-4_0-branch&r1=1.5084.2.122&r2=1.5084.2.123
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/gfortran.dg/open-options-blanks.f.diff?cvsroot=gcc&only_with_tag=gcc-4_0-branch&r1=NONE&r2=1.1.2.1



-- 


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


^ permalink raw reply	[flat|nested] 20+ messages in thread
* [Bug libfortran/20163] [4.0 only] gfortran - error opening direct access file
  2005-02-23 17:36 [Bug fortran/20163] New: gfortran - error opening direct access file dir at lanl dot gov
                   ` (16 preceding siblings ...)
  2005-04-13 20:48 ` cvs-commit at gcc dot gnu dot org
@ 2005-04-13 20:49 ` tkoenig at gcc dot gnu dot org
  2005-04-13 21:02 ` pinskia at gcc dot gnu dot org
  18 siblings, 0 replies; 20+ messages in thread
From: tkoenig at gcc dot gnu dot org @ 2005-04-13 20:49 UTC (permalink / raw)
  To: gcc-bugs


------- Additional Comments From tkoenig at gcc dot gnu dot org  2005-04-13 20:49 -------
Fixed on 4.0 too.

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


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


^ permalink raw reply	[flat|nested] 20+ messages in thread
* [Bug libfortran/20163] [4.0 only] gfortran - error opening direct access file
  2005-02-23 17:36 [Bug fortran/20163] New: gfortran - error opening direct access file dir at lanl dot gov
                   ` (17 preceding siblings ...)
  2005-04-13 20:49 ` tkoenig at gcc dot gnu dot org
@ 2005-04-13 21:02 ` pinskia at gcc dot gnu dot org
  18 siblings, 0 replies; 20+ messages in thread
From: pinskia at gcc dot gnu dot org @ 2005-04-13 21:02 UTC (permalink / raw)
  To: gcc-bugs



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


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


^ permalink raw reply	[flat|nested] 20+ messages in thread
end of thread, other threads:[~2005-04-13 21:02 UTC | newest]

Thread overview: 20+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2005-02-23 17:36 [Bug fortran/20163] New: gfortran - error opening direct access file dir at lanl dot gov
2005-02-23 17:40 ` [Bug libfortran/20163] " pinskia at gcc dot gnu dot org
2005-02-23 17:57 ` pinskia at gcc dot gnu dot org
2005-02-24 13:19 ` Thomas dot Koenig at online dot de
2005-02-24 13:46 ` Thomas dot Koenig at online dot de
2005-02-27  9:03 ` Thomas dot Koenig at online dot de
2005-02-27  9:11 ` Thomas dot Koenig at online dot de
2005-02-27 19:26 ` dir at lanl dot gov
2005-03-22 23:05 ` fxcoudert at gcc dot gnu dot org
2005-03-29  8:38 ` cvs-commit at gcc dot gnu dot org
2005-03-29  8:42 ` fxcoudert at gcc dot gnu dot org
2005-03-29  8:42 ` cvs-commit at gcc dot gnu dot org
2005-04-09 19:37 ` cvs-commit at gcc dot gnu dot org
2005-04-09 19:40 ` cvs-commit at gcc dot gnu dot org
2005-04-10  9:41 ` [Bug libfortran/20163] [4.0 only] " tkoenig at gcc dot gnu dot org
2005-04-10 12:53 ` pinskia at gcc dot gnu dot org
2005-04-12  8:50 ` fxcoudert at gcc dot gnu dot org
2005-04-13 20:48 ` cvs-commit at gcc dot gnu dot org
2005-04-13 20:49 ` tkoenig at gcc dot gnu dot org
2005-04-13 21:02 ` pinskia at gcc dot gnu dot org

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).