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

[Mikael Morin]

Le 17/08/2014 14:46, Dominique Dhumieres a écrit :
>> 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.
> 
Yeah, well.  Good to know.
Then I don't understand what the allocation code is doing. :-/

Sorry, I can't devote more time to that right now.
Mikael