diff options
| author | Thomas Koenig <tkoenig@gcc.gnu.org> | 2016-11-06 21:27:32 +0000 |
|---|---|---|
| committer | Thomas Koenig <tkoenig@gcc.gnu.org> | 2016-11-06 21:27:32 +0000 |
| commit | eb950bf834c56ca0cb28286847335768ddd77534 (patch) | |
| tree | f204cd221212918e08dfbddac079db69b9d03788 /gcc/fortran/resolve.c | |
| parent | cc03bf7a7bf6bb0a11f7fa90ead51eec7d770af9 (diff) | |
| download | gcc-eb950bf834c56ca0cb28286847335768ddd77534.zip gcc-eb950bf834c56ca0cb28286847335768ddd77534.tar.gz gcc-eb950bf834c56ca0cb28286847335768ddd77534.tar.bz2 | |
re PR fortran/78226 (Fill out location information everywhere)
2016-11-06 Thomas Koenig <tkoenig@gcc.gnu.org>
PR fortran/78226
resolve.c (build_loc_call): Add location to return value.
From-SVN: r241887
Diffstat (limited to 'gcc/fortran/resolve.c')
| -rw-r--r-- | gcc/fortran/resolve.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/gcc/fortran/resolve.c b/gcc/fortran/resolve.c index 9620ce6..7725371 100644 --- a/gcc/fortran/resolve.c +++ b/gcc/fortran/resolve.c @@ -8457,6 +8457,7 @@ build_loc_call (gfc_expr *sym_expr) loc_call->value.function.isym = gfc_intrinsic_function_by_id (GFC_ISYM_LOC); loc_call->value.function.actual = gfc_get_actual_arglist (); loc_call->value.function.actual->expr = sym_expr; + loc_call->where = sym_expr->where; return loc_call; } |