[Bug fortran/11139] New: Non-stantard code in test 980519-2.f

[Bug fortran/11139] New: Non-stantard code in test 980519-2.f

[billingd@gcc.gnu.org]

PLEASE REPLY TO gcc-bugzilla@gcc.gnu.org ONLY, *NOT* gcc-bugs@gcc.gnu.org.

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

           Summary: Non-stantard code in test 980519-2.f
           Product: gcc
           Version: 3.4
            Status: NEW
          Severity: normal
          Priority: P2
         Component: fortran
        AssignedTo: unassigned@gcc.gnu.org
        ReportedBy: billingd@gcc.gnu.org
                CC: gcc-bugs@gcc.gnu.org

Steven Kargl (kargl@troutmask.apl.washington.edu) reports:

980519-2.f contains illegal Fortran; yet g77 compiles
it without a warning or an error.  A cut-down version 
of 980519-2.f is

      subroutine simul_trace(in, Xsp)

      common /Idim/ jT_f, hd_T, jT_l
      
      real Xsp
      real in(jT_f-hd_T:jT_l)
      
      in(jT_f-hd_T) = Xsp
      end

The expression jT_f-hd_T is illegal because
hd_T is a real variable.

[Bug fortran/11139] Non-standard code in test 980519-2.f

[toon at gcc dot gnu dot org]

PLEASE REPLY TO gcc-bugzilla@gcc.gnu.org ONLY, *NOT* gcc-bugs@gcc.gnu.org.

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


toon at gcc dot gnu dot org changed:

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


------- Additional Comments From toon at gcc dot gnu dot org  2003-07-03 20:36 -------
The code is rejected with g77 -fpedantic, as it should.

Without that flag it is accepted as an extension.

I cannot find why this testcase was added, so I leave it as-is.

Cheers,
Toon Moene.