2069 			     tree node, tree &node2, tree &node3, tree &node4)  in gfc_trans_omp_array_section()  argument
2121       node3 = build_omp_clause (input_location,  in gfc_trans_omp_array_section()
2123       OMP_CLAUSE_SET_MAP_KIND (node3, ptr_kind);  in gfc_trans_omp_array_section()
2124       OMP_CLAUSE_DECL (node3)  in gfc_trans_omp_array_section()
2127 	STRIP_NOPS (OMP_CLAUSE_DECL (node3));  in gfc_trans_omp_array_section()
2138       node3 = build_omp_clause (input_location,  in gfc_trans_omp_array_section()
2140       OMP_CLAUSE_SET_MAP_KIND (node3, ptr_kind);  in gfc_trans_omp_array_section()
2141       OMP_CLAUSE_DECL (node3) = decl;  in gfc_trans_omp_array_section()
2144   OMP_CLAUSE_SIZE (node3)  in gfc_trans_omp_array_section()
2463 	      tree node3 = NULL_TREE;  variable
2495 		      node3 = build_omp_clause (input_location, OMP_CLAUSE_MAP);
2496 		      OMP_CLAUSE_SET_MAP_KIND (node3, GOMP_MAP_ATTACH_DETACH);
2497 		      OMP_CLAUSE_DECL (node3) = gfc_class_data_get (decl);
2498 		      OMP_CLAUSE_SIZE (node3) = size_int (0);
2546 			  node3 = build_omp_clause (input_location,
2548 			  OMP_CLAUSE_SET_MAP_KIND (node3, GOMP_MAP_POINTER);
2549 			  OMP_CLAUSE_DECL (node3) = decl;
2550 			  OMP_CLAUSE_SIZE (node3) = size_int (0);
2572 		      node3 = build_omp_clause (input_location,
2574 		      OMP_CLAUSE_SET_MAP_KIND (node3, GOMP_MAP_POINTER);
2582 			  OMP_CLAUSE_DECL (node3) = ptr;
2585 			OMP_CLAUSE_DECL (node3)
2587 		      OMP_CLAUSE_SIZE (node3) = size_int (0);
2786 			  node3 = build_omp_clause (input_location,
2788 			  OMP_CLAUSE_SET_MAP_KIND (node3,
2790 			  OMP_CLAUSE_DECL (node3)
2792 			  STRIP_NOPS (OMP_CLAUSE_DECL (node3));
2793 			  OMP_CLAUSE_SIZE (node3) = size_int (0);
2816 						   node, node2, node3, node4);
2824 					       node3, node4);
2890 	      if (node3)
2891 		omp_clauses = gfc_trans_add_clause (node3, omp_clauses);