From: Richard Kenner <ken...@adacore.com>
gcc/ada/
* exp_ch6.adb (Expand_Ctrl_Function_Call): Inline if -gnatn in
CCG mode even if -O0.
Tested on x86_64-pc-linux-gnu, committed on master.
---
gcc/ada/exp_ch6.adb | 5 +++--
1 file changed, 3 insertions(+), 2 deletions(-)
diff --git a/gcc/ada/exp_ch6.adb b/gcc/ada/exp_ch6.adb
index 005210ce6bd..2e873c9c908 100644
--- a/gcc/ada/exp_ch6.adb
+++ b/gcc/ada/exp_ch6.adb
@@ -5311,10 +5311,11 @@ package body Exp_Ch6 is
then
Expand_Inlined_Call (Call_Node, Subp, Orig_Subp);
- -- Back-end inlining either if optimization is enabled or the call is
- -- required to be inlined.
+ -- Back-end inlining either if optimization is enabled, we're
+ -- generating C, or the call is required to be inlined.
elsif Optimization_Level > 0
+ or else CCG_Mode
or else Has_Pragma_Inline_Always (Subp)
then
Add_Inlined_Body (Subp, Call_Node);
--
2.45.1
