https://gcc.gnu.org/bugzilla/show_bug.cgi?id=68151
Bug ID: 68151 Summary: ICE on using select case with function of wrong type Product: gcc Version: 5.2.1 Status: UNCONFIRMED Severity: normal Priority: P3 Component: fortran Assignee: unassigned at gcc dot gnu.org Reporter: gerhard.steinmetz.fort...@t-online.de Target Milestone: --- A select case with a function value of wrong type : $ cat z1.f90 program p integer :: k = 1 select case (k) case (:huge(1._8)) end select end $ gfortran -g -O0 -Wall -fcheck=all z1.f90 f951: internal compiler error: gfc_trans_select(): Bad type for case expr. --- Whereas, detected with real(4) result : $ cat z2.f90 program p integer :: k = 1 select case (k) case (:huge(1._4)) end select end $ gfortran z2.f90 z2.f90:4:10: case (:huge(1._4)) 1 Error: Expression in CASE statement at (1) must be of type INTEGER