[Bug fortran/68196] [4.9/5/6 Regression] ICE on function result with procedure pointer component

[dominiq at lps dot ens.fr]

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

--- Comment #3 from Dominique d'Humieres <dominiq at lps dot ens.fr> ---
The patch in comment 2 looks good (works as advertised without regression, no
duplicate in store)!