[Bug fortran/77703] [7/8/9 Regression] ICE on assignment to pointer function

[dominiq at lps dot ens.fr]

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

--- Comment #10 from Dominique d'Humieres <dominiq at lps dot ens.fr> ---
After r267379, the test in comment 4 gives a segfault at run time.