[Patch, fortran] PR69423 - [6 Regression] Invalid optimization with deferred-length character

[Thomas Koenig]

Hi Paul,

> More importantly, now that it has happened in the field, I
> must fix the collisions in SELECT TYPE. The only way that I know to do
> this reliably is to drop the use of a has and to use the extended type
> names directly

Can you also use the hash in the usual case and only do a name-by-name
comparison in the case of hash collision?

I think this is the standard method of dealing with such cases.

Regards

	Thomas