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.

Reply via email to