------- Comment #4 from pinskia at gcc dot gnu dot org 2006-01-02 03:59 -------
Reduced testcase which shows that the outer function does not have to return an
array to get the ICE:
FUNCTION dawson_v()
IMPLICIT NONE
REAL :: dawson_v
CONTAINS
FUNCTION dawsonseries_v()
IMPLICIT NONE
REAL, DIMENSION(1) :: dawsonseries_v
dawsonseries_v=1.0
END FUNCTION dawsonseries_v
END FUNCTION dawson_v
--
pinskia at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
Last reconfirmed|2006-01-02 03:53:40 |2006-01-02 03:59:42
date| |
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=21977
