Additional Comments From pinskia at gcc dot gnu dot org 2005-06-06 00:41 Fixed in 4.0.1, we no longer get an internal error: In file t.f:3 subroutine foo(i) 1 Error: PRGRAM attribute conflicts with PRCEDURE attribute at (1) In file t.f:4 integer :: i 1 Error: Unexpected data declaration statement in CNTAINS section at (1) In file t.f:5 character(len=selected_int_kind(i)) :: c 1 Error: Unexpected data declaration statement in CNTAINS section at (1) In file t.f:6 end subroutine bar 1 Error: Expecting END PRGRAM statement at (1) In file t.f:5 character(len=selected_int_kind(i)) :: c 1 Error: Expression at (1) must be of INTEGER type In file t.f:5 character(len=selected_int_kind(i)) :: c 1 Error: Expression at (1) must be of INTEGER type