diff options
author | bosch <bosch@138bc75d-0d04-0410-961f-82ee72b054a4> | 2001-10-30 21:33:07 +0000 |
---|---|---|
committer | bosch <bosch@138bc75d-0d04-0410-961f-82ee72b054a4> | 2001-10-30 21:33:07 +0000 |
commit | 575fa019e84ab3016d3b9c52993bfb7737f52536 (patch) | |
tree | d0f77069d4dd9bf7cedaeeb0ed0cc5d2edb05052 /gcc | |
parent | 12399861c91cfa309e2c0c603f940b3568598cda (diff) | |
download | gcc-575fa019e84ab3016d3b9c52993bfb7737f52536.tar.gz |
* decl.c: Minor whitespace fixes.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@46654 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc')
-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 ea236fc6145..ed98b303675 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 7c266e22c6b..6207cb76054 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 |