diff options
| author | Pierre-Marie de Rodat <derodat@adacore.com> | 2015-06-04 10:38:17 +0000 |
|---|---|---|
| committer | Eric Botcazou <ebotcazou@gcc.gnu.org> | 2015-06-04 10:38:17 +0000 |
| commit | 3e7e725b26b409c33aad9a94d747432f72e714a8 (patch) | |
| tree | a378fd8bc5237346d3be87de263fa332d4355556 /gcc/ada/gcc-interface/decl.c | |
| parent | e7f40208e1a14281ef5b2ec50f947335e761648f (diff) | |
| download | gcc-3e7e725b26b409c33aad9a94d747432f72e714a8.zip gcc-3e7e725b26b409c33aad9a94d747432f72e714a8.tar.gz gcc-3e7e725b26b409c33aad9a94d747432f72e714a8.tar.bz2 | |
decl.c (gnat_to_gnu_entity): If processing a definition...
* gcc-interface/decl.c (gnat_to_gnu_entity) <E_Function>: If
processing a definition, create definitions for padding types
around return types.
From-SVN: r224121
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 dd2b06f..5eaab17 100644 --- a/gcc/ada/gcc-interface/decl.c +++ b/gcc/ada/gcc-interface/decl.c @@ -4252,7 +4252,8 @@ gnat_to_gnu_entity (Entity_Id gnat_entity, tree gnu_expr, int definition) = maybe_pad_type (gnu_return_type, max_size (TYPE_SIZE (gnu_return_type), true), - 0, gnat_entity, false, false, false, true); + 0, gnat_entity, false, false, definition, + true); /* Declare it now since it will never be declared otherwise. This is necessary to ensure that its subtrees are properly |