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

[juergen.reuter at desy dot de]

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

--- Comment #34 from Jürgen Reuter <juergen.reuter at desy dot de> ---
So, to summarise all of our code, at least our basic and extended tests, work
again with this (second) patch by Paul Thomas, for all different kind types of
our default reals (64, 80, emulated 128 bit). Thanks for the quick fix.