From 916549397d42da052dc3c2c098f8682f01ae5d2f Mon Sep 17 00:00:00 2001 From: Tristan Gingold Date: Wed, 19 Dec 2007 17:25:33 +0100 Subject: [PATCH] utils.c (create_var_decl_1): call rest_of_decl_compilation only for global variable. 2007-12-19 Tristan Gingold * utils.c (create_var_decl_1): call rest_of_decl_compilation only for global variable. From-SVN: r131083 --- gcc/ada/utils.c | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/gcc/ada/utils.c b/gcc/ada/utils.c index 9e90ba1fbe3e..a82cc79cd651 100644 --- a/gcc/ada/utils.c +++ b/gcc/ada/utils.c @@ -1467,7 +1467,10 @@ create_var_decl_1 (tree var_name, tree asm_name, tree type, tree var_init, TREE_ADDRESSABLE (var_decl) = 1; if (TREE_CODE (var_decl) != CONST_DECL) - rest_of_decl_compilation (var_decl, global_bindings_p (), 0); + { + if (global_bindings_p ()) + rest_of_decl_compilation (var_decl, true, 0); + } else expand_decl (var_decl); -- 2.47.2