https://gcc.gnu.org/bugzilla/show_bug.cgi?id=96085
--- Comment #3 from anlauf at gcc dot gnu.org --- (In reply to anlauf from comment #2) That one produces a strange regression with pr50392.f. Patch that regtests fine: diff --git a/gcc/fortran/resolve.c b/gcc/fortran/resolve.c index 223dcccce91..c88b76a232a 100644 --- a/gcc/fortran/resolve.c +++ b/gcc/fortran/resolve.c @@ -11900,6 +11902,7 @@ start: || code->expr1->symtree->n.sym->ts.type != BT_INTEGER || code->expr1->symtree->n.sym->ts.kind != gfc_default_integer_kind + || code->expr1->symtree->n.sym->attr.flavor == FL_PARAMETER || code->expr1->symtree->n.sym->as != NULL)) gfc_error ("ASSIGN statement at %L requires a scalar " "default INTEGER variable", &code->expr1->where);