parent
5ded725413
commit
b15341b8ef
|
@ -1,3 +1,7 @@
|
||||||
|
2005-08-01 Kazu Hirata <kazu@codesourcery.com>
|
||||||
|
|
||||||
|
* decl.c, utils.c: Fix comment typos.
|
||||||
|
|
||||||
2005-07-29 Kazu Hirata <kazu@codesourcery.com>
|
2005-07-29 Kazu Hirata <kazu@codesourcery.com>
|
||||||
|
|
||||||
* decl.c, init.c, initialize.c: Fix comment typos.
|
* decl.c, init.c, initialize.c: Fix comment typos.
|
||||||
|
|
|
@ -1100,7 +1100,7 @@ gnat_to_gnu_entity (Entity_Id gnat_entity, tree gnu_expr, int definition)
|
||||||
SET_DECL_CONST_CORRESPONDING_VAR (gnu_decl, gnu_corr_var);
|
SET_DECL_CONST_CORRESPONDING_VAR (gnu_decl, gnu_corr_var);
|
||||||
}
|
}
|
||||||
|
|
||||||
/* If this is declared in a block that contains an block with an
|
/* If this is declared in a block that contains a block with an
|
||||||
exception handler, we must force this variable in memory to
|
exception handler, we must force this variable in memory to
|
||||||
suppress an invalid optimization. */
|
suppress an invalid optimization. */
|
||||||
if (Has_Nested_Block_With_Handler (Scope (gnat_entity))
|
if (Has_Nested_Block_With_Handler (Scope (gnat_entity))
|
||||||
|
|
|
@ -712,7 +712,7 @@ finish_record_type (tree record_type, tree fieldlist, bool has_rep,
|
||||||
tree this_ada_size = DECL_SIZE (field);
|
tree this_ada_size = DECL_SIZE (field);
|
||||||
|
|
||||||
/* We need to make an XVE/XVU record if any field has variable size,
|
/* We need to make an XVE/XVU record if any field has variable size,
|
||||||
whether or not the record does. For example, if we have an union,
|
whether or not the record does. For example, if we have a union,
|
||||||
it may be that all fields, rounded up to the alignment, have the
|
it may be that all fields, rounded up to the alignment, have the
|
||||||
same size, in which case we'll use that size. But the debug
|
same size, in which case we'll use that size. But the debug
|
||||||
output routines (except Dwarf2) won't be able to output the fields,
|
output routines (except Dwarf2) won't be able to output the fields,
|
||||||
|
@ -826,7 +826,7 @@ write_record_type_debug_info (tree record_type)
|
||||||
for (field = fieldlist; field; field = TREE_CHAIN (field))
|
for (field = fieldlist; field; field = TREE_CHAIN (field))
|
||||||
{
|
{
|
||||||
/* We need to make an XVE/XVU record if any field has variable size,
|
/* We need to make an XVE/XVU record if any field has variable size,
|
||||||
whether or not the record does. For example, if we have an union,
|
whether or not the record does. For example, if we have a union,
|
||||||
it may be that all fields, rounded up to the alignment, have the
|
it may be that all fields, rounded up to the alignment, have the
|
||||||
same size, in which case we'll use that size. But the debug
|
same size, in which case we'll use that size. But the debug
|
||||||
output routines (except Dwarf2) won't be able to output the fields,
|
output routines (except Dwarf2) won't be able to output the fields,
|
||||||
|
|
Loading…
Reference in New Issue