------- Comment #2 from sven dot buijssen at math dot uni-dortmund dot de
2006-02-01 16:36 -------
The patch fixes the regression, but introduces a new internal compiler error
for the following testcase:
--- cut here ---
% cat > ice.f90 <<EOF
module ice
implicit none
contains
subroutine foo()
contains
subroutine bar(baz)
integer :: baz
if (present(baz)) then
endif
end subroutine bar
end subroutine foo
end module
EOF
--- cut here ---
% gfortran -c ice.f90
ice.f90: In function 'bar':
ice.f90:8: internal compiler error: in gfc_typenode_for_spec, at
fortran/trans-types.c:651
Please submit a full bug report,
with preprocessed source if appropriate.
See <URL:http://gcc.gnu.org/bugs.html> for instructions.
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=26064
