This is the mail archive of the
insight@sources.redhat.com
mailing list for the Insight project.
[RFA]: patch to handle new decode_line_1 prototype
- From: "J. Johnston" <jjohnstn at redhat dot com>
- To: insight at sources dot redhat dot com
- Cc: jjohnstn at redhat dot com
- Date: Wed, 17 Dec 2003 17:50:25 -0500
- Subject: [RFA]: patch to handle new decode_line_1 prototype
- Organization: Red Hat Inc.
The following is an obvious patch to handle the new decode_line_1 parameter that
has been added in gdb.
I am not subscribed to the mailing list. I probably have write access due to my
other maintainer roles on sourceware.
Ok?
-- Jeff J.
2003-12-17 Jeff Johnston <jjohnstn@redhat.com>
* generic/gdbtk-bp.c: Change calls to decode_line_1 to add
new NULL parameter.
* generic/gdbtk-cmds.c: Ditto.
* generic/gdbtk-stack.c: Ditto.
Index: generic/gdbtk-bp.c
===================================================================
RCS file: /cvs/src/src/gdb/gdbtk/generic/gdbtk-bp.c,v
retrieving revision 1.21
diff -u -p -r1.21 gdbtk-bp.c
--- generic/gdbtk-bp.c 11 Nov 2003 18:55:42 -0000 1.21
+++ generic/gdbtk-bp.c 17 Dec 2003 22:49:15 -0000
@@ -905,7 +905,7 @@ tracepoint_exists (char *args)
char *file = NULL;
int result = -1;
- sals = decode_line_1 (&args, 1, NULL, 0, &canonical);
+ sals = decode_line_1 (&args, 1, NULL, 0, &canonical, NULL);
if (sals.nelts == 1)
{
resolve_sal_pc (&sals.sals[0]);
Index: generic/gdbtk-cmds.c
===================================================================
RCS file: /cvs/src/src/gdb/gdbtk/generic/gdbtk-cmds.c,v
retrieving revision 1.78
diff -u -p -r1.78 gdbtk-cmds.c
--- generic/gdbtk-cmds.c 25 Nov 2003 01:44:06 -0000 1.78
+++ generic/gdbtk-cmds.c 17 Dec 2003 22:49:16 -0000
@@ -938,7 +938,7 @@ gdb_get_line_command (ClientData clientD
}
args = Tcl_GetStringFromObj (objv[1], NULL);
- sals = decode_line_1 (&args, 1, NULL, 0, &canonical);
+ sals = decode_line_1 (&args, 1, NULL, 0, &canonical, NULL);
if (sals.nelts == 1)
{
Tcl_SetIntObj (result_ptr->obj_ptr, sals.sals[0].line);
@@ -974,7 +974,7 @@ gdb_get_file_command (ClientData clientD
}
args = Tcl_GetStringFromObj (objv[1], NULL);
- sals = decode_line_1 (&args, 1, NULL, 0, &canonical);
+ sals = decode_line_1 (&args, 1, NULL, 0, &canonical, NULL);
if (sals.nelts == 1)
{
Tcl_SetStringObj (result_ptr->obj_ptr,
@@ -1010,7 +1010,7 @@ gdb_get_function_command (ClientData cli
}
args = Tcl_GetStringFromObj (objv[1], NULL);
- sals = decode_line_1 (&args, 1, NULL, 0, &canonical);
+ sals = decode_line_1 (&args, 1, NULL, 0, &canonical, NULL);
if (sals.nelts == 1)
{
resolve_sal_pc (&sals.sals[0]);
Index: generic/gdbtk-stack.c
===================================================================
RCS file: /cvs/src/src/gdb/gdbtk/generic/gdbtk-stack.c,v
retrieving revision 1.19
diff -u -p -r1.19 gdbtk-stack.c
--- generic/gdbtk-stack.c 11 Jun 2003 23:29:49 -0000 1.19
+++ generic/gdbtk-stack.c 17 Dec 2003 22:49:16 -0000
@@ -301,7 +301,7 @@ gdb_get_vars_command (ClientData clientD
if (objc == 2)
{
args = Tcl_GetStringFromObj (objv[1], NULL);
- sals = decode_line_1 (&args, 1, NULL, 0, &canonical);
+ sals = decode_line_1 (&args, 1, NULL, 0, &canonical, NULL);
if (sals.nelts == 0)
{
gdbtk_set_result (interp, "error decoding line");