aboutsummaryrefslogtreecommitdiff
path: root/gdb/f-lang.c
diff options
context:
space:
mode:
authorSimon Marchi <simon.marchi@efficios.com>2019-11-26 12:12:01 -0500
committerSimon Marchi <simon.marchi@efficios.com>2019-11-26 14:29:20 -0500
commitcb8c24b66178a2b7efcfa396ac54fb7252493d9c (patch)
tree1b74af88b70102fcc90db226e7e7ee1d98407538 /gdb/f-lang.c
parent781597ff9a5d876153b38a72bc88632463352208 (diff)
downloadgdb-cb8c24b66178a2b7efcfa396ac54fb7252493d9c.zip
gdb-cb8c24b66178a2b7efcfa396ac54fb7252493d9c.tar.gz
gdb-cb8c24b66178a2b7efcfa396ac54fb7252493d9c.tar.bz2
Make a bunch of functions static
All these functions are only used in their respective files, they are missing the static keyword, add them. gdb/ChangeLog: * arc-tdep.c (arc_insn_get_memory_base_reg): Make static. (arc_insn_get_memory_offset): Likewise. (arc_insn_dump): Likewise. * cp-support.c (test_cp_symbol_name_matches): Likewise. * csky-linux-tdep.c (csky_supply_fregset): Likewise. * dictionary.c (dict_iterator_next): Likewise. (dict_iter_match_first): Likewise. (dict_iter_match_next): Likewise. * f-lang.c (evaluate_subexp_f): Likewise. * hppa-tdep.c (hppa_read_pc): Likewise. * i386-tdep.c (i386_floatformat_for_type): Likewise. * parse.c (write_exp_elt_msym): Likewise. * ppc-linux-tdep.c (ppc_floatformat_for_type): Likewise. * remote.c (remote_packet_size): Likewise. (remote_notif_stop_parse): Likewise. * rs6000-aix-tdep.c (aix_sighandle_frame_sniffer): Likewise. * s12z-tdep.c (s12z_disassemble_info): Likewise. * source.c (prepare_path_for_appending): Likewise. * sparc64-linux-tdep.c (sparc64_linux_handle_segmentation_fault); Likewise. * stack.c (frame_selection_by_function_completer): Likewise. Change-Id: I18e187ad279075b961e3e22e5b034f5c0f6188f0
Diffstat (limited to 'gdb/f-lang.c')
-rw-r--r--gdb/f-lang.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/gdb/f-lang.c b/gdb/f-lang.c
index fd4ad0f..022918e 100644
--- a/gdb/f-lang.c
+++ b/gdb/f-lang.c
@@ -243,7 +243,8 @@ f_collect_symbol_completion_matches (completion_tracker &tracker,
}
/* Special expression evaluation cases for Fortran. */
-struct value *
+
+static struct value *
evaluate_subexp_f (struct type *expect_type, struct expression *exp,
int *pos, enum noside noside)
{