2015-10-31 Cesar Philippidis PR Bootstrap/68168 gcc/fortran/ * openmp.c (resolve_omp_clauses): Pass &n->where when calling gfc_error. diff --git a/gcc/fortran/openmp.c b/gcc/fortran/openmp.c index 3fd19b8..e59139c 100644 --- a/gcc/fortran/openmp.c +++ b/gcc/fortran/openmp.c @@ -2922,7 +2922,7 @@ resolve_omp_clauses (gfc_code *code, gfc_omp_clauses *omp_clauses, { if (!code && (!n->sym->attr.dummy || n->sym->ns != ns)) gfc_error ("Variable %qs is not a dummy argument at %L", - n->sym->name, n->where); + n->sym->name, &n->where); continue; } if (n->sym->attr.flavor == FL_PROCEDURE