OSDN Git Service

Renamed TREE_INLINE, TREE_NONLOCAL, TREE_REGDECL, TREE_EXTERNAL.
authorrms <rms@138bc75d-0d04-0410-961f-82ee72b054a4>
Sun, 12 Jul 1992 03:06:32 +0000 (03:06 +0000)
committerrms <rms@138bc75d-0d04-0410-961f-82ee72b054a4>
Sun, 12 Jul 1992 03:06:32 +0000 (03:06 +0000)
to DECL_INLINE, DECL_NONLOCAL, DECL_REGISTER, DECL_EXTERNAL.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@1570 138bc75d-0d04-0410-961f-82ee72b054a4

gcc/config/vax/vms.h
gcc/dbxout.c
gcc/dwarfout.c
gcc/fold-const.c
gcc/objc/objc-act.c
gcc/tree.c

index e472357..f7a7de3 100644 (file)
@@ -118,7 +118,7 @@ the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.  */
    us to do this.  */
 
 #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; 
 
 /* Under VMS we write the actual size of the storage to be allocated even
index 650ec62..a00258a 100644 (file)
@@ -1322,7 +1322,7 @@ dbxout_symbol (decl, local)
     case FUNCTION_DECL:
       if (DECL_RTL (decl) == 0)
        return;
-      if (TREE_EXTERNAL (decl))
+      if (DECL_EXTERNAL (decl))
        break;
       /* Don't mention a nested function under its parent.  */
       context = decl_function_context (decl);
@@ -1478,7 +1478,7 @@ dbxout_symbol (decl, local)
        return;
       /* Don't mention a variable that is external.
         Let the file that defines it describe it.  */
-      if (TREE_EXTERNAL (decl))
+      if (DECL_EXTERNAL (decl))
        break;
 
       /* If the variable is really a constant
index 9dc675b..e25fff4 100644 (file)
@@ -2551,7 +2551,7 @@ inline void
 inline_attribute (decl)
      register tree decl;
 {
-  if (TREE_INLINE (decl))
+  if (DECL_INLINE (decl))
     {
       ASM_OUTPUT_DWARF_ATTRIBUTE (asm_out_file, AT_inline);
       ASM_OUTPUT_DWARF_STRING (asm_out_file, "");
@@ -3001,7 +3001,7 @@ output_global_subroutine_die (arg)
     equate_decl_number_to_die_number (decl);
   else
     {
-      if (! TREE_EXTERNAL (decl))
+      if (! DECL_EXTERNAL (decl))
        {
          char func_end_label[MAX_ARTIFICIAL_LABEL_BYTES];
 
@@ -3037,7 +3037,7 @@ output_global_variable_die (arg)
     equate_decl_number_to_die_number (decl);
   else
     {
-      if (!TREE_EXTERNAL (decl))
+      if (!DECL_EXTERNAL (decl))
        location_or_const_value_attribute (decl);
     }
 }
@@ -4106,7 +4106,7 @@ output_decl (decl, containing_scope)
         to the DWARF version 1 specification, don't output DIEs for
         mere external function declarations.  */
 
-      if (TREE_EXTERNAL (decl))
+      if (DECL_EXTERNAL (decl))
 #if (DWARF_VERSION > 1)
        if (debug_info_level <= DINFO_LEVEL_TERSE)
 #endif
@@ -4133,7 +4133,7 @@ output_decl (decl, containing_scope)
 
       /* 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_local_subroutine_die,
                  decl);
@@ -4153,7 +4153,7 @@ output_decl (decl, containing_scope)
         we need to do here (and all we *can* do here) is to describe
         the *types* of its formal parameters.  */
 
-      if (TREE_EXTERNAL (decl))
+      if (DECL_EXTERNAL (decl))
        output_formal_types (TREE_TYPE (decl));
       else
        {
@@ -4385,7 +4385,7 @@ output_decl (decl, containing_scope)
         generated any DIEs to represent mere external object declarations.  */
 
 #if (DWARF_VERSION <= 1)
-      if (TREE_EXTERNAL (decl) && ! TREE_PUBLIC (decl))
+      if (DECL_EXTERNAL (decl) && ! TREE_PUBLIC (decl))
        break;
 #endif
 
@@ -4427,7 +4427,7 @@ output_decl (decl, containing_scope)
          func = output_formal_parameter_die;
        else
          {
-           if (TREE_PUBLIC (decl) || TREE_EXTERNAL (decl))
+           if (TREE_PUBLIC (decl) || DECL_EXTERNAL (decl))
              func = output_global_variable_die;
            else
              func = output_local_variable_die;
@@ -4491,7 +4491,7 @@ dwarfout_file_scope_decl (decl, set_finalizing)
         a builtin function.  Explicit programmer-supplied declarations of
         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;
 
       /* Ignore this FUNCTION_DECL if it refers to a file-scope extern
@@ -4504,11 +4504,11 @@ dwarfout_file_scope_decl (decl, set_finalizing)
         lookup mechanism and cause it to miss things which really ought
         to be in scope at a given point.  */
 
-      if (TREE_EXTERNAL (decl) && !TREE_USED (decl))
+      if (DECL_EXTERNAL (decl) && !TREE_USED (decl))
        return;
 
       if (TREE_PUBLIC (decl)
-         && ! TREE_EXTERNAL (decl)
+         && ! DECL_EXTERNAL (decl)
          && ! DECL_ABSTRACT (decl))
        {
          char label[MAX_ARTIFICIAL_LABEL_BYTES];
@@ -4539,11 +4539,11 @@ dwarfout_file_scope_decl (decl, set_finalizing)
         lookup mechanism and cause it to miss things which really ought
         to be in scope at a given point.  */
 
-      if (TREE_EXTERNAL (decl) && !TREE_USED (decl))
+      if (DECL_EXTERNAL (decl) && !TREE_USED (decl))
        return;
 
       if (TREE_PUBLIC (decl)
-         && ! TREE_EXTERNAL (decl)
+         && ! DECL_EXTERNAL (decl)
          && GET_CODE (DECL_RTL (decl)) == MEM
          && ! DECL_ABSTRACT (decl))
        {
index 53d9450..ed3f7dd 100644 (file)
@@ -2357,7 +2357,7 @@ simple_operand_p (exp)
          || (TREE_CODE_CLASS (TREE_CODE (exp)) == 'd'
              && ! TREE_ADDRESSABLE (exp)
              && ! TREE_THIS_VOLATILE (exp)
-             && ! TREE_NONLOCAL (exp)));
+             && ! DECL_NONLOCAL (exp)));
 }
 \f
 /* Subroutine for fold_truthop: try to optimize a range test.
index 52db636..e5d271c 100644 (file)
@@ -496,7 +496,7 @@ create_builtin_decl (code, type, name)
   tree decl = build_decl (code, get_identifier (name), type);
   if (code == VAR_DECL)
     {
-      TREE_EXTERNAL (decl) = 1;
+      DECL_EXTERNAL (decl) = 1;
       TREE_PUBLIC (decl) = 1;
       make_decl_rtl (decl, 0, 1);
       pushdecl (decl);
@@ -903,7 +903,7 @@ build_module_descriptor ()
 
     /* Find the name of some global object defined in this file.  */
     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));
          break;
@@ -945,7 +945,7 @@ build_module_descriptor ()
     function_decl = build_decl (FUNCTION_DECL,  
                                get_identifier ("__objc_execClass"),  
                                function_type);
-    TREE_EXTERNAL (function_decl) = 1;
+    DECL_EXTERNAL (function_decl) = 1;
     TREE_PUBLIC (function_decl) = 1;
     pushdecl (function_decl);
     rest_of_decl_compilation (function_decl, 0, 0, 0);
@@ -1083,7 +1083,7 @@ build_selector_reference (idx)
   else 
     {
       decl = build_decl (VAR_DECL, ident, selector_type);
-      TREE_EXTERNAL (decl) = 1;
+      DECL_EXTERNAL (decl) = 1;
       TREE_PUBLIC (decl) = 1;
       TREE_USED (decl) = 1;
   
@@ -5052,7 +5052,7 @@ handle_class_ref (chain)
 
   /* 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);
-  TREE_EXTERNAL (decl) = 1;
+  DECL_EXTERNAL (decl) = 1;
   TREE_PUBLIC (decl) = 1;
 
   pushdecl (decl);
index c670783..e389770 100644 (file)
@@ -1697,7 +1697,7 @@ staticp (arg)
     case VAR_DECL:
     case FUNCTION_DECL:
     case CONSTRUCTOR:
-      return TREE_STATIC (arg) || TREE_EXTERNAL (arg);
+      return TREE_STATIC (arg) || DECL_EXTERNAL (arg);
 
     case STRING_CST:
       return 1;