[Bug fortran/69455] [5/6/7 Regression] [F08] Assembler error(s) when using intrinsic modules in two BLOCK

[dominiq at lps dot ens.fr]

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

--- Comment #11 from Dominique d'Humieres <dominiq at lps dot ens.fr> ---
> A two line patch (or one rather long line) is sufficient to work
> around the brokeness of the intrinsics modules.

"Un qui sait vaut mieux que dix qui cherchent!" Could you please be kind enough
to post the patch?