2
0
mirror of git://gcc.gnu.org/git/gcc.git synced 2025-04-15 13:41:13 +08:00

decl.c (gnat_to_gnu_entity): Use record type instead of enumeral type as the dummy type built for the...

* gcc-interface/decl.c (gnat_to_gnu_entity) <E_Access_Type>: Use record
	type instead of enumeral type as the dummy type built for the template
	type of fat pointers.

From-SVN: r164417
This commit is contained in:
Eric Botcazou 2010-09-19 13:55:36 +00:00 committed by Eric Botcazou
parent 2231f17fa0
commit 12e8621893
2 changed files with 7 additions and 1 deletions
gcc/ada
ChangeLog
gcc-interface

@ -1,3 +1,9 @@
2010-09-19 Eric Botcazou <ebotcazou@adacore.com>
* gcc-interface/decl.c (gnat_to_gnu_entity) <E_Access_Type>: Use record
type instead of enumeral type as the dummy type built for the template
type of fat pointers.
2010-09-19 Eric Botcazou <ebotcazou@adacore.com>
* gcc-interface/gigi.h (get_elaboration_procedure): Declare.

@ -3558,7 +3558,7 @@ gnat_to_gnu_entity (Entity_Id gnat_entity, tree gnu_expr, int definition)
gnu_type = TYPE_POINTER_TO (gnu_desig_type);
if (!gnu_type)
{
tree gnu_template_type = make_node (ENUMERAL_TYPE);
tree gnu_template_type = make_node (RECORD_TYPE);
tree gnu_ptr_template = build_pointer_type (gnu_template_type);
tree gnu_array_type = make_node (ENUMERAL_TYPE);
tree gnu_ptr_array = build_pointer_type (gnu_array_type);