Internal Compiler Error compiling a short module

[mecej4]

The Windows-32 (11.1.067), Linux-Intel64 (11.1.073) and IA64 (11.1.072) IFort compilers abort with a SIGSEG when applied to the following source code.

[fortran]MODULE DPKND
integer, parameter :: DP = KIND(1.0d0)
END MODULE DPKND

MODULE S_FUNOBJ
INTERFACE
   SUBROUTINE OBJFUN(Mode,X,Objf)
      USE DPKND
      IMPLICIT NONE
      INTEGER, INTENT(IN) :: Mode
      REAL(DP) , INTENT(IN) :: X
      REAL(DP) :: Objf
      INTENT (IN OUT) :: Objf
   END SUBROUTINE OBJFUN
END INTERFACE
END MODULE S_FUNOBJ
[/fortran]

The INTENT declaration is superfluous, and if it is removed the code gets compiled fine. Similarly, if the parameter DP is defined in the interface body instead of the USE DPKND statement, the compiler has no problems.

[Xiaoping_D_Intel]

Thanks for reporting the problem. I will submit a bug report and keep you updated.

- Xiaoping