FreeChainXenon/gcc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

dwarfout.c (byte_size_attribute): Add local var upper_bound and add case to handle STRING_TYPE.

Browse source 
* dwarfout.c (byte_size_attribute):  Add local var upper_bound
        and add case to handle STRING_TYPE.
        * dwarfout.c (output_string_type_die):  Fix code to generate
        correct string length attribute for fixed length strings.
        Still needs support for varying length strings.

From-SVN: r16498
This commit is contained in:
Fred Fish 1997-11-14 16:07:17 +00:00 • committed by Jeff Law
parent ea46619609
commit 874a8709bf
2 changed files with 22 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
gcc/ChangeLog
View file

@ -1,3 +1,11 @@
Fri Nov 14 09:09:20 1997 Fred Fish (fnf@cygnus.com)
* dwarfout.c (byte_size_attribute): Add local var upper_bound
and add case to handle STRING_TYPE.
* dwarfout.c (output_string_type_die): Fix code to generate
correct string length attribute for fixed length strings.
Still needs support for varying length strings.
Fri Nov 14 08:46:56 1997 Jeffrey A Law (law@cygnus.com)
* toplev.c (get_run_time): Do something sensible for cygwin32.

18
gcc/dwarfout.c
View file

@ -2653,6 +2653,17 @@ byte_size_attribute (tree_node)
/ BITS_PER_UNIT;
break;
/* This goes with the hack for case ARRAY_TYPE in output_type() since
the Chill front end represents strings using ARRAY_TYPE. */
case ARRAY_TYPE:
{
/* The lower bound is zero, so the length is the upper bound + 1. */
register tree upper_bound;
upper_bound = TYPE_MAX_VALUE (TYPE_DOMAIN (tree_node));
size = (unsigned) TREE_INT_CST_LOW (upper_bound) + 1;
break;
}
default:
abort ();
}
@ -3705,11 +3716,10 @@ output_string_type_die (arg)
ASM_OUTPUT_DWARF_TAG (asm_out_file, TAG_string_type);
sibling_attribute ();
equate_type_number_to_die_number (type);
member_attribute (TYPE_CONTEXT (type));
/* Fudge the string length attribute for now. */
string_length_attribute (TYPE_MAX_VALUE (TYPE_DOMAIN (type)));
/* this is a fixed length string */
byte_size_attribute (type);
}
static void