diff options
| author | Eric Botcazou <ebotcazou@adacore.com> | 2019-08-30 14:39:09 +0000 |
|---|---|---|
| committer | Eric Botcazou <ebotcazou@gcc.gnu.org> | 2019-08-30 14:39:09 +0000 |
| commit | 37cf9302639271ff141d2ff7b4e29e60a401785c (patch) | |
| tree | c406145025dd8b4bc1a7918b27604e250b85bce0 /gcc/ada | |
| parent | da81cc570f27e78f71fed25d3c21a1d7d7f3ed66 (diff) | |
| download | gcc-37cf9302639271ff141d2ff7b4e29e60a401785c.zip gcc-37cf9302639271ff141d2ff7b4e29e60a401785c.tar.gz gcc-37cf9302639271ff141d2ff7b4e29e60a401785c.tar.bz2 | |
decl.c (annotate_value): Inline the call also if List_Representation_Info is greater than 3.
* gcc-interface/decl.c (annotate_value) <CALL_EXPR>: Inline the call
also if List_Representation_Info is greater than 3.
From-SVN: r275188
Diffstat (limited to 'gcc/ada')
| -rw-r--r-- | gcc/ada/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/ada/gcc-interface/decl.c | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index af3db1d..5f004a9 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,5 +1,10 @@ 2019-08-30 Eric Botcazou <ebotcazou@adacore.com> + * gcc-interface/decl.c (annotate_value) <CALL_EXPR>: Inline the call + also if List_Representation_Info is greater than 3. + +2019-08-30 Eric Botcazou <ebotcazou@adacore.com> + * gcc-interface/trans.c (Attribute_to_gnu) <Attr_Size>: Add assertion. 2019-08-30 Eric Botcazou <ebotcazou@adacore.com> diff --git a/gcc/ada/gcc-interface/decl.c b/gcc/ada/gcc-interface/decl.c index 54ceb8d..0695c2f 100644 --- a/gcc/ada/gcc-interface/decl.c +++ b/gcc/ada/gcc-interface/decl.c @@ -8398,7 +8398,7 @@ annotate_value (tree gnu_size) /* In regular mode, inline back only if symbolic annotation is requested in order to avoid memory explosion on big discriminated record types. But not in ASIS mode, as symbolic annotation is required for DDA. */ - if (List_Representation_Info == 3 || type_annotate_only) + if (List_Representation_Info >= 3 || type_annotate_only) { tree t = maybe_inline_call_in_expr (gnu_size); return t ? annotate_value (t) : No_Uint; |