------- Comment #4 from janus at gcc dot gnu dot org 2008-11-01 14:58 ------- A variant of comment #3 which gives a different error:
abstract interface function foo(x,y) character(len=*) :: x integer y(:) character(len=size(y)) :: foo end function foo end interface character(len=20) :: str procedure(foo) :: bar str = bar("Hello",(/1,2,3/)) end Here the error message is less cryptic: internal compiler error: in fold_convert, at fold-const.c:2527 -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=36426