diff options
| author | Eric Botcazou <ebotcazou@adacore.com> | 2016-02-29 09:21:12 +0000 |
|---|---|---|
| committer | Eric Botcazou <ebotcazou@gcc.gnu.org> | 2016-02-29 09:21:12 +0000 |
| commit | 68ec5613422d80f61d93d493de42397b05f886f6 (patch) | |
| tree | 0905e8d58d63cd1c71325db4d1d90581594ca16a | |
| parent | 5d2a63dc7bb7942ba287323d89cdf622015c1e39 (diff) | |
| download | gcc-68ec5613422d80f61d93d493de42397b05f886f6.zip gcc-68ec5613422d80f61d93d493de42397b05f886f6.tar.gz gcc-68ec5613422d80f61d93d493de42397b05f886f6.tar.bz2 | |
decl.c (gnat_to_gnu_entity): In ASIS mode, fully lay out the minimal record type.
* gcc-interface/decl.c (gnat_to_gnu_entity) <Concurrent types>: In
ASIS mode, fully lay out the minimal record type.
From-SVN: r233806
| -rw-r--r-- | gcc/ada/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/ada/gcc-interface/decl.c | 3 |
2 files changed, 7 insertions, 1 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 9fcf75c..ebb7b0e 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,5 +1,10 @@ 2016-02-29 Eric Botcazou <ebotcazou@adacore.com> + * gcc-interface/decl.c (gnat_to_gnu_entity) <Concurrent types>: In + ASIS mode, fully lay out the minimal record type. + +2016-02-29 Eric Botcazou <ebotcazou@adacore.com> + * gcc-interface/trans.c (finalize_nrv_r): Remove obsolete code. (build_return_expr): Likewise. (Call_to_gnu): If this is a function call and there is no target, diff --git a/gcc/ada/gcc-interface/decl.c b/gcc/ada/gcc-interface/decl.c index b4ba8e5..af85e80 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; |