[Bug fortran/84141] [8 regression] Internal error: type_name(): Bad type

[dominiq at lps dot ens.fr]

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

--- Comment #21 from Dominique d'Humieres <dominiq at lps dot ens.fr> ---
> A temporary fix:
> ...

Preliminary tests look good! Thanks.