contrib/gcc/omp-low.c

636   tree new_var = omp_copy_decl_1 (var, ctx);
637   insert_decl_map (&ctx->cb, var, new_var);
638   return new_var;
685   tree new_var;
689       new_var = create_artificial_label ();
690       DECL_CONTEXT (new_var) = current_function_decl;
691       insert_decl_map (&ctx->cb, var, new_var);
692       return new_var;
700       new_var = maybe_lookup_decl (var, ctx);
701       if (new_var)
702 	return new_var;
1629 	  tree var, new_var;
1660 	  new_var = var = OMP_CLAUSE_DECL (c);
1662 	    new_var = lookup_decl (var, ctx);
1677 	      ptr = DECL_VALUE_EXPR (new_var);
1682 	      x = TYPE_SIZE_UNIT (TREE_TYPE (new_var));
1703 	      x = TYPE_SIZE_UNIT (TREE_TYPE (TREE_TYPE (new_var)));
1708 		    name = IDENTIFIER_POINTER (DECL_NAME (new_var));
1710 		  x = create_tmp_var_raw (TREE_TYPE (TREE_TYPE (new_var)),
1713 		  x = build_fold_addr_expr_with_type (x, TREE_TYPE (new_var));
1720 		  x = fold_convert (TREE_TYPE (new_var), x);
1723 	      x = build2 (MODIFY_EXPR, void_type_node, new_var, x);
1726 	      new_var = build_fold_indirect_ref (new_var);
1741 	      if (is_global_var (new_var))
1748 	      SET_DECL_VALUE_EXPR (new_var, x);
1749 	      DECL_HAS_VALUE_EXPR_P (new_var) = 1;
1766 	      x = lang_hooks.decls.omp_clause_default_ctor (c, new_var);
1772 	      x = lang_hooks.decls.omp_clause_dtor (c, new_var);
1783 	      x = lang_hooks.decls.omp_clause_copy_ctor (c, new_var, x);
1791 	      x = lang_hooks.decls.omp_clause_assign_op (c, new_var, x);
1804 		  x = omp_reduction_init (c, TREE_TYPE (new_var));
1805 		  gcc_assert (TREE_CODE (TREE_TYPE (new_var)) != ARRAY_TYPE);
1806 		  x = build2 (MODIFY_EXPR, void_type_node, new_var, x);
1874       tree var, new_var;
1880       new_var = lookup_decl (var, ctx);
1884 	new_var = build_fold_indirect_ref (new_var);
1885       x = lang_hooks.decls.omp_clause_assign_op (c, x, new_var);
1925       tree var, ref, new_var;
1932       new_var = lookup_decl (var, ctx);
1934 	new_var = build_fold_indirect_ref (new_var);
1949 	  x = fold_build2 (code, TREE_TYPE (ref), ref, new_var);
1969 	  x = build2 (code, TREE_TYPE (ref), ref, new_var);