diff options
| -rw-r--r-- | gdb/ChangeLog | 6 | ||||
| -rw-r--r-- | gdb/wrapper.c | 38 | ||||
| -rw-r--r-- | gdb/wrapper.h | 5 |
3 files changed, 49 insertions, 0 deletions
diff --git a/gdb/ChangeLog b/gdb/ChangeLog index d22084b..93632ff 100644 --- a/gdb/ChangeLog +++ b/gdb/ChangeLog @@ -1,3 +1,9 @@ +2001-10-30 Keith Seitz <keiths@redhat.com> + + * wrapper.h (gdb_value_struct_elt): New function. + * wrapper.c (gdb_value_struct_elt): Ditto. + (do_captured_value_struct_elt): Ditto. + 2001-10-30 Andrew Cagney <ac131313@redhat.com> * README, NEWS: Update for 5.1. diff --git a/gdb/wrapper.c b/gdb/wrapper.c index e99378f..6c9c6d6 100644 --- a/gdb/wrapper.c +++ b/gdb/wrapper.c @@ -41,6 +41,16 @@ struct gdb_wrapper_arguments } args[10]; }; +struct captured_value_struct_elt_args +{ + struct value **argp; + struct value **args; + char *name; + int *static_memfuncp; + char *err; + struct value **result_ptr; +}; + static int wrap_parse_exp_1 (char *); static int wrap_evaluate_expression (char *); @@ -55,6 +65,8 @@ static int wrap_value_subscript (char *); static int wrap_value_ind (char *opaque_arg); +static int do_captured_value_struct_elt (struct ui_out *uiout, void *data); + static int wrap_parse_and_eval_type (char *); int @@ -293,3 +305,29 @@ wrap_parse_and_eval_type (char *a) return 1; } + +enum gdb_rc +gdb_value_struct_elt (struct ui_out *uiout, struct value **result, struct value **argp, + struct value **args, char *name, int *static_memfuncp, + char *err) +{ + struct captured_value_struct_elt_args cargs; + cargs.argp = argp; + cargs.args = args; + cargs.name = name; + cargs.static_memfuncp = static_memfuncp; + cargs.err = err; + cargs.result_ptr = result; + return catch_exceptions (uiout, do_captured_value_struct_elt, &cargs, + NULL, RETURN_MASK_ALL); +} + +static int +do_captured_value_struct_elt (struct ui_out *uiout, void *data) +{ + struct captured_value_struct_elt_args *cargs = data; + *cargs->result_ptr = value_struct_elt (cargs->argp, cargs->args, cargs->name, + cargs->static_memfuncp, cargs->err); + return GDB_RC_OK; +} + diff --git a/gdb/wrapper.h b/gdb/wrapper.h index bfe1100..977a77d 100644 --- a/gdb/wrapper.h +++ b/gdb/wrapper.h @@ -18,6 +18,7 @@ #ifndef WRAPPER_H #define WRAPPER_H 1 +#include "gdb.h" struct value; @@ -37,6 +38,10 @@ extern int gdb_value_assign (struct value *, struct value *, struct value **); extern int gdb_value_subscript (struct value *, struct value *, struct value **); +extern enum gdb_rc gdb_value_struct_elt (struct ui_out *uiout, struct value **result_ptr, + struct value **argp, struct value **args, + char *name, int *static_memfuncp, char *err); + extern int gdb_value_ind (struct value *val, struct value ** rval); extern int gdb_parse_and_eval_type (char *, int, struct type **); |