aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/gcc-interface/utils.c
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/gcc-interface/utils.c')
-rw-r--r--gcc/ada/gcc-interface/utils.c6
1 files changed, 1 insertions, 5 deletions
diff --git a/gcc/ada/gcc-interface/utils.c b/gcc/ada/gcc-interface/utils.c
index dcf0558..608f6ec 100644
--- a/gcc/ada/gcc-interface/utils.c
+++ b/gcc/ada/gcc-interface/utils.c
@@ -1976,7 +1976,7 @@ create_subprog_decl (tree subprog_name, tree asm_name,
/* If this is a function nested inside an inlined external function, it
means we aren't going to compile the outer function unless it is
actually inlined, so do the same for us. */
- if (current_function_decl && DECL_INLINE (current_function_decl)
+ if (current_function_decl && DECL_DECLARED_INLINE_P (current_function_decl)
&& DECL_EXTERNAL (current_function_decl))
extern_flag = true;
@@ -2232,10 +2232,6 @@ end_subprog_body (tree body, bool elab_p)
DECL_INITIAL (fndecl) = current_binding_level->block;
gnat_poplevel ();
- /* Deal with inline. If declared inline or we should default to inline,
- set the flag in the decl. */
- DECL_INLINE (fndecl) = 1;
-
/* We handle pending sizes via the elaboration of types, so we don't
need to save them. */
get_pending_sizes ();