* 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.
This commit is contained in:
parent
06b25f14b0
commit
f976f6d464
6 changed files with 25 additions and 12 deletions
|
@ -1,3 +1,13 @@
|
||||||
|
2001-12-25 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.
|
||||||
|
|
||||||
2001-12-25 Andrew Cagney <ac131313@redhat.com>
|
2001-12-25 Andrew Cagney <ac131313@redhat.com>
|
||||||
|
|
||||||
* gdbarch.sh: When an int variable, print value using %d instead
|
* gdbarch.sh: When an int variable, print value using %d instead
|
||||||
|
|
|
@ -536,7 +536,8 @@ evaluate_subexp_chill (struct type *expect_type,
|
||||||
|
|
||||||
/* Allocate arg vector, including space for the function to be
|
/* Allocate arg vector, including space for the function to be
|
||||||
called in argvec[0] and a terminating NULL */
|
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;
|
argvec[0] = arg1;
|
||||||
tem = 1;
|
tem = 1;
|
||||||
for (; tem <= nargs && tem <= TYPE_NFIELDS (type); tem++)
|
for (; tem <= nargs && tem <= TYPE_NFIELDS (type); tem++)
|
||||||
|
|
|
@ -332,8 +332,8 @@ execute_control_command (struct command_line *cmd)
|
||||||
struct expression *expr;
|
struct expression *expr;
|
||||||
struct command_line *current;
|
struct command_line *current;
|
||||||
struct cleanup *old_chain = 0;
|
struct cleanup *old_chain = 0;
|
||||||
value_ptr val;
|
struct value *val;
|
||||||
value_ptr val_mark;
|
struct value *val_mark;
|
||||||
int loop;
|
int loop;
|
||||||
enum command_control_type ret;
|
enum command_control_type ret;
|
||||||
char *new_line;
|
char *new_line;
|
||||||
|
|
|
@ -620,7 +620,7 @@ evaluate_subexp_standard (struct type *expect_type,
|
||||||
return set;
|
return set;
|
||||||
}
|
}
|
||||||
|
|
||||||
argvec = (value_ptr *) alloca (sizeof (value_ptr) * nargs);
|
argvec = (struct value **) alloca (sizeof (struct value *) * nargs);
|
||||||
for (tem = 0; tem < nargs; tem++)
|
for (tem = 0; tem < nargs; tem++)
|
||||||
{
|
{
|
||||||
/* Ensure that array expressions are coerced into pointer objects. */
|
/* Ensure that array expressions are coerced into pointer objects. */
|
||||||
|
@ -673,7 +673,7 @@ evaluate_subexp_standard (struct type *expect_type,
|
||||||
nargs = longest_to_int (exp->elts[pc + 1].longconst);
|
nargs = longest_to_int (exp->elts[pc + 1].longconst);
|
||||||
/* Allocate arg vector, including space for the function to be
|
/* Allocate arg vector, including space for the function to be
|
||||||
called in argvec[0] and a terminating NULL */
|
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)
|
if (op == STRUCTOP_MEMBER || op == STRUCTOP_MPTR)
|
||||||
{
|
{
|
||||||
LONGEST fnptr;
|
LONGEST fnptr;
|
||||||
|
@ -969,7 +969,7 @@ evaluate_subexp_standard (struct type *expect_type,
|
||||||
/* It's a function call. */
|
/* It's a function call. */
|
||||||
/* Allocate arg vector, including space for the function to be
|
/* Allocate arg vector, including space for the function to be
|
||||||
called in argvec[0] and a terminating NULL */
|
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;
|
argvec[0] = arg1;
|
||||||
tem = 1;
|
tem = 1;
|
||||||
for (; tem <= nargs; tem++)
|
for (; tem <= nargs; tem++)
|
||||||
|
|
|
@ -2045,7 +2045,8 @@ printf_command (char *arg, int from_tty)
|
||||||
int allocated_args = 20;
|
int allocated_args = 20;
|
||||||
struct cleanup *old_cleanups;
|
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);
|
old_cleanups = make_cleanup (free_current_contents, &val_args);
|
||||||
|
|
||||||
if (s == 0)
|
if (s == 0)
|
||||||
|
@ -2209,9 +2210,9 @@ printf_command (char *arg, int from_tty)
|
||||||
{
|
{
|
||||||
char *s1;
|
char *s1;
|
||||||
if (nargs == allocated_args)
|
if (nargs == allocated_args)
|
||||||
val_args = (value_ptr *) xrealloc ((char *) val_args,
|
val_args = (struct value **) xrealloc ((char *) val_args,
|
||||||
(allocated_args *= 2)
|
(allocated_args *= 2)
|
||||||
* sizeof (value_ptr));
|
* sizeof (struct value *));
|
||||||
s1 = s;
|
s1 = s;
|
||||||
val_args[nargs] = parse_to_comma_and_eval (&s1);
|
val_args[nargs] = parse_to_comma_and_eval (&s1);
|
||||||
|
|
||||||
|
|
|
@ -254,7 +254,8 @@ set_traceframe_context (CORE_ADDR trace_pc)
|
||||||
{
|
{
|
||||||
static struct type *func_string, *file_string;
|
static struct type *func_string, *file_string;
|
||||||
static struct type *func_range, *file_range;
|
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;
|
static struct type *charstar;
|
||||||
int len;
|
int len;
|
||||||
|
|
||||||
|
@ -1486,7 +1487,7 @@ encode_actions (struct tracepoint *t, char ***tdp_actions,
|
||||||
struct expression *exp = NULL;
|
struct expression *exp = NULL;
|
||||||
struct action_line *action;
|
struct action_line *action;
|
||||||
int i;
|
int i;
|
||||||
value_ptr tempval;
|
struct value *tempval;
|
||||||
struct collection_list *collect;
|
struct collection_list *collect;
|
||||||
struct cmd_list_element *cmd;
|
struct cmd_list_element *cmd;
|
||||||
struct agent_expr *aexpr;
|
struct agent_expr *aexpr;
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue