This is the mail archive of the
gdb-patches@sources.redhat.com
mailing list for the GDB project.
[patch] more value_ptr -> struct value *
- From: Andrew Cagney <ac131313 at cygnus dot com>
- To: gdb-patches at sources dot redhat dot com
- Date: Tue, 25 Dec 2001 21:58:32 +0000
- Subject: [patch] more value_ptr -> struct value *
FYI,
Andrew
2001-12-21 Andrew Cagney <ac131313@redhat.com>
* cli/cli-script.c (execute_control_command): Replace value_ptr
with a struct value pointer.
* ch-lang.c (evaluate_subexp_chill): Ditto.
* printcmd.c (printf_command): Ditto.
* tracepoint.c (set_traceframe_context): Ditto.
(encode_actions): Ditto.
* eval.c (evaluate_subexp_standard): Ditto.
Index: ch-lang.c
===================================================================
RCS file: /cvs/src/src/gdb/ch-lang.c,v
retrieving revision 1.7
diff -p -u -r1.7 ch-lang.c
--- ch-lang.c 2001/11/10 20:44:37 1.7
+++ ch-lang.c 2001/12/25 21:39:25
@@ -536,7 +536,8 @@ evaluate_subexp_chill (struct type *expe
/* Allocate arg vector, including space for the function to be
called in argvec[0] and a terminating NULL */
- argvec = (value_ptr *) alloca (sizeof (value_ptr) * (nargs + 2));
+ argvec = (struct value **) alloca (sizeof (struct value *)
+ * (nargs + 2));
argvec[0] = arg1;
tem = 1;
for (; tem <= nargs && tem <= TYPE_NFIELDS (type); tem++)
Index: eval.c
===================================================================
RCS file: /cvs/src/src/gdb/eval.c,v
retrieving revision 1.17
diff -p -u -r1.17 eval.c
--- eval.c 2001/12/10 23:05:00 1.17
+++ eval.c 2001/12/25 21:39:30
@@ -620,7 +620,7 @@ evaluate_subexp_standard (struct type *e
return set;
}
- argvec = (value_ptr *) alloca (sizeof (value_ptr) * nargs);
+ argvec = (struct value **) alloca (sizeof (struct value *) * nargs);
for (tem = 0; tem < nargs; tem++)
{
/* Ensure that array expressions are coerced into pointer objects. */
@@ -673,7 +673,7 @@ evaluate_subexp_standard (struct type *e
nargs = longest_to_int (exp->elts[pc + 1].longconst);
/* Allocate arg vector, including space for the function to be
called in argvec[0] and a terminating NULL */
- argvec = (value_ptr *) alloca (sizeof (value_ptr) * (nargs + 3));
+ argvec = (struct value **) alloca (sizeof (struct value *) * (nargs + 3));
if (op == STRUCTOP_MEMBER || op == STRUCTOP_MPTR)
{
LONGEST fnptr;
@@ -969,7 +969,7 @@ evaluate_subexp_standard (struct type *e
/* It's a function call. */
/* Allocate arg vector, including space for the function to be
called in argvec[0] and a terminating NULL */
- argvec = (value_ptr *) alloca (sizeof (value_ptr) * (nargs + 2));
+ argvec = (struct value **) alloca (sizeof (struct value *) * (nargs + 2));
argvec[0] = arg1;
tem = 1;
for (; tem <= nargs; tem++)
Index: printcmd.c
===================================================================
RCS file: /cvs/src/src/gdb/printcmd.c,v
retrieving revision 1.32
diff -p -u -r1.32 printcmd.c
--- printcmd.c 2001/12/07 21:07:59 1.32
+++ printcmd.c 2001/12/25 21:39:37
@@ -2045,7 +2045,8 @@ printf_command (char *arg, int from_tty)
int allocated_args = 20;
struct cleanup *old_cleanups;
- val_args = (value_ptr *) xmalloc (allocated_args * sizeof (value_ptr));
+ val_args = (struct value **) xmalloc (allocated_args
+ * sizeof (struct value *));
old_cleanups = make_cleanup (free_current_contents, &val_args);
if (s == 0)
@@ -2209,9 +2210,9 @@ printf_command (char *arg, int from_tty)
{
char *s1;
if (nargs == allocated_args)
- val_args = (value_ptr *) xrealloc ((char *) val_args,
- (allocated_args *= 2)
- * sizeof (value_ptr));
+ val_args = (struct value **) xrealloc ((char *) val_args,
+ (allocated_args *= 2)
+ * sizeof (struct value *));
s1 = s;
val_args[nargs] = parse_to_comma_and_eval (&s1);
Index: tracepoint.c
===================================================================
RCS file: /cvs/src/src/gdb/tracepoint.c,v
retrieving revision 1.28
diff -p -u -r1.28 tracepoint.c
--- tracepoint.c 2001/11/06 23:38:15 1.28
+++ tracepoint.c 2001/12/25 21:39:44
@@ -254,7 +254,8 @@ set_traceframe_context (CORE_ADDR trace_
{
static struct type *func_string, *file_string;
static struct type *func_range, *file_range;
- static value_ptr func_val, file_val;
+ struct value *func_val;
+ struct value *file_val;
static struct type *charstar;
int len;
@@ -1486,7 +1487,7 @@ encode_actions (struct tracepoint *t, ch
struct expression *exp = NULL;
struct action_line *action;
int i;
- value_ptr tempval;
+ struct value *tempval;
struct collection_list *collect;
struct cmd_list_element *cmd;
struct agent_expr *aexpr;
Index: cli/cli-script.c
===================================================================
RCS file: /cvs/src/src/gdb/cli/cli-script.c,v
retrieving revision 1.8
diff -p -u -r1.8 cli-script.c
--- cli-script.c 2001/12/13 22:42:23 1.8
+++ cli-script.c 2001/12/25 21:39:47
@@ -332,8 +332,8 @@ execute_control_command (struct command_
struct expression *expr;
struct command_line *current;
struct cleanup *old_chain = 0;
- value_ptr val;
- value_ptr val_mark;
+ struct value *val;
+ struct value *val_mark;
int loop;
enum command_control_type ret;
char *new_line;