https://gcc.gnu.org/bugzilla/show_bug.cgi?id=62242
--- Comment #2 from Joost VandeVondele <Joost.VandeVondele at mat dot ethz.ch> --- Further reduced: > cat bug.f90.orig module gfbug contains pure function UpperCase(string) result(upper) character(*), intent(IN) :: string character(LEN(string)) :: upper upper=string end function pure function isNotElementOf(array) result(status) logical :: status character(*), intent(IN) :: array(:) status = ANY("a"==(/UpperCase(array(1))/)) end function end module gfbug which yields the same segfault. A differently reduced testcase, however, yield a FE segfault and has been added as PR62246.