The following testcase should issue an error in strict F95 mode:

REAL FUNCTION funct()
  funct = 0.0
  RETURN
!
  ENTRY enter RESULT (answer)
  answer = 1.0
  RETURN
END FUNCTION funct

The f95 standard forbids
  ENTRY enter RESULT (answer)
because Section 12.5.2.5 syntax rule R1225 says
  ENTRY entry-name [([dummy-argument-list]) [RESULT(result-name)]]
which would require at least
  ENTRY enter() RESULT (answer)

The Portland and Lahey compilers indeed reject that code.

-- 
           Summary: gfortran too permissive about ENTRY syntax
           Product: gcc
           Version: 4.1.0
            Status: UNCONFIRMED
          Severity: minor
          Priority: P2
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: fxcoudert at gcc dot gnu dot org
                CC: gcc-bugs at gcc dot gnu dot org


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

Reply via email to