summaryrefslogtreecommitdiff
path: root/gcc/fortran/error.c
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/fortran/error.c')
-rw-r--r--gcc/fortran/error.c3
1 files changed, 3 insertions, 0 deletions
diff --git a/gcc/fortran/error.c b/gcc/fortran/error.c
index da0eb8f664..683aa5964f 100644
--- a/gcc/fortran/error.c
+++ b/gcc/fortran/error.c
@@ -804,6 +804,9 @@ gfc_clear_pp_buffer (output_buffer *this_buffer)
pp->buffer = this_buffer;
pp_clear_output_area (pp);
pp->buffer = tmp_buffer;
+ /* We need to reset last_location, otherwise we may skip caret lines
+ when we actually give a diagnostic. */
+ global_dc->last_location = UNKNOWN_LOCATION;
}