diff options
| author | Cesar Philippidis <cesar@codesourcery.com> | 2015-10-31 10:55:03 -0700 |
|---|---|---|
| committer | Cesar Philippidis <cesar@gcc.gnu.org> | 2015-10-31 10:55:03 -0700 |
| commit | d057afcdca7fedd93f85a7f2e8af06ed156c51bf (patch) | |
| tree | 7ed534108fdd44866e8a39fff352fc02f4f26f28 /gcc | |
| parent | 64c7c0953f3d27fee96163a85bbf688b6ab898c5 (diff) | |
| download | gcc-d057afcdca7fedd93f85a7f2e8af06ed156c51bf.zip gcc-d057afcdca7fedd93f85a7f2e8af06ed156c51bf.tar.gz gcc-d057afcdca7fedd93f85a7f2e8af06ed156c51bf.tar.bz2 | |
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
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/fortran/ChangeLog | 7 | ||||
| -rw-r--r-- | gcc/fortran/openmp.c | 2 |
2 files changed, 8 insertions, 1 deletions
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 <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 --- 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 |