diff options
| author | Geert Bosch <bosch@gnat.com> | 2001-10-30 22:33:07 +0100 |
|---|---|---|
| committer | Geert Bosch <bosch@gcc.gnu.org> | 2001-10-30 22:33:07 +0100 |
| commit | 984bc4c317ca27beaea0df799fe06da1f029ca7b (patch) | |
| tree | d0f77069d4dd9bf7cedaeeb0ed0cc5d2edb05052 | |
| parent | 5dece937ef0712e0d60863f0db867d0abe72623a (diff) | |
| download | gcc-984bc4c317ca27beaea0df799fe06da1f029ca7b.zip gcc-984bc4c317ca27beaea0df799fe06da1f029ca7b.tar.gz gcc-984bc4c317ca27beaea0df799fe06da1f029ca7b.tar.bz2 | |
* decl.c: Minor whitespace fixes.
From-SVN: r46654
| -rw-r--r-- | gcc/ada/ChangeLog | 4 | ||||
| -rw-r--r-- | gcc/ada/decl.c | 6 |
2 files changed, 5 insertions, 5 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index ea236fc..ed98b30 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,7 @@ +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 diff --git a/gcc/ada/decl.c b/gcc/ada/decl.c index 7c266e2..6207cb7 100644 --- a/gcc/ada/decl.c +++ b/gcc/ada/decl.c @@ -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 |