espressif/binutils-gdb
1
0
Fork 0
mirror of https://github.com/espressif/binutils-gdb.git synced 2025-10-15 20:05:46 +08:00
Code Issues Packages Projects Releases Wiki Activity

The list of changes is too long to fit in the cvs log (since it truncates!).

Browse Source 
Look at the ChangeLog for Apr 30 and May 1.
This commit is contained in:
Jim Kingdon
1991-05-02 04:28:42 +00:00
parent 04a0511c0a
commit e1ce8aa5ed
30 changed files with 393 additions and 145 deletions
Download Patch File Download Diff File Expand all files Collapse all files

56
gdb/valprint.c
View File

@ -669,6 +669,10 @@ val_print (type, valaddr, address, stream, format,
switch (TYPE_CODE (type))
{
case TYPE_CODE_ARRAY:
/* FIXME: TYPE_LENGTH (type) is unsigned and therefore always
0. Is "> 0" meant? I'm not sure what an "array of
unspecified length" (mentioned in the comment for the else-part
of this if) is. */
if (TYPE_LENGTH (type) >= 0
&& TYPE_LENGTH (TYPE_TARGET_TYPE (type)) > 0)
{
@ -762,9 +766,11 @@ val_print (type, valaddr, address, stream, format,
struct fn_field *f;
int j, len2;
char *kind = "";
CORE_ADDR addr;
val = unpack_long (builtin_type_int, valaddr);
if (val < 128)
addr = unpack_pointer (lookup_pointer_type (builtin_type_void),
valaddr);
if (addr < 128)
{
len = TYPE_NFN_FIELDS (domain);
for (i = 0; i < len; i++)
@ -775,7 +781,7 @@ val_print (type, valaddr, address, stream, format,
for (j = 0; j < len2; j++)
{
QUIT;
if (TYPE_FN_FIELD_VOFFSET (f, j) == val)
if (TYPE_FN_FIELD_VOFFSET (f, j) == addr)
{
kind = "virtual";
goto common;
@ -785,7 +791,7 @@ val_print (type, valaddr, address, stream, format,
}
else
{
struct symbol *sym = find_pc_function ((CORE_ADDR) val);
struct symbol *sym = find_pc_function (addr);
if (sym == 0)
error ("invalid pointer to member function");
len = TYPE_NFN_FIELDS (domain);
@ -821,7 +827,7 @@ val_print (type, valaddr, address, stream, format,
}
fprintf_filtered (stream, "(");
type_print (type, "", stream, -1);
fprintf_filtered (stream, ") %d", (int) val >> 3);
fprintf_filtered (stream, ") %d", (int) addr >> 3);
}
else if (TYPE_CODE (TYPE_TARGET_TYPE (type)) == TYPE_CODE_MEMBER)
{
@ -869,7 +875,7 @@ val_print (type, valaddr, address, stream, format,
}
else
{
CORE_ADDR addr = (CORE_ADDR) unpack_long (type, valaddr);
CORE_ADDR addr = unpack_pointer (type, valaddr);
elttype = TYPE_TARGET_TYPE (type);
if (TYPE_CODE (elttype) == TYPE_CODE_FUNC)
@ -968,7 +974,7 @@ val_print (type, valaddr, address, stream, format,
else /* print vtbl's nicely */
if (is_vtbl_member(type))
{
CORE_ADDR vt_address = (CORE_ADDR) unpack_long (type, valaddr);
CORE_ADDR vt_address = unpack_pointer (type, valaddr);
int vt_index = find_pc_misc_function (vt_address);
if (vt_index >= 0
@ -981,11 +987,11 @@ val_print (type, valaddr, address, stream, format,
}
if (vtblprint)
{
value val;
value vt_val;
val = value_at (TYPE_TARGET_TYPE (type), vt_address);
val_print (VALUE_TYPE (val), VALUE_CONTENTS (val),
VALUE_ADDRESS (val), stream, format,
vt_val = value_at (TYPE_TARGET_TYPE (type), vt_address);
val_print (VALUE_TYPE (vt_val), VALUE_CONTENTS (vt_val),
VALUE_ADDRESS (vt_val), stream, format,
deref_ref, recurse + 1, pretty);
if (pretty)
{
@ -1018,11 +1024,13 @@ val_print (type, valaddr, address, stream, format,
{
if (TYPE_CODE (TYPE_TARGET_TYPE (type)) != TYPE_CODE_UNDEF)
{
value val = value_at (TYPE_TARGET_TYPE (type),
(CORE_ADDR) unpack_long (builtin_type_int,
valaddr));
val_print (VALUE_TYPE (val), VALUE_CONTENTS (val),
VALUE_ADDRESS (val), stream, format,
value deref_val =
value_at
(TYPE_TARGET_TYPE (type),
unpack_pointer (lookup_pointer_type (builtin_type_void),
valaddr));
val_print (VALUE_TYPE (deref_val), VALUE_CONTENTS (deref_val),
VALUE_ADDRESS (deref_val), stream, format,
deref_ref, recurse + 1, pretty);
}
else
@ -1066,7 +1074,11 @@ val_print (type, valaddr, address, stream, format,
if (i < len)
fputs_filtered (TYPE_FIELD_NAME (type, i), stream);
else
fprintf_filtered (stream, "%d", (int) val);
#ifdef LONG_LONG
fprintf_filtered (stream, "%lld", val);
#else
fprintf_filtered (stream, "%ld", val);
#endif
break;
case TYPE_CODE_FUNC:
@ -1100,7 +1112,7 @@ val_print (type, valaddr, address, stream, format,
char *p;
/* Pointer to first (i.e. lowest address) nonzero character. */
char *first_addr;
unsigned len = TYPE_LENGTH (type);
len = TYPE_LENGTH (type);
#if TARGET_BYTE_ORDER == BIG_ENDIAN
for (p = valaddr;
@ -1442,8 +1454,8 @@ type_print_varspec_suffix (type, stream, show, passed_a_ptr)
fprintf_filtered (stream, ")");
fprintf_filtered (stream, "[");
if (TYPE_LENGTH (type) >= 0
&& TYPE_LENGTH (TYPE_TARGET_TYPE (type)) > 0)
if (/* always true */ /* TYPE_LENGTH (type) >= 0
&& */ TYPE_LENGTH (TYPE_TARGET_TYPE (type)) > 0)
fprintf_filtered (stream, "%d",
(TYPE_LENGTH (type)
/ TYPE_LENGTH (TYPE_TARGET_TYPE (type))));
@ -1763,10 +1775,12 @@ type_print_base (type, stream, show, level)
}
}
#if 0
/* Validate an input or output radix setting, and make sure the user
knows what they really did here. Radix setting is confusing, e.g.
setting the input radix to "10" never changes it! */
/* ARGSUSED */
static void
set_input_radix (args, from_tty, c)
char *args;
@ -1779,7 +1793,9 @@ set_input_radix (args, from_tty, c)
printf_filtered ("Input radix set to decimal %d, hex %x, octal %o\n",
radix, radix, radix);
}
#endif
/* ARGSUSED */
static void
set_output_radix (args, from_tty, c)
char *args;