diff options
| author | ebotcazou <ebotcazou@138bc75d-0d04-0410-961f-82ee72b054a4> | 2016-02-29 09:21:12 +0000 |
|---|---|---|
| committer | ebotcazou <ebotcazou@138bc75d-0d04-0410-961f-82ee72b054a4> | 2016-02-29 09:21:12 +0000 |
| commit | bd67e011a6a53d6d670c2a76b821143456b6014d (patch) | |
| tree | 0905e8d58d63cd1c71325db4d1d90581594ca16a /gcc/ada/gcc-interface/decl.c | |
| parent | bb54a53833cb5b71c9d14a31541ecee3d42a3e8d (diff) | |
| download | gcc-bd67e011a6a53d6d670c2a76b821143456b6014d.tar.gz | |
* gcc-interface/decl.c (gnat_to_gnu_entity) <Concurrent types>: In
ASIS mode, fully lay out the minimal record type.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@233806 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/gcc-interface/decl.c')
| -rw-r--r-- | gcc/ada/gcc-interface/decl.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/gcc/ada/gcc-interface/decl.c b/gcc/ada/gcc-interface/decl.c index b4ba8e51bce..af85e8080af 100644 --- a/gcc/ada/gcc-interface/decl.c +++ b/gcc/ada/gcc-interface/decl.c @@ -4926,7 +4926,8 @@ gnat_to_gnu_entity (Entity_Id gnat_entity, tree gnu_expr, int definition) gnu_field_list = gnu_field; } - TYPE_FIELDS (gnu_type) = nreverse (gnu_field_list); + finish_record_type (gnu_type, nreverse (gnu_field_list), 0, + false); } else gnu_type = void_type_node; |