[PATCH, Fortran] PR fortran/60289 First try on: Fixing character array allocation for class(*) type variable

[Dominique Dhumieres]

> My knowledge of unlimited polymorphic types is limited, but I think that
> this is not correct.

My knowledge of unlimited polymorphic types is even more limited,
then I cannot comment about the correctness of the patch. However

> The new length of the string has to be stored somewhere.  If you don't
> do that, for example the intrinsic len() function won't work.

if I add a line

            if (len(P) /= 20) call abort()

in the 'type is (character(*))' block, the test still succeeds.

Dominique