mirror of
https://github.com/espressif/binutils-gdb.git
synced 2025-06-28 15:18:37 +08:00
Wed May 13 11:12:58 1998 James Ingham <jingham@leda.cygnus.com>
* gdbtk.c: Fixed a goof in the definition of the gdb_get_args & gdb_get_locals Tcl commands. Moved the previous ChangeLog entry from ChangeLog to ChangeLog-gdbtk...
This commit is contained in:
@ -1,10 +1,3 @@
|
|||||||
Tue May 12 12:03:16 1998 James Ingham <jingham@leda.cygnus.com>
|
|
||||||
|
|
||||||
* gdbtk.c: Add an object call wrapper for the new Tcl_Obj based
|
|
||||||
commands. This way the obj commands will also go through
|
|
||||||
catch_errors. This is just a bandaid while I rewrite the
|
|
||||||
string-based commands to use the object format.
|
|
||||||
|
|
||||||
Thu May 7 14:49:38 1998 Bob Manson <manson@charmed.cygnus.com>
|
Thu May 7 14:49:38 1998 Bob Manson <manson@charmed.cygnus.com>
|
||||||
|
|
||||||
* config/sparc/tm-sp64.h (CALL_DUMMY): Store and retrieve
|
* config/sparc/tm-sp64.h (CALL_DUMMY): Store and retrieve
|
||||||
|
@ -1,8 +1,22 @@
|
|||||||
|
Wed May 13 11:12:58 1998 James Ingham <jingham@leda.cygnus.com>
|
||||||
|
|
||||||
|
* gdbtk.c: Fixed a goof in the definition of the gdb_get_args &
|
||||||
|
gdb_get_locals Tcl commands. Moved the previous ChangeLog entry
|
||||||
|
from ChangeLog to ChangeLog-gdbtk (here)...
|
||||||
|
|
||||||
|
|
||||||
Tue May 12 13:29:20 1998 Jeff Holcomb <jeffh@cygnus.com>
|
Tue May 12 13:29:20 1998 Jeff Holcomb <jeffh@cygnus.com>
|
||||||
|
|
||||||
* Makefile.in (install-only): Add images/icons.txt and
|
* Makefile.in (install-only): Add images/icons.txt and
|
||||||
images2/icons.txt to files that need to be installed.
|
images2/icons.txt to files that need to be installed.
|
||||||
|
|
||||||
|
Tue May 12 12:03:16 1998 James Ingham <jingham@leda.cygnus.com>
|
||||||
|
|
||||||
|
* gdbtk.c: Add an object call wrapper for the new Tcl_Obj based
|
||||||
|
commands. This way the obj commands will also go through
|
||||||
|
catch_errors. This is just a bandaid while I rewrite the
|
||||||
|
string-based commands to use the object format.
|
||||||
|
|
||||||
Tue May 5 09:30:25 1998 Christopher Faylor <cgf@cygnus.com>
|
Tue May 5 09:30:25 1998 Christopher Faylor <cgf@cygnus.com>
|
||||||
|
|
||||||
* gdbtk.c (_initialize_gdbtk): Use correct device names in
|
* gdbtk.c (_initialize_gdbtk): Use correct device names in
|
||||||
|
12
gdb/gdbtk.c
12
gdb/gdbtk.c
@ -142,6 +142,10 @@ static int gdb_trace_status PARAMS ((ClientData, Tcl_Interp *, int, char *argv[]
|
|||||||
static int gdb_target_has_execution_command PARAMS ((ClientData, Tcl_Interp *, int, char *argv[]));
|
static int gdb_target_has_execution_command PARAMS ((ClientData, Tcl_Interp *, int, char *argv[]));
|
||||||
static int gdb_load_info PARAMS ((ClientData, Tcl_Interp *, int, Tcl_Obj *CONST objv[]));
|
static int gdb_load_info PARAMS ((ClientData, Tcl_Interp *, int, Tcl_Obj *CONST objv[]));
|
||||||
void TclDebug PARAMS ((const char *fmt, ...));
|
void TclDebug PARAMS ((const char *fmt, ...));
|
||||||
|
static int gdb_get_locals_command PARAMS ((ClientData, Tcl_Interp *, int, Tcl_Obj *CONST
|
||||||
|
objv[]));
|
||||||
|
static int gdb_get_args_command PARAMS ((ClientData, Tcl_Interp *, int, Tcl_Obj *CONST
|
||||||
|
objv[]));
|
||||||
static int gdb_get_vars_command PARAMS ((ClientData, Tcl_Interp *, int, Tcl_Obj *CONST objv[]));
|
static int gdb_get_vars_command PARAMS ((ClientData, Tcl_Interp *, int, Tcl_Obj *CONST objv[]));
|
||||||
static int gdb_get_function_command PARAMS ((ClientData, Tcl_Interp *, int, Tcl_Obj *CONST objv[]));
|
static int gdb_get_function_command PARAMS ((ClientData, Tcl_Interp *, int, Tcl_Obj *CONST objv[]));
|
||||||
static int gdb_get_line_command PARAMS ((ClientData, Tcl_Interp *, int, Tcl_Obj *CONST objv[]));
|
static int gdb_get_line_command PARAMS ((ClientData, Tcl_Interp *, int, Tcl_Obj *CONST objv[]));
|
||||||
@ -2261,9 +2265,9 @@ gdbtk_init ( argv0 )
|
|||||||
gdb_trace_status,
|
gdb_trace_status,
|
||||||
NULL, NULL);
|
NULL, NULL);
|
||||||
Tcl_CreateObjCommand (interp, "gdb_load_info", call_obj_wrapper, gdb_load_info, NULL);
|
Tcl_CreateObjCommand (interp, "gdb_load_info", call_obj_wrapper, gdb_load_info, NULL);
|
||||||
Tcl_CreateObjCommand (interp, "gdb_get_locals", call_obj_wrapper, gdb_get_vars_command,
|
Tcl_CreateObjCommand (interp, "gdb_get_locals", call_obj_wrapper, gdb_get_locals_command,
|
||||||
NULL);
|
NULL);
|
||||||
Tcl_CreateObjCommand (interp, "gdb_get_args", call_obj_wrapper, gdb_get_vars_command,
|
Tcl_CreateObjCommand (interp, "gdb_get_args", call_obj_wrapper, gdb_get_args_command,
|
||||||
NULL);
|
NULL);
|
||||||
Tcl_CreateObjCommand (interp, "gdb_get_function", call_obj_wrapper, gdb_get_function_command,
|
Tcl_CreateObjCommand (interp, "gdb_get_function", call_obj_wrapper, gdb_get_function_command,
|
||||||
NULL);
|
NULL);
|
||||||
@ -2539,7 +2543,7 @@ gdbtk_load_hash (section, num)
|
|||||||
*/
|
*/
|
||||||
|
|
||||||
static int
|
static int
|
||||||
gdb_get_locals (clientData, interp, objc, objv)
|
gdb_get_locals_command (clientData, interp, objc, objv)
|
||||||
ClientData clientData;
|
ClientData clientData;
|
||||||
Tcl_Interp *interp;
|
Tcl_Interp *interp;
|
||||||
int objc;
|
int objc;
|
||||||
@ -2551,7 +2555,7 @@ gdb_get_locals (clientData, interp, objc, objv)
|
|||||||
}
|
}
|
||||||
|
|
||||||
static int
|
static int
|
||||||
gdb_get_args (clientData, interp, objc, objv)
|
gdb_get_args_command (clientData, interp, objc, objv)
|
||||||
ClientData clientData;
|
ClientData clientData;
|
||||||
Tcl_Interp *interp;
|
Tcl_Interp *interp;
|
||||||
int objc;
|
int objc;
|
||||||
|
Reference in New Issue
Block a user