[Bug fortran/66633] ICE on valid "verify_gimple failed" with OpenMP

[abensonca at gmail dot com]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=66633

--- Comment #1 from Andrew Benson <abensonca at gmail dot com> ---
Further reduced test case:

module spls
contains
  function spl()
    !$omp parallel
    write (0,*) igrt(fli)
    !$omp end parallel
  contains
    double precision function fli()
    end function fli
  end function spl
end module spls