This is the mail archive of the
insight@sources.redhat.com
mailing list for the Insight project.
[PATCH] update get_frame_block
- From: Keith Seitz <keiths at redhat dot com>
- To: Insight Maling List <insight at sources dot redhat dot com>
- Date: Fri, 5 Apr 2002 14:27:06 -0800 (PST)
- Subject: [PATCH] update get_frame_block
Hi,
This patch updates calls to get_frame_block to match recent API changes in
gdb.
Keith
ChangeLog
2002-04-05 Keith Seitz <keiths@redhat.com>
* generic/gdbtk-stack.c (gdb_block_vars): Update get_frame_block to
match recent gdb changes.
(gdb_get_blocks): Likewise.
(gdb_get_vars_command): Likewise.
(gdb_selected_block): Likewise.
Patch
Index: generic/gdbtk-stack.c
===================================================================
RCS file: /cvs/src/src/gdb/gdbtk/generic/gdbtk-stack.c,v
retrieving revision 1.7
diff -p -r1.7 gdbtk-stack.c
*** generic/gdbtk-stack.c 2002/02/07 21:56:07 1.7
--- generic/gdbtk-stack.c 2002/04/05 22:23:34
*************** gdb_block_vars (ClientData clientData, T
*** 105,111 ****
start = string_to_core_addr (Tcl_GetStringFromObj (objv[1], NULL));
end = string_to_core_addr (Tcl_GetStringFromObj (objv[2], NULL));
! block = get_frame_block (selected_frame);
while (block != 0)
{
--- 105,111 ----
start = string_to_core_addr (Tcl_GetStringFromObj (objv[1], NULL));
end = string_to_core_addr (Tcl_GetStringFromObj (objv[2], NULL));
! block = get_frame_block (selected_frame, 0);
while (block != 0)
{
*************** gdb_get_blocks (ClientData clientData, T
*** 169,175 ****
if (selected_frame != NULL)
{
! block = get_frame_block (selected_frame);
pc = get_frame_pc (selected_frame);
while (block != 0)
{
--- 169,175 ----
if (selected_frame != NULL)
{
! block = get_frame_block (selected_frame, 0);
pc = get_frame_pc (selected_frame);
while (block != 0)
{
*************** gdb_get_vars_command (ClientData clientD
*** 316,322 ****
if (selected_frame == NULL)
return TCL_OK;
! block = get_frame_block (selected_frame);
}
while (block != 0)
--- 316,322 ----
if (selected_frame == NULL)
return TCL_OK;
! block = get_frame_block (selected_frame, 0);
}
while (block != 0)
*************** gdb_selected_block (ClientData clientDat
*** 389,395 ****
else
{
struct block *block;
! block = get_frame_block (selected_frame);
xasprintf (&start, "0x%s", paddr_nz (BLOCK_START (block)));
xasprintf (&end, "0x%s", paddr_nz (BLOCK_END (block)));
}
--- 389,395 ----
else
{
struct block *block;
! block = get_frame_block (selected_frame, 0);
xasprintf (&start, "0x%s", paddr_nz (BLOCK_START (block)));
xasprintf (&end, "0x%s", paddr_nz (BLOCK_END (block)));
}