summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAndrew Cagney <cagney@redhat.com>2002-05-04 19:08:32 +0000
committerAndrew Cagney <cagney@redhat.com>2002-05-04 19:08:32 +0000
commit17aeced73e8ce855936cf45442b0d8ee400064c6 (patch)
tree72e4f664bc266070ef54cc82b06dae6e0acd7cdc
parente7749fc3deee81412e67a0ca93ffafb430709370 (diff)
downloadgdb-17aeced73e8ce855936cf45442b0d8ee400064c6.tar.gz
* generic/gdbtk-wrapper.h (GDB_select_frame): Delete declaration.
* generic/gdbtk-wrapper.c (GDB_select_frame): Delete function. (wrap_select_frame): Delete function.
-rw-r--r--gdb/gdbtk/ChangeLog6
-rw-r--r--gdb/gdbtk/generic/gdbtk-wrapper.c26
-rw-r--r--gdb/gdbtk/generic/gdbtk-wrapper.h1
3 files changed, 6 insertions, 27 deletions
diff --git a/gdb/gdbtk/ChangeLog b/gdb/gdbtk/ChangeLog
index f4699a08909..57828031e08 100644
--- a/gdb/gdbtk/ChangeLog
+++ b/gdb/gdbtk/ChangeLog
@@ -1,3 +1,9 @@
+2002-05-04 Andrew Cagney <ac131313@redhat.com>
+
+ * generic/gdbtk-wrapper.h (GDB_select_frame): Delete declaration.
+ * generic/gdbtk-wrapper.c (GDB_select_frame): Delete function.
+ (wrap_select_frame): Delete function.
+
2002-04-26 Martin M. Hunt <hunt@redhat.com>
* library/interface.tcl (gdbtk_force_quit): New function.
diff --git a/gdb/gdbtk/generic/gdbtk-wrapper.c b/gdb/gdbtk/generic/gdbtk-wrapper.c
index c5511dad88f..95b4702ee16 100644
--- a/gdb/gdbtk/generic/gdbtk-wrapper.c
+++ b/gdb/gdbtk/generic/gdbtk-wrapper.c
@@ -37,8 +37,6 @@ gdb_result GDB_val_print (struct type *type, char *valaddr,
int format, int deref_ref, int recurse,
enum val_prettyprint pretty);
-gdb_result GDB_select_frame (struct frame_info *, int);
-
gdb_result GDB_value_equal (value_ptr, value_ptr, int *);
gdb_result GDB_parse_exp_1 (char **stringptr, struct block *block, int comma,
@@ -94,8 +92,6 @@ static int wrap_value_fetch_lazy (char *);
static int wrap_val_print (char *);
-static int wrap_select_frame (char *);
-
static int wrap_value_equal (char *);
static int wrap_parse_exp_1 (char *opaque_arg);
@@ -260,28 +256,6 @@ wrap_evaluate_expression (char *a)
}
gdb_result
-GDB_select_frame (struct frame_info *fi, int level)
-{
- struct gdb_wrapper_arguments args;
-
- args.args[0] = (char *) fi;
- args.args[1] = (char *) &level;
-
- return call_wrapped_function ((catch_errors_ftype *) wrap_select_frame, &args);
-}
-
-static int
-wrap_select_frame (char *a)
-{
- struct gdb_wrapper_arguments **args = (struct gdb_wrapper_arguments **) a;
- int level = *(int *) (*args)->args[1];
- struct frame_info *fi = (struct frame_info *) (*args)->args[0];
-
- select_frame (fi, level);
- return 1;
-}
-
-gdb_result
GDB_value_equal (val1, val2, result)
value_ptr val1;
value_ptr val2;
diff --git a/gdb/gdbtk/generic/gdbtk-wrapper.h b/gdb/gdbtk/generic/gdbtk-wrapper.h
index 5193eed344d..d02dc0d84e8 100644
--- a/gdb/gdbtk/generic/gdbtk-wrapper.h
+++ b/gdb/gdbtk/generic/gdbtk-wrapper.h
@@ -44,7 +44,6 @@ typedef enum gdb_wrapper_status { GDB_OK, GDB_ERROR } gdb_result;
function. */
extern gdb_result GDB_evaluate_expression (struct expression *expr,
value_ptr * val);
-extern gdb_result GDB_select_frame (struct frame_info *fi, int level);
extern gdb_result GDB_type_print (value_ptr val, char *varstring,
struct ui_file *stream, int show);
extern gdb_result GDB_val_print (struct type *type, char *valaddr,