From: Cesar Philippidis Date: Sat, 31 Oct 2015 17:55:03 +0000 (-0700) Subject: re PR bootstrap/68168 (r229609 breaks bootstrap) X-Git-Tag: upstream/12.2.0~51279 X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=d057afcdca7fedd93f85a7f2e8af06ed156c51bf;p=platform%2Fupstream%2Fgcc.git re PR bootstrap/68168 (r229609 breaks bootstrap) PR Bootstrap/68168 gcc/fortran/ * openmp.c (resolve_omp_clauses): Pass &n->where when calling gfc_error. From-SVN: r229631 --- diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 8b180ab..a7c2cef 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,10 @@ +2015-10-31 Cesar Philippidis + + PR Bootstrap/68168 + + * openmp.c (resolve_omp_clauses): Pass &n->where when calling + gfc_error. + 2015-10-30 Cesar Philippidis * gfortran.h (gfc_omp_namespace): Add locus where member. 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