diff options
-rw-r--r-- | gdb/gdbtk/ChangeLog | 6 | ||||
-rw-r--r-- | gdb/gdbtk/generic/gdbtk-wrapper.c | 26 | ||||
-rw-r--r-- | gdb/gdbtk/generic/gdbtk-wrapper.h | 1 |
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, |