cilk.c (extract_free_variables): Use is_global_var.
authorMarek Polacek <polacek@redhat.com>
Thu, 25 Jun 2015 16:26:05 +0000 (16:26 +0000)
committerMarek Polacek <mpolacek@gcc.gnu.org>
Thu, 25 Jun 2015 16:26:05 +0000 (16:26 +0000)
* cilk.c (extract_free_variables): Use is_global_var.

* c-decl.c: Use is_global_var throughout.
* c-parser.c: Likewise.
* c-typeck.c: Likewise.

From-SVN: r224947

gcc/c-family/ChangeLog
gcc/c-family/cilk.c
gcc/c/ChangeLog
gcc/c/c-decl.c
gcc/c/c-parser.c
gcc/c/c-typeck.c

index cf43d39c0bda9dc1981a7c09741b4c29c52b13c0..ecfb52c03e9281035660065094f83c4228040af0 100644 (file)
@@ -1,3 +1,7 @@
+2015-06-25  Marek Polacek  <polacek@redhat.com>
+
+       * cilk.c (extract_free_variables): Use is_global_var.
+
 2015-06-23  Richard Sandiford  <richard.sandiford@arm.com>
 
        * c-common.c: Don't include target-def.h.
index c38e05f413427dcdc92f6d765059acdfb1f32e84..347e4b9f2a591059fdbc49ad3201a51b7ae254a0 100644 (file)
@@ -1063,7 +1063,7 @@ extract_free_variables (tree t, struct wrapper_data *wd,
        TREE_ADDRESSABLE (t) = 1;
     case VAR_DECL:
     case PARM_DECL:
-      if (!TREE_STATIC (t) && !DECL_EXTERNAL (t))
+      if (!is_global_var (t))
        add_variable (wd, t, how);
       return;
 
index 4bac6e02c356805ded5fd0441a8fab2130e6fd74..c8d1c24c064591244b9d9b3fbf8a6d0dcbc3b7c0 100644 (file)
@@ -1,3 +1,9 @@
+2015-06-25  Marek Polacek  <polacek@redhat.com>
+
+       * c-decl.c: Use is_global_var throughout.
+       * c-parser.c: Likewise.
+       * c-typeck.c: Likewise.
+
 2015-06-17  Andrew MacLeod  <amacleod@redhat.com>
 
        * c-array-notation.c: Do not include input.h, line-map.h or is-a.h.
index fc1fdf97beee1374d66b304d899b50ef9e9275e2..1aa2bd49669895ae5c2f1a882b0da8cc2f111a53 100644 (file)
@@ -4395,7 +4395,7 @@ c_decl_attributes (tree *node, tree attributes, int flags)
   /* Add implicit "omp declare target" attribute if requested.  */
   if (current_omp_declare_target_attribute
       && ((TREE_CODE (*node) == VAR_DECL
-          && (TREE_STATIC (*node) || DECL_EXTERNAL (*node)))
+          && is_global_var (*node))
          || TREE_CODE (*node) == FUNCTION_DECL))
     {
       if (TREE_CODE (*node) == VAR_DECL
@@ -4794,8 +4794,7 @@ finish_decl (tree decl, location_t init_loc, tree init,
           TREE_TYPE (decl) = error_mark_node;
         }
 
-      if ((DECL_EXTERNAL (decl) || TREE_STATIC (decl))
-         && DECL_SIZE (decl) != 0)
+      if (is_global_var (decl) && DECL_SIZE (decl) != 0)
        {
          if (TREE_CODE (DECL_SIZE (decl)) == INTEGER_CST)
            constant_expression_warning (DECL_SIZE (decl));
@@ -4911,8 +4910,7 @@ finish_decl (tree decl, location_t init_loc, tree init,
        {
          /* Recompute the RTL of a local array now
             if it used to be an incomplete type.  */
-         if (was_incomplete
-             && !TREE_STATIC (decl) && !DECL_EXTERNAL (decl))
+         if (was_incomplete && !is_global_var (decl))
            {
              /* If we used it already as memory, it must stay in memory.  */
              TREE_ADDRESSABLE (decl) = TREE_USED (decl);
index e0ab0a1a33c7760fe8724ba63fa634bc1a641101..f4d18bdaed22c903fb5d65143ff43c6c1797f21f 100644 (file)
@@ -14769,7 +14769,7 @@ c_parser_omp_threadprivate (c_parser *parser)
        error_at (loc, "%qD is not a variable", v);
       else if (TREE_USED (v) && !C_DECL_THREADPRIVATE_P (v))
        error_at (loc, "%qE declared %<threadprivate%> after first use", v);
-      else if (! TREE_STATIC (v) && ! DECL_EXTERNAL (v))
+      else if (! is_global_var (v))
        error_at (loc, "automatic variable %qE cannot be %<threadprivate%>", v);
       else if (TREE_TYPE (v) == error_mark_node)
        ;
index aeb104363bfc12a1bbb2ea58f76c70c89baa8306..7ca6e6af7309004d12b5d1d5dfa01c9dbd1f82d4 100644 (file)
@@ -4380,7 +4380,7 @@ c_mark_addressable (tree exp)
        if (C_DECL_REGISTER (x)
            && DECL_NONLOCAL (x))
          {
-           if (TREE_PUBLIC (x) || TREE_STATIC (x) || DECL_EXTERNAL (x))
+           if (TREE_PUBLIC (x) || is_global_var (x))
              {
                error
                  ("global register variable %qD used in nested function", x);
@@ -4390,7 +4390,7 @@ c_mark_addressable (tree exp)
          }
        else if (C_DECL_REGISTER (x))
          {
-           if (TREE_PUBLIC (x) || TREE_STATIC (x) || DECL_EXTERNAL (x))
+           if (TREE_PUBLIC (x) || is_global_var (x))
              error ("address of global register variable %qD requested", x);
            else
              error ("address of register variable %qD requested", x);