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 (file)
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,10 @@
+2015-10-31  Cesar Philippidis  <cesar@codesourcery.com>
+
+       PR Bootstrap/68168
+
+       * openmp.c (resolve_omp_clauses): Pass &n->where when calling
+       gfc_error.
+
 2015-10-30  Cesar Philippidis  <cesar@codesourcery.com>
 
        * 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 (file)
--- 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