gdb: fix shellcheck warnings SC2154 (referenced but not assigned) in gdbarch.sh

[deliverable/binutils-gdb.git] / gdb / f-typeprint.c

diff --git a/gdb/f-typeprint.c b/gdb/f-typeprint.c
index 72a4188fbb9130bd1e3817cc432c79b85df7d0d1..e4a2beb930b422f705ff4c329b3ccd9ea47da0de 100644 (file)
--- a/gdb/f-typeprint.c
+++ b/gdb/f-typeprint.c
@@ -435,7 +435,8 @@ f_type_print_base (struct type *type, struct ui_file *stream, int show,
              f_type_print_base (TYPE_FIELD_TYPE (type, index), stream,
                                 show - 1, level + 4);
              fputs_filtered (" :: ", stream);
-             fputs_filtered (TYPE_FIELD_NAME (type, index), stream);
+             fputs_styled (TYPE_FIELD_NAME (type, index),
+                           variable_name_style.style (), stream);
              f_type_print_varspec_suffix (TYPE_FIELD_TYPE (type, index),
                                           stream, show - 1, 0, 0, 0, false);
              fputs_filtered ("\n", stream);