Commit 0924ddef by Richard Stallman

Renamed TREE_INLINE, TREE_NONLOCAL, TREE_REGDECL, TREE_EXTERNAL.

to DECL_INLINE, DECL_NONLOCAL, DECL_REGISTER, DECL_EXTERNAL.

From-SVN: r1570
parent 1394aabd
...@@ -118,7 +118,7 @@ the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */ ...@@ -118,7 +118,7 @@ the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */
us to do this. */ us to do this. */
#define ENCODE_SECTION_INFO(decl) \ #define ENCODE_SECTION_INFO(decl) \
if (TREE_EXTERNAL (decl) && TREE_PUBLIC (decl)) \ if (DECL_EXTERNAL (decl) && TREE_PUBLIC (decl)) \
SYMBOL_REF_FLAG (XEXP (DECL_RTL (decl), 0)) = 1; SYMBOL_REF_FLAG (XEXP (DECL_RTL (decl), 0)) = 1;
/* Under VMS we write the actual size of the storage to be allocated even /* Under VMS we write the actual size of the storage to be allocated even
......
...@@ -1322,7 +1322,7 @@ dbxout_symbol (decl, local) ...@@ -1322,7 +1322,7 @@ dbxout_symbol (decl, local)
case FUNCTION_DECL: case FUNCTION_DECL:
if (DECL_RTL (decl) == 0) if (DECL_RTL (decl) == 0)
return; return;
if (TREE_EXTERNAL (decl)) if (DECL_EXTERNAL (decl))
break; break;
/* Don't mention a nested function under its parent. */ /* Don't mention a nested function under its parent. */
context = decl_function_context (decl); context = decl_function_context (decl);
...@@ -1478,7 +1478,7 @@ dbxout_symbol (decl, local) ...@@ -1478,7 +1478,7 @@ dbxout_symbol (decl, local)
return; return;
/* Don't mention a variable that is external. /* Don't mention a variable that is external.
Let the file that defines it describe it. */ Let the file that defines it describe it. */
if (TREE_EXTERNAL (decl)) if (DECL_EXTERNAL (decl))
break; break;
/* If the variable is really a constant /* If the variable is really a constant
......
...@@ -2551,7 +2551,7 @@ inline void ...@@ -2551,7 +2551,7 @@ inline void
inline_attribute (decl) inline_attribute (decl)
register tree decl; register tree decl;
{ {
if (TREE_INLINE (decl)) if (DECL_INLINE (decl))
{ {
ASM_OUTPUT_DWARF_ATTRIBUTE (asm_out_file, AT_inline); ASM_OUTPUT_DWARF_ATTRIBUTE (asm_out_file, AT_inline);
ASM_OUTPUT_DWARF_STRING (asm_out_file, ""); ASM_OUTPUT_DWARF_STRING (asm_out_file, "");
...@@ -3001,7 +3001,7 @@ output_global_subroutine_die (arg) ...@@ -3001,7 +3001,7 @@ output_global_subroutine_die (arg)
equate_decl_number_to_die_number (decl); equate_decl_number_to_die_number (decl);
else else
{ {
if (! TREE_EXTERNAL (decl)) if (! DECL_EXTERNAL (decl))
{ {
char func_end_label[MAX_ARTIFICIAL_LABEL_BYTES]; char func_end_label[MAX_ARTIFICIAL_LABEL_BYTES];
...@@ -3037,7 +3037,7 @@ output_global_variable_die (arg) ...@@ -3037,7 +3037,7 @@ output_global_variable_die (arg)
equate_decl_number_to_die_number (decl); equate_decl_number_to_die_number (decl);
else else
{ {
if (!TREE_EXTERNAL (decl)) if (!DECL_EXTERNAL (decl))
location_or_const_value_attribute (decl); location_or_const_value_attribute (decl);
} }
} }
...@@ -4106,7 +4106,7 @@ output_decl (decl, containing_scope) ...@@ -4106,7 +4106,7 @@ output_decl (decl, containing_scope)
to the DWARF version 1 specification, don't output DIEs for to the DWARF version 1 specification, don't output DIEs for
mere external function declarations. */ mere external function declarations. */
if (TREE_EXTERNAL (decl)) if (DECL_EXTERNAL (decl))
#if (DWARF_VERSION > 1) #if (DWARF_VERSION > 1)
if (debug_info_level <= DINFO_LEVEL_TERSE) if (debug_info_level <= DINFO_LEVEL_TERSE)
#endif #endif
...@@ -4133,7 +4133,7 @@ output_decl (decl, containing_scope) ...@@ -4133,7 +4133,7 @@ output_decl (decl, containing_scope)
/* Now output a DIE to represent the function itself. */ /* Now output a DIE to represent the function itself. */
output_die (TREE_PUBLIC (decl) || TREE_EXTERNAL (decl) output_die (TREE_PUBLIC (decl) || DECL_EXTERNAL (decl)
? output_global_subroutine_die ? output_global_subroutine_die
: output_local_subroutine_die, : output_local_subroutine_die,
decl); decl);
...@@ -4153,7 +4153,7 @@ output_decl (decl, containing_scope) ...@@ -4153,7 +4153,7 @@ output_decl (decl, containing_scope)
we need to do here (and all we *can* do here) is to describe we need to do here (and all we *can* do here) is to describe
the *types* of its formal parameters. */ the *types* of its formal parameters. */
if (TREE_EXTERNAL (decl)) if (DECL_EXTERNAL (decl))
output_formal_types (TREE_TYPE (decl)); output_formal_types (TREE_TYPE (decl));
else else
{ {
...@@ -4385,7 +4385,7 @@ output_decl (decl, containing_scope) ...@@ -4385,7 +4385,7 @@ output_decl (decl, containing_scope)
generated any DIEs to represent mere external object declarations. */ generated any DIEs to represent mere external object declarations. */
#if (DWARF_VERSION <= 1) #if (DWARF_VERSION <= 1)
if (TREE_EXTERNAL (decl) && ! TREE_PUBLIC (decl)) if (DECL_EXTERNAL (decl) && ! TREE_PUBLIC (decl))
break; break;
#endif #endif
...@@ -4427,7 +4427,7 @@ output_decl (decl, containing_scope) ...@@ -4427,7 +4427,7 @@ output_decl (decl, containing_scope)
func = output_formal_parameter_die; func = output_formal_parameter_die;
else else
{ {
if (TREE_PUBLIC (decl) || TREE_EXTERNAL (decl)) if (TREE_PUBLIC (decl) || DECL_EXTERNAL (decl))
func = output_global_variable_die; func = output_global_variable_die;
else else
func = output_local_variable_die; func = output_local_variable_die;
...@@ -4491,7 +4491,7 @@ dwarfout_file_scope_decl (decl, set_finalizing) ...@@ -4491,7 +4491,7 @@ dwarfout_file_scope_decl (decl, set_finalizing)
a builtin function. Explicit programmer-supplied declarations of a builtin function. Explicit programmer-supplied declarations of
these same functions should NOT be ignored however. */ these same functions should NOT be ignored however. */
if (TREE_EXTERNAL (decl) && DECL_FUNCTION_CODE (decl)) if (DECL_EXTERNAL (decl) && DECL_FUNCTION_CODE (decl))
return; return;
/* Ignore this FUNCTION_DECL if it refers to a file-scope extern /* Ignore this FUNCTION_DECL if it refers to a file-scope extern
...@@ -4504,11 +4504,11 @@ dwarfout_file_scope_decl (decl, set_finalizing) ...@@ -4504,11 +4504,11 @@ dwarfout_file_scope_decl (decl, set_finalizing)
lookup mechanism and cause it to miss things which really ought lookup mechanism and cause it to miss things which really ought
to be in scope at a given point. */ to be in scope at a given point. */
if (TREE_EXTERNAL (decl) && !TREE_USED (decl)) if (DECL_EXTERNAL (decl) && !TREE_USED (decl))
return; return;
if (TREE_PUBLIC (decl) if (TREE_PUBLIC (decl)
&& ! TREE_EXTERNAL (decl) && ! DECL_EXTERNAL (decl)
&& ! DECL_ABSTRACT (decl)) && ! DECL_ABSTRACT (decl))
{ {
char label[MAX_ARTIFICIAL_LABEL_BYTES]; char label[MAX_ARTIFICIAL_LABEL_BYTES];
...@@ -4539,11 +4539,11 @@ dwarfout_file_scope_decl (decl, set_finalizing) ...@@ -4539,11 +4539,11 @@ dwarfout_file_scope_decl (decl, set_finalizing)
lookup mechanism and cause it to miss things which really ought lookup mechanism and cause it to miss things which really ought
to be in scope at a given point. */ to be in scope at a given point. */
if (TREE_EXTERNAL (decl) && !TREE_USED (decl)) if (DECL_EXTERNAL (decl) && !TREE_USED (decl))
return; return;
if (TREE_PUBLIC (decl) if (TREE_PUBLIC (decl)
&& ! TREE_EXTERNAL (decl) && ! DECL_EXTERNAL (decl)
&& GET_CODE (DECL_RTL (decl)) == MEM && GET_CODE (DECL_RTL (decl)) == MEM
&& ! DECL_ABSTRACT (decl)) && ! DECL_ABSTRACT (decl))
{ {
......
...@@ -2357,7 +2357,7 @@ simple_operand_p (exp) ...@@ -2357,7 +2357,7 @@ simple_operand_p (exp)
|| (TREE_CODE_CLASS (TREE_CODE (exp)) == 'd' || (TREE_CODE_CLASS (TREE_CODE (exp)) == 'd'
&& ! TREE_ADDRESSABLE (exp) && ! TREE_ADDRESSABLE (exp)
&& ! TREE_THIS_VOLATILE (exp) && ! TREE_THIS_VOLATILE (exp)
&& ! TREE_NONLOCAL (exp))); && ! DECL_NONLOCAL (exp)));
} }
/* Subroutine for fold_truthop: try to optimize a range test. /* Subroutine for fold_truthop: try to optimize a range test.
......
...@@ -496,7 +496,7 @@ create_builtin_decl (code, type, name) ...@@ -496,7 +496,7 @@ create_builtin_decl (code, type, name)
tree decl = build_decl (code, get_identifier (name), type); tree decl = build_decl (code, get_identifier (name), type);
if (code == VAR_DECL) if (code == VAR_DECL)
{ {
TREE_EXTERNAL (decl) = 1; DECL_EXTERNAL (decl) = 1;
TREE_PUBLIC (decl) = 1; TREE_PUBLIC (decl) = 1;
make_decl_rtl (decl, 0, 1); make_decl_rtl (decl, 0, 1);
pushdecl (decl); pushdecl (decl);
...@@ -903,7 +903,7 @@ build_module_descriptor () ...@@ -903,7 +903,7 @@ build_module_descriptor ()
/* Find the name of some global object defined in this file. */ /* Find the name of some global object defined in this file. */
for (t = getdecls (); t; t = TREE_CHAIN (t)) for (t = getdecls (); t; t = TREE_CHAIN (t))
if (TREE_PUBLIC (t) && !TREE_EXTERNAL (t) && DECL_INITIAL (t) != 0) if (TREE_PUBLIC (t) && !DECL_EXTERNAL (t) && DECL_INITIAL (t) != 0)
{ {
global_object_name = IDENTIFIER_POINTER (DECL_NAME (t)); global_object_name = IDENTIFIER_POINTER (DECL_NAME (t));
break; break;
...@@ -945,7 +945,7 @@ build_module_descriptor () ...@@ -945,7 +945,7 @@ build_module_descriptor ()
function_decl = build_decl (FUNCTION_DECL, function_decl = build_decl (FUNCTION_DECL,
get_identifier ("__objc_execClass"), get_identifier ("__objc_execClass"),
function_type); function_type);
TREE_EXTERNAL (function_decl) = 1; DECL_EXTERNAL (function_decl) = 1;
TREE_PUBLIC (function_decl) = 1; TREE_PUBLIC (function_decl) = 1;
pushdecl (function_decl); pushdecl (function_decl);
rest_of_decl_compilation (function_decl, 0, 0, 0); rest_of_decl_compilation (function_decl, 0, 0, 0);
...@@ -1083,7 +1083,7 @@ build_selector_reference (idx) ...@@ -1083,7 +1083,7 @@ build_selector_reference (idx)
else else
{ {
decl = build_decl (VAR_DECL, ident, selector_type); decl = build_decl (VAR_DECL, ident, selector_type);
TREE_EXTERNAL (decl) = 1; DECL_EXTERNAL (decl) = 1;
TREE_PUBLIC (decl) = 1; TREE_PUBLIC (decl) = 1;
TREE_USED (decl) = 1; TREE_USED (decl) = 1;
...@@ -5052,7 +5052,7 @@ handle_class_ref (chain) ...@@ -5052,7 +5052,7 @@ handle_class_ref (chain)
/* Make a decl for this name, so we can use its address in a tree. */ /* Make a decl for this name, so we can use its address in a tree. */
decl = build_decl (VAR_DECL, get_identifier (string), char_type_node); decl = build_decl (VAR_DECL, get_identifier (string), char_type_node);
TREE_EXTERNAL (decl) = 1; DECL_EXTERNAL (decl) = 1;
TREE_PUBLIC (decl) = 1; TREE_PUBLIC (decl) = 1;
pushdecl (decl); pushdecl (decl);
......
...@@ -1697,7 +1697,7 @@ staticp (arg) ...@@ -1697,7 +1697,7 @@ staticp (arg)
case VAR_DECL: case VAR_DECL:
case FUNCTION_DECL: case FUNCTION_DECL:
case CONSTRUCTOR: case CONSTRUCTOR:
return TREE_STATIC (arg) || TREE_EXTERNAL (arg); return TREE_STATIC (arg) || DECL_EXTERNAL (arg);
case STRING_CST: case STRING_CST:
return 1; return 1;
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment