[Bug fortran/48202] New: Internal compiler error

[pmarguinaud at hotmail dot com]

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

           Summary: Internal compiler error
           Product: gcc
           Version: 4.5.2
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned@gcc.gnu.org
        ReportedBy: pmarguinaud@hotmail.com


The following piece of code caused gfortran to report an ICE, when used with
the following options : " -c -fopenmp -O2 ".

The code follows :

__

SUBROUTINE ESLEXTPOL(KASLB1,KMASK3)  

IMPLICIT NONE

INTEGER,INTENT(IN)    :: KASLB1  
INTEGER,OPTIONAL,INTENT(OUT)   :: KMASK3(KASLB1) 

!$OMP  PARALLEL
IF (PRESENT(KMASK3)) KMASK3=1
!$OMP END PARALLEL

END SUBROUTINE ESLEXTPOL

__