Re: [Patch, fortran] PR121972 - [PDT] Fix for the pdt_86 leak.

Hi Jerry, Paul,

Am 23.06.26 um 9:28 PM schrieb Jerry D:
> The master branch has been updated by Jerry DeLisle 
> <[email protected]>:
> 
> https://gcc.gnu.org/g:9579e3eb64ec89c4c0781bb0a59409f15c997213
> 
> commit r17-1786-g9579e3eb64ec89c4c0781bb0a59409f15c997213
> Author: Jerry DeLisle <[email protected]>
> Date:   Fri Jun 19 14:54:00 2026 -0700
> 
> The fix for the leak in pdt_82.f03
[...]
>>>>> I'd rather leave the review to Paul, but I have one question:
>>>>> As is, the new helper has_class_alloc_comp might return true for
>>>>> pointer components, but I think it should not.
>>>>>
>>>>> Can you please check?
>>>>>
>>>>
>>>> Harald, I think you are right. I changed it to this:
>>>>
>>>> static bool
>>>> has_class_alloc_comp (gfc_symbol *der)
>>>> {
>>>>     for (gfc_component *c = der->components; c; c = c->next)
>>>>       if (c->ts.type == BT_CLASS && !c->attr.pointer)
>>>>         return true;
>>>>     return false;
>>>> }

This should have been attr.class_pointer, the above does
not do what you think.  But given Paul's comment, it is
not relevant.