https://gcc.gnu.org/bugzilla/show_bug.cgi?id=78278
--- Comment #4 from Dominique d'Humieres <dominiq at lps dot ens.fr> --- The ICE seems fixed on 7.2.0 and trunk (8.0), probably r243647. Note that compiling the code in comment 0 with -std=f95 does not trigger the error Error: GNU Extension: re-initialization of 'x' at (1)