diff options
| author | Keith Seitz <keiths@cygnus> | 1998-04-07 20:05:02 +0000 |
|---|---|---|
| committer | Keith Seitz <keiths@cygnus> | 1998-04-07 20:05:02 +0000 |
| commit | 4350602ff514f1c31ad98ed01a72417089479d74 (patch) | |
| tree | ed0a1b8bab52a812d1e4eea413e3b4daf41ee19a /gdb/gdbtk.c | |
| parent | d02731be5c02a562621848a815c82845f6949521 (diff) | |
| download | gdb-4350602ff514f1c31ad98ed01a72417089479d74.zip gdb-4350602ff514f1c31ad98ed01a72417089479d74.tar.gz gdb-4350602ff514f1c31ad98ed01a72417089479d74.tar.bz2 | |
* gdbtk.c (gdb_cmd): NEVER call the busy, update, and idle hooks.
Diffstat (limited to 'gdb/gdbtk.c')
| -rw-r--r-- | gdb/gdbtk.c | 13 |
1 files changed, 5 insertions, 8 deletions
diff --git a/gdb/gdbtk.c b/gdb/gdbtk.c index b3d110f..1a0660a 100644 --- a/gdb/gdbtk.c +++ b/gdb/gdbtk.c @@ -162,7 +162,6 @@ static int gdb_get_tracepoint_info PARAMS ((ClientData, Tcl_Interp *, int, Tcl_O static int gdb_actions_command PARAMS ((ClientData, Tcl_Interp *, int, Tcl_Obj *CONST objv[])); static int gdb_prompt_command PARAMS ((ClientData, Tcl_Interp *, int, Tcl_Obj *CONST objv[])); static int gdb_find_file_command PARAMS ((ClientData, Tcl_Interp *, int, Tcl_Obj *CONST objv[])); -static char *find_file_in_dir PARAMS ((char *)); static int gdb_get_tracepoint_list PARAMS ((ClientData, Tcl_Interp *, int, Tcl_Obj *CONST objv[])); static void gdbtk_create_tracepoint PARAMS ((struct tracepoint *)); static void gdbtk_delete_tracepoint PARAMS ((struct tracepoint *)); @@ -1067,6 +1066,8 @@ gdb_changed_register_list (clientData, interp, argc, argv) /* This implements the tcl command "gdb_immediate", which does exactly the same thing as gdb_cmd, except NONE of its outut is buffered. */ +/* This will also ALWAYS cause the busy,update, and idle hooks to be + called, contrasted with gdb_cmd, which NEVER calls them. */ static int gdb_immediate_command (clientData, interp, argc, argv) ClientData clientData; @@ -1099,7 +1100,8 @@ gdb_immediate_command (clientData, interp, argc, argv) /* This implements the TCL command `gdb_cmd', which sends its argument into the GDB command scanner. */ - +/* This command will never cause the update, idle and busy hooks to be called + within the GUI. */ static int gdb_cmd (clientData, interp, argc, argv) ClientData clientData; @@ -1115,12 +1117,7 @@ gdb_cmd (clientData, interp, argc, argv) if (running_now || load_in_progress) return TCL_OK; - /* If there is a third argument, it'll mean that we do NOT want to run - the idle and busy hooks when we call execute_command. */ - if (argc > 2) - No_Update = 1; - else - No_Update = 0; + No_Update = 1; /* for the load instruction (and possibly others later) we set result_ptr to NULL so gdbtk_fputs() will not buffer |