[Bug fortran/86545] [6/7/8/9 Regression] ICE in transfer_expr on invalid WRITE statement

[janus at gcc dot gnu.org]

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

--- Comment #6 from janus at gcc dot gnu.org ---
(In reply to janus from comment #5)
> I'm now testing the following patch, which fixes the problem:

Regtests cleanly.