espressif/binutils-gdb
1
0
Fork 0
mirror of https://github.com/espressif/binutils-gdb.git synced 2025-06-19 09:14:14 +08:00
Code Issues Packages Projects Releases Wiki Activity

* gdbtk.c (gdb_get_tracepoint_info): Change formatting of address.

Browse Source 
(tracepoint_exists): Remove code which confuses assembly traces.
This commit is contained in:
Keith Seitz
1998-03-30 05:18:29 +00:00
parent 57a3982409
commit c62a71b625
2 changed files with 9 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
gdb/ChangeLog-gdbtk
View File

@ -1,3 +1,8 @@
Sun Mar 29 21:19:46 1998 Keith Seitz <keiths@onions.cygnus.com>
* gdbtk.c (gdb_get_tracepoint_info): Change formatting of address.
(tracepoint_exists): Remove code which confuses assembly traces.
Sat Mar 28 12:13:23 1998 Keith Seitz <keiths@onions.cygnus.com>
* gdbtk.c (gdb_cmd): If argc > 2, assume that the busy and idle hooks

6
gdb/gdbtk.c
View File

@ -2704,7 +2704,7 @@ gdb_get_tracepoint_info (clientData, interp, objc, objv)
find_pc_partial_function (tp->address, &funcname, NULL, NULL);
Tcl_ListObjAppendElement (interp, list, Tcl_NewStringObj (funcname, -1));
Tcl_ListObjAppendElement (interp, list, Tcl_NewIntObj (sal.line));
sprintf (tmp, "0x%08x", tp->address);
sprintf (tmp, "0x%lx", tp->address);
Tcl_ListObjAppendElement (interp, list, Tcl_NewStringObj (tmp, -1));
Tcl_ListObjAppendElement (interp, list, Tcl_NewIntObj (tp->enabled));
Tcl_ListObjAppendElement (interp, list, Tcl_NewIntObj (tp->pass_count));
@ -2865,11 +2865,13 @@ tracepoint_exists (char * args)
{
if (tp->address == sals.sals[0].pc)
result = tp->number;
#if 0
/* Why is this here? This messes up assembly traces */
else if (tp->source_file != NULL
&& strcmp (tp->source_file, file) == 0
&& sals.sals[0].line == tp->line_number)
result = tp->number;
#endif
}
}
}