[Bug fortran/83042] [7/8 regression] ICE on valid code

[pault at gcc dot gnu.org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=83042

--- Comment #7 from Paul Thomas <pault at gcc dot gnu.org> ---
Created attachment 42721
  --> https://gcc.gnu.org/bugzilla/attachment.cgi?id=42721&action=edit
A fix for this PR and PR83021

A fix for this PR

This fixes the problem and boostraps/regtests OK.

Paul