------- Comment #8 from reichelt at gcc dot gnu dot org 2006-07-03 18:35 ------- With the following testcase I still get an internal error:
================================================= module FOO contains subroutine FOO integer :: I character(len=selected_int_kind(I)) :: C, D, E, F, G end subroutine end ================================================= In file PR18923.f90:3 subroutine FOO 1 Error: MODULE attribute conflicts with PROCEDURE attribute at (1) In file PR18923.f90:4 integer :: I 1 Error: Unexpected data declaration statement in CONTAINS section at (1) In file PR18923.f90:5 character(len=selected_int_kind(I)) :: C, D, E, F, G 1 Error: Unexpected data declaration statement in CONTAINS section at (1) In file PR18923.f90:6 end subroutine 1 Error: Expecting END MODULE statement at (1) In file PR18923.f90:7 end 1 Internal Error at (1): gfc_get_default_type(): Bad symbol -- reichelt at gcc dot gnu dot org changed: What |Removed |Added ---------------------------------------------------------------------------- Status|RESOLVED |REOPENED Resolution|WORKSFORME | http://gcc.gnu.org/bugzilla/show_bug.cgi?id=18923