gimple-fold.c (fold_const_aggregate_ref_1): Use DECL_P.

	* gimple-fold.c (fold_const_aggregate_ref_1): Use DECL_P.
	* gimplify.c (gimplify_modify_expr_rhs): Likewise.

	* c-ada-spec.c (dump_sloc): Use DECL_P.

From-SVN: r223440

gcc/ChangeLog

+2015-05-20  Marek Polacek  <polacek@redhat.com>
+
+	* gimple-fold.c (fold_const_aggregate_ref_1): Use DECL_P.
+	* gimplify.c (gimplify_modify_expr_rhs): Likewise.
+
 2015-05-20  Kyrylo Tkachov  <kyrylo.tkachov@arm.com>
 
 	* config/aarch64/aarch64.c (aarch64_class_max_nregs):

gcc/c-family/ChangeLog

 2015-05-20  Marek Polacek  <polacek@redhat.com>
 
+	* c-ada-spec.c (dump_sloc): Use DECL_P.
+
+2015-05-20  Marek Polacek  <polacek@redhat.com>
+
 	* c-pragma.c: Use VAR_OR_FUNCTION_DECL_P throughout.
 	* c-common.c: Likewise.
 

gcc/c-family/c-ada-spec.c

@@ -1629,7 +1629,7 @@ dump_sloc (pretty_printer *buffer, tree node)
 
   xloc.file = NULL;
 
-  if (TREE_CODE_CLASS (TREE_CODE (node)) == tcc_declaration)
+  if (DECL_P (node))
     xloc = expand_location (DECL_SOURCE_LOCATION (node));
   else if (EXPR_HAS_LOCATION (node))
     xloc = expand_location (EXPR_LOCATION (node));

gcc/gimple-fold.c

@@ -5518,7 +5518,7 @@ fold_const_aggregate_ref_1 (tree t, tree (*valueize) (tree))
   if (TREE_THIS_VOLATILE (t))
     return NULL_TREE;
 
-  if (TREE_CODE_CLASS (TREE_CODE (t)) == tcc_declaration)
+  if (DECL_P (t))
     return get_symbol_constant_value (t);
 
   tem = fold_read_from_constant_string (t);

gcc/gimplify.c

@@ -4222,7 +4222,7 @@ gimplify_modify_expr_rhs (tree *expr_p, tree *from_p, tree *to_p,
 	      {
 		if (TREE_THIS_VOLATILE (t) != volatile_p)
 		  {
-		    if (TREE_CODE_CLASS (TREE_CODE (t)) == tcc_declaration)
+		    if (DECL_P (t))
 		      t = build_simple_mem_ref_loc (EXPR_LOCATION (*from_p),
 						    build_fold_addr_expr (t));
 		    if (REFERENCE_CLASS_P (t))