[Bug fortran/36239] New: ICE: gfc_validate_kind(): Got bad kind

["burnus at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>]

James Van Buskirk found the following bug, see
http://groups.google.com/group/comp.lang.fortran/browse_thread/thread/1cc4ce4ecec2933d


         integer, parameter :: k_k11 = kind(int(Parg1,kind=k11))
                                                               1
Internal Error at (1):
gfc_validate_kind(): Got bad kind


 module bugmod
   parameter(ik1 = selected_int_kind(2))
   implicit complex (P)
   contains
      subroutine bug1(P1)
         integer(ik1), parameter :: k11 = ik1
         complex, parameter :: carg1 = 0
         parameter(Parg1 = carg1)
         integer, parameter :: k_k11 = kind(int(Parg1,kind=k11))
      end subroutine bug1
end module bugmod


-- 
           Summary: ICE: gfc_validate_kind(): Got bad kind
           Product: gcc
           Version: 4.4.0
            Status: UNCONFIRMED
          Keywords: ice-on-valid-code
          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=36239