[Bug fortran/27584] New: ICE on invalid "associate(x,(y))"

[tobias dot burnus at physik dot fu-berlin dot de]

I get an ICE using:
--------------------------
program test
   implicit none
   real, pointer :: x
   real, target :: y
   if(ASSOCIATED(X,(Y))) print *, 'Hello'
end program test
--------------------------
(If one corrects the error and uses associated(x,y), gfortran is happy.)

test2.f90:0: internal compiler error: in gfc_check_associated, at
fortran/check.c:535

g95:
In file test2.f90:5
   if(ASSOCIATED(X,(Y))) print *, 'Hello'
                     1
Error: 'target' argument of 'associated' intrinsic at (1) must be a POINTER or
a TARGET

ifort:
fortcom: Error: test2.f90, line 5: The TARGET argument must have the POINTER or
TARGET attribute.   [ASSOCIATED]
   if(ASSOCIATED(X,(Y))) print *, 'Hello'
--------------------^

NAGf95:
Error: test2.f90, line 5: TARGET arg to ASSOCIATED intrinsic not pointer/target


-- 
           Summary: ICE on invalid "associate(x,(y))"
           Product: gcc
           Version: 4.2.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: tobias dot burnus at physik dot fu-berlin dot de


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