MatCat.OpenSource/8sa1-gcc
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

* decl.c: Minor whitespace fixes.

Browse Source 
From-SVN: r46654
This commit is contained in:
Geert Bosch 2001-10-30 22:33:07 +01:00 committed by Geert Bosch
parent 5dece937ef
commit 984bc4c317
2 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
gcc/ada/ChangeLog
View File

@ -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

6
gcc/ada/decl.c
View File

@ -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