constexpr.c (cxx_eval_component_reference): Use INDIRECT_REF_P.

2018-02-08  Paolo Carlini  <paolo.carlini@oracle.com>

	* constexpr.c (cxx_eval_component_reference): Use INDIRECT_REF_P.
	* lambda.c (build_capture_proxy): Likewise.
	* search.c (field_access_p): Likewise.
	* semantics.c (omp_clause_decl, omp_privatize_field,
	finish_omp_clauses): Likewise.

From-SVN: r257503

diff --git a/gcc/cp/ChangeLog b/gcc/cp/ChangeLog
index c68b590a295d875b315f11602db9cf7ffe4e77d0..be4db4b789adec026629141c0d136c4968c5a7de 100644 (file)
--- a/gcc/cp/ChangeLog
+++ b/gcc/cp/ChangeLog
@@ -1,3 +1,11 @@
+2018-02-08  Paolo Carlini  <paolo.carlini@oracle.com>
+
+       * constexpr.c (cxx_eval_component_reference): Use INDIRECT_REF_P.
+       * lambda.c (build_capture_proxy): Likewise.
+       * search.c (field_access_p): Likewise.
+       * semantics.c (omp_clause_decl, omp_privatize_field,
+       finish_omp_clauses): Likewise.
+
 2018-02-08  Paolo Carlini  <paolo.carlini@oracle.com>
 
        PR c++/83806

diff --git a/gcc/cp/constexpr.c b/gcc/cp/constexpr.c
index 93dd8ae049c3d6957c10988dacd1e358c17605df..39a2e1ab578ceff57db50ac04390bf77e757ca2a 100644 (file)
--- a/gcc/cp/constexpr.c
+++ b/gcc/cp/constexpr.c
@@ -2463,7 +2463,7 @@ cxx_eval_component_reference (const constexpr_ctx *ctx, tree t,
   tree whole = cxx_eval_constant_expression (ctx, orig_whole,
                                             lval,
                                             non_constant_p, overflow_p);
-  if (TREE_CODE (whole) == INDIRECT_REF
+  if (INDIRECT_REF_P (whole)
       && integer_zerop (TREE_OPERAND (whole, 0))
       && !ctx->quiet)
     error ("dereferencing a null pointer in %qE", orig_whole);

diff --git a/gcc/cp/lambda.c b/gcc/cp/lambda.c
index ff8236ad316c453ff2f2f7866f69718e1ce016db..2545eae9ce914e6f251a31b9d231b2768dff6346 100644 (file)
--- a/gcc/cp/lambda.c
+++ b/gcc/cp/lambda.c
@@ -450,7 +450,7 @@ build_capture_proxy (tree member, tree init)
        {
          if (PACK_EXPANSION_P (init))
            init = PACK_EXPANSION_PATTERN (init);
-         if (TREE_CODE (init) == INDIRECT_REF)
+         if (INDIRECT_REF_P (init))
            init = TREE_OPERAND (init, 0);
          STRIP_NOPS (init);
        }

diff --git a/gcc/cp/search.c b/gcc/cp/search.c
index 920fc15468a8b4578cf08e77cafe551759a46624..796209f0e7245614e9c091dd37e288cadc18bdde 100644 (file)
--- a/gcc/cp/search.c
+++ b/gcc/cp/search.c
@@ -1636,7 +1636,7 @@ field_access_p (tree component_ref, tree field_decl, tree field_type)
     return false;
 
   tree indirect_ref = TREE_OPERAND (component_ref, 0);
-  if (TREE_CODE (indirect_ref) != INDIRECT_REF)
+  if (!INDIRECT_REF_P (indirect_ref))
     return false;
 
   tree ptr = STRIP_NOPS (TREE_OPERAND (indirect_ref, 0));

diff --git a/gcc/cp/semantics.c b/gcc/cp/semantics.c
index ea92da376257ebef5f41d8d2b60e65fd9575028d..f0cee68e46f454dd667e83d3e1867ff2c6c68420 100644 (file)
--- a/gcc/cp/semantics.c
+++ b/gcc/cp/semantics.c
@@ -4391,7 +4391,7 @@ omp_clause_decl_field (tree decl)
       && DECL_OMP_PRIVATIZED_MEMBER (decl))
     {
       tree f = DECL_VALUE_EXPR (decl);
-      if (TREE_CODE (f) == INDIRECT_REF)
+      if (INDIRECT_REF_P (f))
        f = TREE_OPERAND (f, 0);
       if (TREE_CODE (f) == COMPONENT_REF)
        {
@@ -4446,7 +4446,7 @@ omp_privatize_field (tree t, bool shared)
     omp_private_member_map = new hash_map<tree, tree>;
   if (TREE_CODE (TREE_TYPE (t)) == REFERENCE_TYPE)
     {
-      gcc_assert (TREE_CODE (m) == INDIRECT_REF);
+      gcc_assert (INDIRECT_REF_P (m));
       m = TREE_OPERAND (m, 0);
     }
   tree vb = NULL_TREE;
@@ -5864,7 +5864,7 @@ finish_omp_clauses (tree clauses, enum c_omp_region_type ort)
                  if (TREE_CODE (t) == POINTER_PLUS_EXPR)
                    t = TREE_OPERAND (t, 0);
                  if (TREE_CODE (t) == ADDR_EXPR
-                     || TREE_CODE (t) == INDIRECT_REF)
+                     || INDIRECT_REF_P (t))
                    t = TREE_OPERAND (t, 0);
                }
              tree n = omp_clause_decl_field (t);