The following program is presumably invalid (I have not checked the standard).
ifort and sunf95 reject it with:

warning #6755: A COMMON block data object may not have the SAVE attribute.

ERROR: Object "I2" has the SAVE attribute, so it must not be equivalenced to an
object in a common block.

Ad hoc I don't see why it is only a warning and not an error with ifort.

(g95, gfortran, NAG 95 accept it without warning.)


integer :: i1, i2
common /block/ i1
save i2
equivalence(i1,i2)
end


-- 
           Summary: Reject SAVEd variables EQUIVALENCEd to a COMMON
           Product: gcc
           Version: 4.4.0
            Status: UNCONFIRMED
          Keywords: accepts-invalid
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: burnus at gcc dot gnu dot org


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

Reply via email to