FreeChainXenon/binutils-gdb
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* values.c (unpack_long, value_from_longest): Handle

Browse source 
TYPE_CODE_BOOL and TYPE_CODE_CHAR.
This commit is contained in:
John Gilmore 1991-09-19 03:07:56 +00:00
parent a10c0d365a
commit 35505d07d7
1 changed files with 8 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
gdb/values.c
View file

@ -557,6 +557,9 @@ value_as_pointer (val)
to member which reaches here is considered to be equivalent to member which reaches here is considered to be equivalent
to an INT (or some size). After all, it is only an offset. */ to an INT (or some size). After all, it is only an offset. */
/* FIXME: This should be rewritten as a switch statement for speed and
ease of comprehension. */
LONGEST LONGEST
unpack_long (type, valaddr) unpack_long (type, valaddr)
struct type *type; struct type *type;
@ -566,7 +569,7 @@ unpack_long (type, valaddr)
register int len = TYPE_LENGTH (type); register int len = TYPE_LENGTH (type);
register int nosign = TYPE_UNSIGNED (type); register int nosign = TYPE_UNSIGNED (type);
if (code == TYPE_CODE_ENUM) if (code == TYPE_CODE_ENUM || code == TYPE_CODE_BOOL)
code = TYPE_CODE_INT; code = TYPE_CODE_INT;
if (code == TYPE_CODE_FLT) if (code == TYPE_CODE_FLT)
{ {
@ -699,6 +702,8 @@ unpack_long (type, valaddr)
} }
else if (code == TYPE_CODE_MEMBER) else if (code == TYPE_CODE_MEMBER)
error ("not implemented: member types in unpack_long"); error ("not implemented: member types in unpack_long");
else if (code == TYPE_CODE_CHAR)
return *(unsigned char *)valaddr;
error ("Value not integer or pointer."); error ("Value not integer or pointer.");
return 0; /* For lint -- never reached */ return 0; /* For lint -- never reached */
@ -1408,7 +1413,8 @@ value_from_longest (type, num)
/* FIXME, we assume that pointers have the same form and byte order as /* FIXME, we assume that pointers have the same form and byte order as
integers, and that all pointers have the same form. */ integers, and that all pointers have the same form. */
if (code == TYPE_CODE_INT || code == TYPE_CODE_ENUM || code == TYPE_CODE_PTR) if (code == TYPE_CODE_INT || code == TYPE_CODE_ENUM ||
code == TYPE_CODE_CHAR || code == TYPE_CODE_PTR)
{ {
if (len == sizeof (char)) if (len == sizeof (char))
* (char *) VALUE_CONTENTS_RAW (val) = num; * (char *) VALUE_CONTENTS_RAW (val) = num;