https://gcc.gnu.org/bugzilla/show_bug.cgi?id=56985
Andrew Pinski <pinskia at gcc dot gnu.org> changed: What |Removed |Added ---------------------------------------------------------------------------- Last reconfirmed| |2021-08-30 Status|UNCONFIRMED |NEW Ever confirmed|0 |1 --- Comment #1 from Andrew Pinski <pinskia at gcc dot gnu.org> --- if (UNLIMITED_POLY (csym)) gfc_error_now ("%qs in cannot appear in COMMON at %L " "[F2008:C5100]", csym->name, &csym->declared_at); Should most likely be: if (UNLIMITED_POLY (csym)) gfc_error_now ("Variable %qs in cannot appear in COMMON at %L " "[F2008:C5100]", csym->name, &csym->declared_at);