https://gcc.gnu.org/bugzilla/show_bug.cgi?id=77393
--- Comment #7 from Dominique d'Humieres <dominiq at lps dot ens.fr> --- > Works for me here! Are you sure that you have tested print "(f8.0)", huge(1.0) print "(f18.0)", huge(1.0_8) print "(f20.0)", huge(1.0_10) print "(f40.0)", huge(1.0_16) end ?