darkkirb/old-cross-binutils
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

2005-02-07 Andrew Cagney <cagney@gnu.org>

Browse source 
* cp-valprint.c, c-valprint.c, infcall.c: Use value_contents or
	value_contents_writeable, include note that there are problems.
	* breakpoint.c, infcall.c: Use VALUE_LVAL.
This commit is contained in:
Andrew Cagney 2005-02-08 04:15:39 +00:00
parent 300475fe9d
commit 5086187cf9
5 changed files with 14 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
gdb/ChangeLog
View file

@ -1,5 +1,9 @@
2005-02-07 Andrew Cagney <cagney@gnu.org> 2005-02-07 Andrew Cagney <cagney@gnu.org>
* cp-valprint.c, c-valprint.c, infcall.c: Use value_contents or
value_contents_writeable, include note that there are problems.
* breakpoint.c, infcall.c: Use VALUE_LVAL.
* value.h (set_value_offset): Declare. * value.h (set_value_offset): Declare.
* value.c (set_value_offset): Declare. * value.c (set_value_offset): Declare.
* gnu-v2-abi.c, jv-valprint.c, valarith.c, valops.c: Update. * gnu-v2-abi.c, jv-valprint.c, valarith.c, valops.c: Update.

5
gdb/breakpoint.c
View file

@ -5821,9 +5821,10 @@ can_use_hardware_watchpoint (struct value *v)
} }
} }
} }
else if (v->lval != not_lval && deprecated_value_modifiable (v) == 0) else if (VALUE_LVAL (v) != not_lval
&& deprecated_value_modifiable (v) == 0)
return 0; /* ??? What does this represent? */ return 0; /* ??? What does this represent? */
else if (v->lval == lval_register) else if (VALUE_LVAL (v) == lval_register)
return 0; /* cannot watch a register with a HW watchpoint */ return 0; /* cannot watch a register with a HW watchpoint */
} }

3
gdb/c-valprint.c
View file

@ -551,7 +551,8 @@ c_value_print (struct value *val, struct ui_file *stream, int format,
type = lookup_reference_type (real_type); type = lookup_reference_type (real_type);
} }
/* JYG: Need to adjust pointer value. */ /* JYG: Need to adjust pointer value. */
val->aligner.contents[0] -= top; /* NOTE: cagney/2005-01-02: THIS IS BOGUS. */
value_contents_writeable (val)[0] -= top;
/* Note: When we look up RTTI entries, we don't get any /* Note: When we look up RTTI entries, we don't get any
information on const or volatile attributes */ information on const or volatile attributes */

3
gdb/cp-valprint.c
View file

@ -784,7 +784,8 @@ cp_print_hpacc_virtual_table_entries (struct type *type, int *vfuncs,
if (value_lazy (vf)) if (value_lazy (vf))
(void) value_fetch_lazy (vf); (void) value_fetch_lazy (vf);
/* adjust by offset */ /* adjust by offset */
vf->aligner.contents[0] += 4 * (HP_ACC_VFUNC_START + vx); /* NOTE: cagney/2005-01-02: THIS IS BOGUS. */
value_contents_writeable (vf)[0] += 4 * (HP_ACC_VFUNC_START + vx);
vf = value_ind (vf); /* get the entry */ vf = value_ind (vf); /* get the entry */
/* make it a pointer */ /* make it a pointer */
deprecated_set_value_type (vf, value_type (v)); deprecated_set_value_type (vf, value_type (v));

5
gdb/infcall.c
View file

@ -536,10 +536,11 @@ call_function_by_hand (struct value *function, int nargs, struct value **args)
this point. */ this point. */
/* Go see if the actual parameter is a variable of /* Go see if the actual parameter is a variable of
type pointer to function or just a function. */ type pointer to function or just a function. */
if (args[i]->lval == not_lval) if (VALUE_LVAL (args[i]) == not_lval)
{ {
char *arg_name; char *arg_name;
if (find_pc_partial_function ((CORE_ADDR) args[i]->aligner.contents[0], &arg_name, NULL, NULL)) /* NOTE: cagney/2005-01-02: THIS IS BOGUS. */
if (find_pc_partial_function ((CORE_ADDR) value_contents (args[i])[0], &arg_name, NULL, NULL))
error ("\ error ("\
You cannot use function <%s> as argument. \n\ You cannot use function <%s> as argument. \n\
You must use a pointer to function type variable. Command ignored.", arg_name); You must use a pointer to function type variable. Command ignored.", arg_name);