From 2c04e0d951131a39477d7de400b80e45ebb22219 Mon Sep 17 00:00:00 2001 From: Keith Seitz Date: Fri, 2 Oct 1998 19:55:41 +0000 Subject: [PATCH] * gdbtk-hooks.c (gdbtk_exec_file_changed): New function which handles exec_file changes. (gdbtk_add_hooks): Define exec_file_display_hook (to gdbtk_exec_file_changed) * gdbtk-cmds.c (gdb_stop): target_stop is ALWAYS defined, so compare against something a little more meaningful (target_ignore). --- gdb/ChangeLog-gdbtk | 9 +++++++++ gdb/gdbtk-cmds.c | 4 +--- gdb/gdbtk-hooks.c | 23 +++++++++++++++++------ 3 files changed, 27 insertions(+), 9 deletions(-) diff --git a/gdb/ChangeLog-gdbtk b/gdb/ChangeLog-gdbtk index f629f37acc4..022911d733c 100644 --- a/gdb/ChangeLog-gdbtk +++ b/gdb/ChangeLog-gdbtk @@ -1,3 +1,12 @@ +1998-10-02 Keith Seitz + + * gdbtk-hooks.c (gdbtk_exec_file_changed): New function which handles + exec_file changes. + (gdbtk_add_hooks): Define exec_file_display_hook (to gdbtk_exec_file_changed) + + * gdbtk-cmds.c (gdb_stop): target_stop is ALWAYS defined, so + compare against something a little more meaningful (target_ignore). + 1998-09-24 Keith Seitz * gdbtk.c (gdbtk_wait): Don't run the timer for ice targets. diff --git a/gdb/gdbtk-cmds.c b/gdb/gdbtk-cmds.c index 9a22d3e4a12..35890be0b1b 100644 --- a/gdb/gdbtk-cmds.c +++ b/gdb/gdbtk-cmds.c @@ -565,10 +565,8 @@ gdb_stop (clientData, interp, objc, objv) int objc; Tcl_Obj *CONST objv[]; { - if (target_stop) - { + if (target_stop != target_ignore) target_stop (); - } else quit_flag = 1; /* hope something sees this */ diff --git a/gdb/gdbtk-hooks.c b/gdb/gdbtk-hooks.c index ff2e7f51d90..3908ddec5c0 100644 --- a/gdb/gdbtk-hooks.c +++ b/gdb/gdbtk-hooks.c @@ -77,7 +77,6 @@ extern int (*ui_load_progress_hook) PARAMS ((char *, unsigned long)); extern void (*pre_add_symbol_hook) PARAMS ((char *)); extern void (*post_add_symbol_hook) PARAMS ((void)); extern void (*selected_frame_level_changed_hook) PARAMS ((int)); - #ifdef __CYGWIN32__ extern void (*ui_loop_hook) PARAMS ((int)); #endif @@ -88,6 +87,7 @@ static void gdbtk_modify_tracepoint PARAMS ((struct tracepoint *)); 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 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 *)); @@ -144,18 +144,21 @@ gdbtk_add_hooks(void) delete_breakpoint_hook = gdbtk_delete_breakpoint; modify_breakpoint_hook = gdbtk_modify_breakpoint; - interactive_hook = gdbtk_interactive; - target_wait_hook = gdbtk_wait; - ui_load_progress_hook = gdbtk_load_hash; + interactive_hook = gdbtk_interactive; + target_wait_hook = gdbtk_wait; + ui_load_progress_hook = gdbtk_load_hash; + #ifdef __CYGWIN32__ ui_loop_hook = x_event; #endif - pre_add_symbol_hook = gdbtk_pre_add_symbol; - post_add_symbol_hook = gdbtk_post_add_symbol; + pre_add_symbol_hook = gdbtk_pre_add_symbol; + post_add_symbol_hook = gdbtk_post_add_symbol; + exec_file_display_hook = gdbtk_exec_file_changed; create_tracepoint_hook = gdbtk_create_tracepoint; delete_tracepoint_hook = gdbtk_delete_tracepoint; modify_tracepoint_hook = gdbtk_modify_tracepoint; + pc_changed_hook = pc_changed; selected_frame_level_changed_hook = gdbtk_selected_frame_changed; context_hook = gdbtk_context_change; @@ -702,3 +705,11 @@ gdbtk_context_change (num) { gdb_context = num; } + +/* Called from exec_file_command */ +static void +gdbtk_exec_file_changed (filename) + char *filename; +{ + gdbtk_two_elem_cmd ("gdbtk_tcl_exec_file_changed", filename); +} -- 2.30.2