On Mon, 15 May 2023 12:05:10 +0200 Eric Botcazou <botca...@adacore.com> wrote:
> > && DECL_RETURN_VALUE_P (inner)) > > diff --git a/gcc/ada/gcc-interface/utils.cc b/gcc/ada/gcc-interface/utils.cc > > index 0c4f8b90c8e..460ef6f1f01 100644 > > --- a/gcc/ada/gcc-interface/utils.cc > > +++ b/gcc/ada/gcc-interface/utils.cc > > @@ -1966,7 +1966,7 @@ finish_record_type (tree record_type, tree field_list, > > int rep_level, bool debug_info_p) > > { > > const enum tree_code orig_code = TREE_CODE (record_type); > > - const bool had_size = TYPE_SIZE (record_type) != NULL_TREE; > > + const bool had_size = COMPLETE_TYPE_P (record_type); > > const bool had_align = TYPE_ALIGN (record_type) > 0; > > /* For all-repped records with a size specified, lay the QUAL_UNION_TYPE > > out just like a UNION_TYPE, since the size will be fixed. */ > > This one is not an improvement but more of a coincidence; the rest is OK. > I've dropped this hunk and installed the rest as r14-974-g04682fe764004b. Thanks!