gcc/fortran/openmp.c

940 gfc_match_omp_map_clause (gfc_omp_namelist **list, gfc_omp_map_op map_op,
950 	n->u.map_op = map_op;
1445 	      gfc_omp_map_op map_op = OMP_MAP_TOFROM;
1449 		map_op = OMP_MAP_ALLOC;
1451 		map_op = always ? OMP_MAP_ALWAYS_TOFROM : OMP_MAP_TOFROM;
1453 		map_op = always ? OMP_MAP_ALWAYS_TO : OMP_MAP_TO;
1455 		map_op = always ? OMP_MAP_ALWAYS_FROM : OMP_MAP_FROM;
1457 		map_op = OMP_MAP_RELEASE;
1459 		map_op = OMP_MAP_DELETE;
1472 		    n->u.map_op = map_op;
2162 	  if (n->u.map_op != OMP_MAP_ALLOC && n->u.map_op != OMP_MAP_TO)
2196       switch (n->u.map_op)
4622 			&& n->u.map_op == OMP_MAP_FORCE_DEVICEPTR)
4637 		      switch (n->u.map_op)
4657 		      switch (n->u.map_op)
4671 		      switch (n->u.map_op)