public inbox for gcc-bugs@sourceware.org
help / color / mirror / Atom feed
* [Bug fortran/14066] New: [gfortran]  Infinite DO loops not recognized.
@ 2004-02-07 19:55 bdavis9659 at comcast dot net
  2004-02-07 22:13 ` [Bug fortran/14066] " pinskia at gcc dot gnu dot org
                   ` (7 more replies)
  0 siblings, 8 replies; 9+ messages in thread
From: bdavis9659 at comcast dot net @ 2004-02-07 19:55 UTC (permalink / raw)
  To: gcc-bugs

Do loops like these:

     DO
          ...
     ENDDO

and

     DO 100
           ...
100  CONTINUE

are probably not standard F77, but are used in existing code.  both of these
work with g77.

Below is a (non) compilable example.

$ cat dl.f
       I = 0
       DO 10
        IF (I.EQ.20) EXIT
         I = I + 1
 10    CONTINUE
       PRINT*,'I is ',I
       END
$ /usr/local/bin/gfortran -static dl.f
 In file dl.f:2
 
       DO 10
      1
Error: Unclassifiable statement at (1)
 In file dl.f:3
 
        IF (I.EQ.20) EXIT
                        1
Error: EXIT statement at (1) is not within a loop
$ g77 -ff77 dl.f
$ ./a.out
 I is  20
$ /usr/local/bin/gfortran --version
GNU Fortran 95 (GCC 3.5-tree-ssa 20040207 (merged 20040126))
Copyright (C) 2003 Free Software Foundation, Inc.

-- 
           Summary: [gfortran]  Infinite DO loops not recognized.
           Product: gcc
           Version: tree-ssa
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: bdavis9659 at comcast dot net
                CC: gcc-bugs at gcc dot gnu dot org


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


^ permalink raw reply	[flat|nested] 9+ messages in thread
* [Bug fortran/14066] [gfortran]  Infinite DO loops not recognized.
  2004-02-07 19:55 [Bug fortran/14066] New: [gfortran] Infinite DO loops not recognized bdavis9659 at comcast dot net
@ 2004-02-07 22:13 ` pinskia at gcc dot gnu dot org
  2004-04-22 13:17 ` Tobias dot Schlueter at physik dot uni-muenchen dot de
                   ` (6 subsequent siblings)
  7 siblings, 0 replies; 9+ messages in thread
From: pinskia at gcc dot gnu dot org @ 2004-02-07 22:13 UTC (permalink / raw)
  To: gcc-bugs


------- Additional Comments From pinskia at gcc dot gnu dot org  2004-02-07 22:13 -------
Confirmed.

-- 
           What    |Removed                     |Added
----------------------------------------------------------------------------
           Severity|normal                      |enhancement
             Status|UNCONFIRMED                 |NEW
     Ever Confirmed|                            |1
   Last reconfirmed|0000-00-00 00:00:00         |2004-02-07 22:13:35
               date|                            |
   Target Milestone|---                         |tree-ssa


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


^ permalink raw reply	[flat|nested] 9+ messages in thread
* [Bug fortran/14066] [gfortran]  Infinite DO loops not recognized.
  2004-02-07 19:55 [Bug fortran/14066] New: [gfortran] Infinite DO loops not recognized bdavis9659 at comcast dot net
  2004-02-07 22:13 ` [Bug fortran/14066] " pinskia at gcc dot gnu dot org
@ 2004-04-22 13:17 ` Tobias dot Schlueter at physik dot uni-muenchen dot de
  2004-04-22 13:21 ` Tobias dot Schlueter at physik dot uni-muenchen dot de
                   ` (5 subsequent siblings)
  7 siblings, 0 replies; 9+ messages in thread
From: Tobias dot Schlueter at physik dot uni-muenchen dot de @ 2004-04-22 13:17 UTC (permalink / raw)
  To: gcc-bugs


------- Additional Comments From Tobias dot Schlueter at physik dot uni-muenchen dot de  2004-04-22 13:00 -------
(In reply to comment #0)
> Do loops like these:
> 
>      DO
>           ...
>      ENDDO
> 
this works ...
> and
> 
>      DO 100
>            ...
> 100  CONTINUE
> 
.. and this doesn't. I wrote the original code which supports the former, I will
take care of the latter once my copyright assignment is through.

-- 
           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |Tobias dot Schlueter at
                   |                            |physik dot uni-muenchen dot
                   |                            |de


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


^ permalink raw reply	[flat|nested] 9+ messages in thread
* [Bug fortran/14066] [gfortran]  Infinite DO loops not recognized.
  2004-02-07 19:55 [Bug fortran/14066] New: [gfortran] Infinite DO loops not recognized bdavis9659 at comcast dot net
  2004-02-07 22:13 ` [Bug fortran/14066] " pinskia at gcc dot gnu dot org
  2004-04-22 13:17 ` Tobias dot Schlueter at physik dot uni-muenchen dot de
@ 2004-04-22 13:21 ` Tobias dot Schlueter at physik dot uni-muenchen dot de
  2004-05-01 15:19 ` bdavis at gcc dot gnu dot org
                   ` (4 subsequent siblings)
  7 siblings, 0 replies; 9+ messages in thread
From: Tobias dot Schlueter at physik dot uni-muenchen dot de @ 2004-04-22 13:21 UTC (permalink / raw)
  To: gcc-bugs


------- Additional Comments From Tobias dot Schlueter at physik dot uni-muenchen dot de  2004-04-22 13:02 -------
The patch for this shuffles three lines, didn't take very long :-)

-- 


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


^ permalink raw reply	[flat|nested] 9+ messages in thread
* [Bug fortran/14066] [gfortran]  Infinite DO loops not recognized.
  2004-02-07 19:55 [Bug fortran/14066] New: [gfortran] Infinite DO loops not recognized bdavis9659 at comcast dot net
                   ` (2 preceding siblings ...)
  2004-04-22 13:21 ` Tobias dot Schlueter at physik dot uni-muenchen dot de
@ 2004-05-01 15:19 ` bdavis at gcc dot gnu dot org
  2004-05-08 16:14 ` Tobias dot Schlueter at physik dot uni-muenchen dot de
                   ` (3 subsequent siblings)
  7 siblings, 0 replies; 9+ messages in thread
From: bdavis at gcc dot gnu dot org @ 2004-05-01 15:19 UTC (permalink / raw)
  To: gcc-bugs



-- 
           What    |Removed                     |Added
----------------------------------------------------------------------------
         AssignedTo|unassigned at gcc dot gnu   |Tobias dot Schlueter at
                   |dot org                     |physik dot uni-muenchen dot
                   |                            |de
             Status|NEW                         |ASSIGNED


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


^ permalink raw reply	[flat|nested] 9+ messages in thread
* [Bug fortran/14066] [gfortran]  Infinite DO loops not recognized.
  2004-02-07 19:55 [Bug fortran/14066] New: [gfortran] Infinite DO loops not recognized bdavis9659 at comcast dot net
                   ` (3 preceding siblings ...)
  2004-05-01 15:19 ` bdavis at gcc dot gnu dot org
@ 2004-05-08 16:14 ` Tobias dot Schlueter at physik dot uni-muenchen dot de
  2004-05-08 17:28 ` pinskia at gcc dot gnu dot org
                   ` (2 subsequent siblings)
  7 siblings, 0 replies; 9+ messages in thread
From: Tobias dot Schlueter at physik dot uni-muenchen dot de @ 2004-05-08 16:14 UTC (permalink / raw)
  To: gcc-bugs


------- Additional Comments From Tobias dot Schlueter at physik dot uni-muenchen dot de  2004-05-08 16:14 -------
Patch here: http://gcc.gnu.org/ml/fortran/2004-05/msg00068.html

-- 


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


^ permalink raw reply	[flat|nested] 9+ messages in thread
* [Bug fortran/14066] [gfortran]  Infinite DO loops not recognized.
  2004-02-07 19:55 [Bug fortran/14066] New: [gfortran] Infinite DO loops not recognized bdavis9659 at comcast dot net
                   ` (4 preceding siblings ...)
  2004-05-08 16:14 ` Tobias dot Schlueter at physik dot uni-muenchen dot de
@ 2004-05-08 17:28 ` pinskia at gcc dot gnu dot org
  2004-05-14 18:38 ` cvs-commit at gcc dot gnu dot org
  2004-05-14 18:47 ` tobi at gcc dot gnu dot org
  7 siblings, 0 replies; 9+ messages in thread
From: pinskia at gcc dot gnu dot org @ 2004-05-08 17:28 UTC (permalink / raw)
  To: gcc-bugs



-- 
           What    |Removed                     |Added
----------------------------------------------------------------------------
           Severity|enhancement                 |minor
           Keywords|                            |patch, rejects-valid


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


^ permalink raw reply	[flat|nested] 9+ messages in thread
* [Bug fortran/14066] [gfortran]  Infinite DO loops not recognized.
  2004-02-07 19:55 [Bug fortran/14066] New: [gfortran] Infinite DO loops not recognized bdavis9659 at comcast dot net
                   ` (5 preceding siblings ...)
  2004-05-08 17:28 ` pinskia at gcc dot gnu dot org
@ 2004-05-14 18:38 ` cvs-commit at gcc dot gnu dot org
  2004-05-14 18:47 ` tobi at gcc dot gnu dot org
  7 siblings, 0 replies; 9+ messages in thread
From: cvs-commit at gcc dot gnu dot org @ 2004-05-14 18:38 UTC (permalink / raw)
  To: gcc-bugs


------- Additional Comments From cvs-commit at gcc dot gnu dot org  2004-05-14 13:46 -------
Subject: Bug 14066

CVSROOT:	/cvs/gcc
Module name:	gcc
Changes by:	tobi@gcc.gnu.org	2004-05-14 13:46:05

Modified files:
	gcc/fortran    : ChangeLog match.c 
	gcc/testsuite  : ChangeLog 
Added files:
	gcc/testsuite/gfortran.fortran-torture/compile: do_1.f90 

Log message:
	fortran:
	PR fortran/14066
	* match.c (gfc_match_do): Allow infinite loops with
	label-do-stmt. Do not enforce space after comma.
	
	testsuite:
	
	PR fortran/14066
	* gfortran.fortran-torture/compile/do_1.f90: New test.
	
	Also fixed date on previous ChangeLog entries.

Patches:
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/fortran/ChangeLog.diff?cvsroot=gcc&r1=1.8&r2=1.9
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/fortran/match.c.diff?cvsroot=gcc&r1=1.3&r2=1.4
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/ChangeLog.diff?cvsroot=gcc&r1=1.3742&r2=1.3743
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/gfortran.fortran-torture/compile/do_1.f90.diff?cvsroot=gcc&r1=NONE&r2=1.1



-- 


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


^ permalink raw reply	[flat|nested] 9+ messages in thread
* [Bug fortran/14066] [gfortran]  Infinite DO loops not recognized.
  2004-02-07 19:55 [Bug fortran/14066] New: [gfortran] Infinite DO loops not recognized bdavis9659 at comcast dot net
                   ` (6 preceding siblings ...)
  2004-05-14 18:38 ` cvs-commit at gcc dot gnu dot org
@ 2004-05-14 18:47 ` tobi at gcc dot gnu dot org
  7 siblings, 0 replies; 9+ messages in thread
From: tobi at gcc dot gnu dot org @ 2004-05-14 18:47 UTC (permalink / raw)
  To: gcc-bugs


------- Additional Comments From tobi at gcc dot gnu dot org  2004-05-14 14:00 -------
Fixed by above commit.

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


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


^ permalink raw reply	[flat|nested] 9+ messages in thread
end of thread, other threads:[~2004-05-14 14:00 UTC | newest]

Thread overview: 9+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2004-02-07 19:55 [Bug fortran/14066] New: [gfortran] Infinite DO loops not recognized bdavis9659 at comcast dot net
2004-02-07 22:13 ` [Bug fortran/14066] " pinskia at gcc dot gnu dot org
2004-04-22 13:17 ` Tobias dot Schlueter at physik dot uni-muenchen dot de
2004-04-22 13:21 ` Tobias dot Schlueter at physik dot uni-muenchen dot de
2004-05-01 15:19 ` bdavis at gcc dot gnu dot org
2004-05-08 16:14 ` Tobias dot Schlueter at physik dot uni-muenchen dot de
2004-05-08 17:28 ` pinskia at gcc dot gnu dot org
2004-05-14 18:38 ` cvs-commit at gcc dot gnu dot org
2004-05-14 18:47 ` tobi 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).