5126   gfc_expr *expr2, *expr2_tmp;  in resolve_omp_atomic()  local
5202       expr2_tmp = expr2;  in resolve_omp_atomic()
5205 	  expr2_tmp = is_conversion (code->expr2, true);  in resolve_omp_atomic()
5206 	  if (expr2_tmp == NULL)  in resolve_omp_atomic()
5207 	    expr2_tmp = expr2;  in resolve_omp_atomic()
5209       if (expr2_tmp->expr_type == EXPR_VARIABLE)  in resolve_omp_atomic()
5211 	  if (expr2_tmp->symtree == NULL  in resolve_omp_atomic()
5212 	      || expr2_tmp->rank != 0  in resolve_omp_atomic()
5213 	      || (expr2_tmp->ts.type != BT_INTEGER  in resolve_omp_atomic()
5214 		  && expr2_tmp->ts.type != BT_REAL  in resolve_omp_atomic()
5215 		  && expr2_tmp->ts.type != BT_COMPLEX  in resolve_omp_atomic()
5216 		  && expr2_tmp->ts.type != BT_LOGICAL)  in resolve_omp_atomic()
5217 	      || expr2_tmp->symtree->n.sym == var)  in resolve_omp_atomic()
5221 			 &expr2_tmp->where);  in resolve_omp_atomic()
5224 	  var = expr2_tmp->symtree->n.sym;  in resolve_omp_atomic()