* [PATCH] Update struct breakpoint and struct tracepoint
@ 2001-08-02 8:39 Keith Seitz
0 siblings, 0 replies; only message in thread
From: Keith Seitz @ 2001-08-02 8:39 UTC (permalink / raw)
To: Insight Maling List
FYI
I have checked in the following patch which fixes build errors introduced
yesterday as a result of some breakpoint.h and tracepoint.h cleanups in
gdb.
Keith
ChangeLog
2001-08-02 Keith Seitz <keiths@redhat.com>
* generic/gdbtk-bp.c (gdb_get_breakpoint_info): Update
with recent breakpoint structure changes in gdb.
(gdb_set_bp_addr): Likewise.
(gdb_get_tracepoint_info): Update with recent tracepoint
structure changes in gdb.
Patch
Index: generic/gdbtk-bp.c
===================================================================
RCS file: /cvs/src/src/gdb/gdbtk/generic/gdbtk-bp.c,v
retrieving revision 1.8
diff -u -p -r1.8 gdbtk-bp.c
--- gdbtk-bp.c 2001/06/13 20:01:42 1.8
+++ gdbtk-bp.c 2001/08/02 15:19:23
@@ -343,7 +343,7 @@ gdb_get_breakpoint_info (ClientData clie
Tcl_ListObjAppendElement (NULL, result_ptr->obj_ptr,
Tcl_NewStringObj (bptypes[b->type], -1));
Tcl_ListObjAppendElement (NULL, result_ptr->obj_ptr,
- Tcl_NewBooleanObj (b->enable == enabled));
+ Tcl_NewBooleanObj (b->enable_state == bp_enabled));
Tcl_ListObjAppendElement (NULL, result_ptr->obj_ptr,
Tcl_NewStringObj (bpdisp[b->disposition], -1));
Tcl_ListObjAppendElement (NULL, result_ptr->obj_ptr,
@@ -456,9 +456,9 @@ gdb_set_bp (clientData, interp, objc, ob
return TCL_ERROR;
}
if (strncmp (typestr, "temp", 4) == 0)
- disp = del;
+ disp = disp_del;
else if (strncmp (typestr, "normal", 6) == 0)
- disp = donttouch;
+ disp = disp_donttouch;
else
{
Tcl_SetStringObj (result_ptr->obj_ptr,
@@ -538,9 +538,9 @@ gdb_set_bp_addr (ClientData clientData,
return TCL_ERROR;
}
if (strncmp (typestr, "temp", 4) == 0)
- disp = del;
+ disp = disp_del;
else if (strncmp (typestr, "normal", 6) == 0)
- disp = donttouch;
+ disp = disp_donttouch;
else
{
Tcl_SetStringObj (result_ptr->obj_ptr,
@@ -817,7 +817,7 @@ gdb_get_tracepoint_info (ClientData clie
free (tmp);
}
Tcl_ListObjAppendElement (interp, result_ptr->obj_ptr,
- Tcl_NewIntObj (tp->enabled));
+ Tcl_NewIntObj (tp->enabled_p));
Tcl_ListObjAppendElement (interp, result_ptr->obj_ptr,
Tcl_NewIntObj (tp->pass_count));
Tcl_ListObjAppendElement (interp, result_ptr->obj_ptr,
^ permalink raw reply [flat|nested] only message in thread
only message in thread, other threads:[~2001-08-02 8:39 UTC | newest]
Thread overview: (only message) (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2001-08-02 8:39 [PATCH] Update struct breakpoint and struct tracepoint Keith Seitz
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).