+1998-10-08 Keith Seitz <keiths@cygnus.com>
+
+ * gdbtk-hooks.c (gdbtk_add_hooks): Install a hook for
+ (new) file_changed_hook.
+ (gdbtk_exec_file_changed): Rename to gdbtk_exec_file_display
+ to mimic hook's name.
+ (gdbtk_file_changed): New hook function.
+
Tue Oct 6 22:57:13 1998 Andrew Cagney <cagney@b1.cygnus.com>
* configure.in (links): Link gdbtcl2 directory instead of gdbtcl.
static void gdbtk_create_breakpoint PARAMS ((struct breakpoint *));
static void gdbtk_delete_breakpoint PARAMS ((struct breakpoint *));
static void gdbtk_modify_breakpoint PARAMS ((struct breakpoint *));
-static void gdbtk_exec_file_changed PARAMS ((char *));
+static void gdbtk_file_changed PARAMS ((char *));
+static void gdbtk_exec_file_display PARAMS ((char *));
static void tk_command_loop PARAMS ((void));
static void gdbtk_call_command PARAMS ((struct cmd_list_element *, char *, int));
static int gdbtk_wait PARAMS ((int, struct target_waitstatus *));
#endif
pre_add_symbol_hook = gdbtk_pre_add_symbol;
post_add_symbol_hook = gdbtk_post_add_symbol;
- exec_file_display_hook = gdbtk_exec_file_changed;
+ file_changed_hook = gdbtk_file_changed;
+ exec_file_display_hook = gdbtk_exec_file_display;
create_tracepoint_hook = gdbtk_create_tracepoint;
delete_tracepoint_hook = gdbtk_delete_tracepoint;
gdb_context = num;
}
+/* Called from file_command */
+static void
+gdbtk_file_changed (filename)
+ char *filename;
+{
+ gdbtk_two_elem_cmd ("gdbtk_tcl_file_changed", filename);
+}
+
/* Called from exec_file_command */
static void
-gdbtk_exec_file_changed (filename)
+gdbtk_exec_file_display (filename)
char *filename;
{
- gdbtk_two_elem_cmd ("gdbtk_tcl_exec_file_changed", filename);
+ gdbtk_two_elem_cmd ("gdbtk_tcl_exec_file_display", filename);
}