* coffread.c (decode_base_type): Pass long, not union.

Fix by Eric Valette, ev@chorus.fr.
This commit is contained in:
John Gilmore 1992-02-20 05:25:34 +00:00
parent bccfae1670
commit be8303da55
2 changed files with 12 additions and 8 deletions

View File

@ -7,6 +7,11 @@ Mon Feb 17 07:13:27 1992 Fred Fish (fnf at cygnus.com)
When creating a new user defined type, check to see if a partial
type already exists, and if so, bash it to fit.
Fri Feb 14 19:00:17 1992 John Gilmore (gnu at cygnus.com)
* coffread.c (decode_base_type): Pass long, not union.
Fix by Eric Valette, ev@chorus.fr.
Thu Feb 13 17:14:28 1992 Fred Fish (fnf at cygnus.com)
* elfread.c (elf_symtab_read): Fix code to correctly track

View File

@ -1795,7 +1795,7 @@ decode_base_type (cs, c_type, aux)
type = coff_alloc_type (cs->c_symnum);
TYPE_CODE (type) = TYPE_CODE_STRUCT;
TYPE_NAME (type) = concat ("struct ", "<opaque>", NULL);
TYPE_CPLUS_SPECIFIC(type) = &cplus_struct_default;
INIT_CPLUS_SPECIFIC(type);
TYPE_LENGTH (type) = 0;
TYPE_FIELDS (type) = 0;
TYPE_NFIELDS (type) = 0;
@ -1804,7 +1804,7 @@ decode_base_type (cs, c_type, aux)
{
type = read_struct_type (cs->c_symnum,
aux->x_sym.x_misc.x_lnsz.x_size,
aux->x_sym.x_fcnary.x_fcn.x_endndx);
aux->x_sym.x_fcnary.x_fcn.x_endndx.l);
}
return type;
@ -1814,7 +1814,7 @@ decode_base_type (cs, c_type, aux)
/* anonymous union type */
type = coff_alloc_type (cs->c_symnum);
TYPE_NAME (type) = concat ("union ", "<opaque>", NULL);
TYPE_CPLUS_SPECIFIC(type) = &cplus_struct_default;
INIT_CPLUS_SPECIFIC(type);
TYPE_LENGTH (type) = 0;
TYPE_LENGTH (type) = 0;
TYPE_FIELDS (type) = 0;
@ -1824,7 +1824,7 @@ decode_base_type (cs, c_type, aux)
{
type = read_struct_type (cs->c_symnum,
aux->x_sym.x_misc.x_lnsz.x_size,
aux->x_sym.x_fcnary.x_fcn.x_endndx);
aux->x_sym.x_fcnary.x_fcn.x_endndx.l);
}
TYPE_CODE (type) = TYPE_CODE_UNION;
return type;
@ -1832,7 +1832,7 @@ decode_base_type (cs, c_type, aux)
case T_ENUM:
return read_enum_type (cs->c_symnum,
aux->x_sym.x_misc.x_lnsz.x_size,
aux->x_sym.x_fcnary.x_fcn.x_endndx);
aux->x_sym.x_fcnary.x_fcn.x_endndx.l);
case T_MOE:
/* shouldn't show up here */
@ -1890,7 +1890,7 @@ read_struct_type (index, length, lastsym)
type = coff_alloc_type (index);
TYPE_CODE (type) = TYPE_CODE_STRUCT;
TYPE_CPLUS_SPECIFIC(type) = &cplus_struct_default;
INIT_CPLUS_SPECIFIC(type);
TYPE_LENGTH (type) = length;
while (!done && symnum < lastsym && symnum < nlist_nsyms_global)
@ -2019,8 +2019,7 @@ read_enum_type (index, length, lastsym)
/* Now fill in the fields of the type-structure. */
/* FIXME: Should be sizeof (int) on target, not host. */
TYPE_LENGTH (type) = sizeof (int);
TYPE_LENGTH (type) = TARGET_INT_BIT / TARGET_CHAR_BIT;
TYPE_CODE (type) = TYPE_CODE_ENUM;
TYPE_NFIELDS (type) = nsyms;
TYPE_FIELDS (type) = (struct field *)