gdb/gdb/wrapper.c

41       } args[10];
47   struct value **args;
76   struct gdb_wrapper_arguments args;
77   args.args[0].pointer = stringptr;
78   args.args[1].pointer = block;
79   args.args[2].integer = comma;
81   if (!catch_errors ((catch_errors_ftype *) wrap_parse_exp_1, &args,
88   *expression = (struct expression *) args.result.pointer;
96   struct gdb_wrapper_arguments *args
98   args->result.pointer = parse_exp_1((char **) args->args[0].pointer,
99 				     (struct block *) args->args[1].pointer,
100 				     args->args[2].integer);
107   struct gdb_wrapper_arguments args;
108   args.args[0].pointer = exp;
110   if (!catch_errors ((catch_errors_ftype *) wrap_evaluate_expression, &args,
117   *value = (struct value *) args.result.pointer;
124   struct gdb_wrapper_arguments *args = (struct gdb_wrapper_arguments *) a;
126   (args)->result.pointer =
127     (char *) evaluate_expression ((struct expression *) args->args[0].pointer);
134   struct gdb_wrapper_arguments args;
136   args.args[0].pointer = value;
137   return catch_errors ((catch_errors_ftype *) wrap_value_fetch_lazy, &args,
144   struct gdb_wrapper_arguments *args = (struct gdb_wrapper_arguments *) a;
146   value_fetch_lazy ((struct value *) (args)->args[0].pointer);
153   struct gdb_wrapper_arguments args;
155   args.args[0].pointer = val1;
156   args.args[1].pointer = val2;
158   if (!catch_errors ((catch_errors_ftype *) wrap_value_equal, &args,
165   *result = args.result.integer;
172   struct gdb_wrapper_arguments *args = (struct gdb_wrapper_arguments *) a;
176   val1 = (struct value *) (args)->args[0].pointer;
177   val2 = (struct value *) (args)->args[1].pointer;
179   (args)->result.integer = value_equal (val1, val2);
186   struct gdb_wrapper_arguments args;
188   args.args[0].pointer = val1;
189   args.args[1].pointer = val2;
191   if (!catch_errors ((catch_errors_ftype *) wrap_value_assign, &args,
198   *result = (struct value *) args.result.pointer;
205   struct gdb_wrapper_arguments *args = (struct gdb_wrapper_arguments *) a;
209   val1 = (struct value *) (args)->args[0].pointer;
210   val2 = (struct value *) (args)->args[1].pointer;
212   (args)->result.pointer = value_assign (val1, val2);
219   struct gdb_wrapper_arguments args;
221   args.args[0].pointer = val1;
222   args.args[1].pointer = val2;
224   if (!catch_errors ((catch_errors_ftype *) wrap_value_subscript, &args,
231   *rval = (struct value *) args.result.pointer;
238   struct gdb_wrapper_arguments *args = (struct gdb_wrapper_arguments *) a;
242   val1 = (struct value *) (args)->args[0].pointer;
243   val2 = (struct value *) (args)->args[1].pointer;
245   (args)->result.pointer = value_subscript (val1, val2);
252   struct gdb_wrapper_arguments args;
254   args.args[0].pointer = val;
256   if (!catch_errors ((catch_errors_ftype *) wrap_value_ind, &args,
263   *rval = (struct value *) args.result.pointer;
270   struct gdb_wrapper_arguments *args = (struct gdb_wrapper_arguments *) opaque_arg;
273   val = (struct value *) (args)->args[0].pointer;
274   (args)->result.pointer = value_ind (val);
281   struct gdb_wrapper_arguments args;
282   args.args[0].pointer = p;
283   args.args[1].integer = length;
285   if (!catch_errors ((catch_errors_ftype *) wrap_parse_and_eval_type, &args,
292   *type = (struct type *) args.result.pointer;
299   struct gdb_wrapper_arguments *args = (struct gdb_wrapper_arguments *) a;
301   char *p = (char *) args->args[0].pointer;
302   int length = args->args[1].integer;
304   args->result.pointer = (char *) parse_and_eval_type (p, length);
311 		      struct value **args, char *name, int *static_memfuncp,
316   cargs.args = args;
329   *cargs->result_ptr = value_struct_elt (cargs->argp, cargs->args, cargs->name,