------- Additional Comments From reichelt at gcc dot gnu dot org 2004-09-30 15:32
-------
Confirmed. Here's a reduced testcase:
=========================================
module FOO
interface BAR
module procedure BAR2
end interface
contains
elemental integer function BAR2(X)
integer, intent(in) :: X
BAR2 = 0
end function
subroutine BAZ
integer :: Y(3), Z(3)
Z = BAR(Y)
end subroutine
end module
=========================================
With mainline I get:
f951: ../../gcc/gcc/fortran/trans-expr.c:1776: gfc_trans_arrayfunc_assign:
Assertion `expr2->value.function.isym || (gfc_return_by_reference
(expr2->symtree->n.sym) && expr2->symtree->n.sym->result->attr.dimension)'
failed.
PR17740.f90: In function `baz':
PR17740.f90:12: internal compiler error: Aborted
Btw, ifort 8.1 segfaults on this code snippet.
--
What |Removed |Added
----------------------------------------------------------------------------
CC| |reichelt at gcc dot gnu dot
| |org
Status|UNCONFIRMED |NEW
Ever Confirmed| |1
Keywords| |ice-on-valid-code, monitored
Last reconfirmed|0000-00-00 00:00:00 |2004-09-30 15:32:52
date| |
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=17740
