Home | History | Annotate | Download | only in fortran

Lines Matching refs:lhsaddr

4544   tree lhsaddr, type, rhs, x, compare = NULL_TREE, comp_tgt = NULL_TREE;
4663       lhsaddr = gfc_build_addr_expr (NULL, lse.expr);
4665       x = build1 (OMP_ATOMIC_READ, type, lhsaddr);
4695   lhsaddr = gfc_build_addr_expr (NULL, lse.expr);
4825   lhsaddr = save_expr (lhsaddr);
4826   if (TREE_CODE (lhsaddr) != SAVE_EXPR
4827       && (TREE_CODE (lhsaddr) != ADDR_EXPR
4828 	  || !VAR_P (TREE_OPERAND (lhsaddr, 0))))
4832       tree var = create_tmp_var_raw (TREE_TYPE (lhsaddr));
4834       lhsaddr = build4 (TARGET_EXPR, TREE_TYPE (lhsaddr), var, lhsaddr,
4840       tree var = create_tmp_var_raw (TREE_TYPE (lhsaddr));
4842       lhsaddr = build4 (TARGET_EXPR, TREE_TYPE (lhsaddr), var, lhsaddr, NULL,
4844       lse.expr = build_fold_indirect_ref_loc (input_location, lhsaddr);
4863 		   build_fold_indirect_ref_loc (input_location, lhsaddr));
4904       x = build2_v (OMP_ATOMIC, lhsaddr, convert (type, x));
4911       x = build2 (aop, type, lhsaddr, convert (type, x));