Hi Paul,

isn't the ref you are computing here:

+      /* Mark so that rhs "used unallocated" warnings can be issued.
  Component
+        references do not generate the warnings.  */
+      for (ref = expr1->ref; ref; ref = ref->next)
+       if (ref->type == REF_COMPONENT)
+         break;

not the same you compute before the outer if? I see at least no change
to it in between.

I haven't tested your patch yet, but will do when I have some grid
power for my notebook. I am wondering what happens, when one uses a
coarray here.

Thanks for the patch.

Regards,
        Andre


On Thu, 18 Jul 2024 06:55:14 +0100
Paul Richard Thomas <paul.richard.tho...@gmail.com> wrote:

> Hi All,
>
> This patch is simple and well described by the ChangeLogs and the
> comments. Regtests OK.
>
> OK for mainline and backporting?
>
> Cheers
>
> Paul



--
Andre Vehreschild * Email: vehre ad gcc dot gnu dot org

Reply via email to