Commit 984bc4c3 by Geert Bosch Committed by Geert Bosch

* decl.c: Minor whitespace fixes.

From-SVN: r46654
parent 5dece937
2001-10-30 Geert Bosch <bosch@gnat.com>
* decl.c: Minor whitespace fixes.
2001-10-30 Richard Kenner <kenner@gnat.com>
* utils2.c (build_allocator): Test for SIZE overflow in array case too
......
......@@ -2,7 +2,7 @@
* *
* GNAT COMPILER COMPONENTS *
* *
* D E C L *
* D E C L *
* *
* C Implementation File *
* *
......@@ -720,7 +720,6 @@ gnat_to_gnu_entity (gnat_entity, gnu_expr, definition)
"UNC"));
}
/* Convert the expression to the type of the object except in the
case where the object's type is unconstrained or the object's type
is a padded record whose field is of self-referential size. In
......@@ -1524,7 +1523,6 @@ gnat_to_gnu_entity (gnat_entity, gnu_expr, definition)
size_binop (MINUS_EXPR, gnu_base_max,
gnu_base_min)));
TYPE_NAME (gnu_index_types[index])
= create_concat_name (gnat_entity, field_name);
}
......@@ -1636,7 +1634,6 @@ gnat_to_gnu_entity (gnat_entity, gnu_expr, definition)
debug_info_p);
rest_of_type_compilation (gnu_fat_type, global_bindings_p ());
/* Create a record type for the object and its template and
set the template at a negative offset. */
tem = build_unc_object_type (gnu_template_type, tem,
......@@ -4289,7 +4286,6 @@ elaborate_expression_1 (gnat_expr, gnat_entity, gnu_expr, gnu_name, definition,
build (PLACEHOLDER_EXPR, DECL_CONTEXT (gnu_expr)),
gnu_expr);
/* If GNU_EXPR is neither a placeholder nor a constant, nor a variable
that is a constant, make a variable that is initialized to contain the
bound when the package containing the definition is elaborated. If
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment