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