[Bug fortran/25423] New: Error with nested where statements

[Bug fortran/25423] New: Error with nested where statements

[schnetter at aei dot mpg dot de]

The source code

subroutine sub (i, j)
  implicit none
  logical i(10), j(10)
  where (i)
     where (j)
     end where
  end where
end subroutine sub

leads to the error message

$ ~/gcc/bin/gfortran -c where.f90 
 In file where.f90:6

     end where
             1
Error: Unsupported statement inside WHERE at (1)

when compiled with

$ ~/gcc/bin/gfortran --version
GNU Fortran 95 (GCC) 4.2.0 20051129 (experimental)



The end where statement should not lead to an error message; end where
statements are allowed in where clauses.


-- 
           Summary: Error with nested where statements
           Product: gcc
           Version: 4.2.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: schnetter at aei dot mpg dot de
 GCC build triplet: powerpc-apple-darwin8.3.0
  GCC host triplet: powerpc-apple-darwin8.3.0
GCC target triplet: powerpc-apple-darwin8.3.0


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

[Bug fortran/25423] Error with nested where statements

[pinskia at gcc dot gnu dot org]

------- Comment #1 from pinskia at gcc dot gnu dot org  2005-12-15 04:45 -------
Confirmed.


-- 

pinskia at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |NEW
     Ever Confirmed|0                           |1
           Keywords|                            |rejects-valid
   Last reconfirmed|0000-00-00 00:00:00         |2005-12-15 04:45:06
               date|                            |


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

[Bug fortran/25423] Error with nested where statements

[eedelman at gcc dot gnu dot org]

------- Comment #2 from eedelman at gcc dot gnu dot org  2005-12-20 21:26 -------
Working on a patch.


-- 

eedelman at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |eedelman at gcc dot gnu dot
                   |                            |org


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

[Bug fortran/25423] Error with nested where statements

[eedelman at gcc dot gnu dot org]

------- Comment #3 from eedelman at gcc dot gnu dot org  2005-12-21 11:58 -------
Subject: Bug 25423

Author: eedelman
Date: Wed Dec 21 11:58:09 2005
New Revision: 108902

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=108902
Log:
fortran/
2005-12-21  Erik Edelmann  <eedelman@gcc.gnu.org>

        PR fortran/25423
        * parse.c (parse_where_block): break instead of "fall
         through" after parsing nested WHERE construct.


testsuite/
2005-12-21  Erik Edelmann  <eedelman@gcc.gnu.org>

        PR fortran/25423
        gfortran.dg/where_nested_1.f90: New.


Added:
    trunk/gcc/testsuite/gfortran.dg/where_nested_1.f90
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/parse.c
    trunk/gcc/testsuite/ChangeLog


-- 


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

[Bug fortran/25423] Error with nested where statements

[eedelman at gcc dot gnu dot org]

------- Comment #4 from eedelman at gcc dot gnu dot org  2005-12-21 12:08 -------
Subject: Bug 25423

Author: eedelman
Date: Wed Dec 21 12:07:58 2005
New Revision: 108903

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=108903
Log:
fortran/
2005-12-21  Erik Edelmann  <eedelman@gcc.gnu.org>

        PR fortran/25423
        * parse.c (parse_where_block): break instead of "fall
        through" after parsing nested WHERE construct.

testsuite/
2005-12-21  Erik Edelmann  <eedelman@gcc.gnu.org>

        PR fortran/25423
        gfortran.dg/where_nested_1.f90: New.


Added:
    branches/gcc-4_1-branch/gcc/testsuite/gfortran.dg/where_nested_1.f90
Modified:
    branches/gcc-4_1-branch/gcc/fortran/ChangeLog
    branches/gcc-4_1-branch/gcc/fortran/parse.c
    branches/gcc-4_1-branch/gcc/testsuite/ChangeLog


-- 


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

[Bug fortran/25423] Error with nested where statements

[eedelman at gcc dot gnu dot org]

------- Comment #5 from eedelman at gcc dot gnu dot org  2005-12-21 12:12 -------
Subject: Bug 25423

Author: eedelman
Date: Wed Dec 21 12:12:52 2005
New Revision: 108904

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=108904
Log:
fortran/
2005-12-21  Erik Edelmann  <eedelman@gcc.gnu.org>

        PR fortran/25423
        * parse.c (parse_where_block): break instead of "fall
        through" after parsing nested WHERE construct.

testsuite/
2005-12-21  Erik Edelmann  <eedelman@gcc.gnu.org>

        PR fortran/25423
        gfortran.dg/where_nested_1.f90: New.


Added:
    branches/gcc-4_0-branch/gcc/testsuite/gfortran.dg/where_nested_1.f90
Modified:
    branches/gcc-4_0-branch/gcc/fortran/ChangeLog
    branches/gcc-4_0-branch/gcc/fortran/parse.c
    branches/gcc-4_0-branch/gcc/testsuite/ChangeLog


-- 


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

[Bug fortran/25423] Error with nested where statements

[eedelman at gcc dot gnu dot org]

------- Comment #6 from eedelman at gcc dot gnu dot org  2005-12-21 16:17 -------
Fixed on trunk, 4.1 and 4.0


-- 

eedelman at gcc dot gnu dot org changed:

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


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

[Bug fortran/25423] Error with nested where statements

[pinskia at gcc dot gnu dot org]

-- 

pinskia at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
   Target Milestone|---                         |4.1.0


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