aboutsummaryrefslogtreecommitdiff
path: root/gcc/fortran/error.cc
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/fortran/error.cc')
-rw-r--r--gcc/fortran/error.cc4
1 files changed, 3 insertions, 1 deletions
diff --git a/gcc/fortran/error.cc b/gcc/fortran/error.cc
index 36961e5..2db192c 100644
--- a/gcc/fortran/error.cc
+++ b/gcc/fortran/error.cc
@@ -606,7 +606,9 @@ gfc_diagnostic_text_starter (diagnostic_text_output_format &text_output,
pp_newline (pp);
pp_set_prefix (pp, NULL);
pp_newline (pp);
- diagnostic_show_locus (context, diagnostic->richloc, diagnostic->kind,
+ diagnostic_show_locus (context,
+ text_output.get_source_printing_options (),
+ diagnostic->richloc, diagnostic->kind,
pp);
/* If the caret line was shown, the prefix does not contain the
locus. */