Lines Matching refs:old
8851 tree tmp, atom, value, old = NULL_TREE, stat = NULL_TREE;
8890 old = null_pointer_node;
8899 old = argse.expr;
8976 token, offset, image_index, value, old, stat,
9037 gfc_add_modify (&block, old, fold_convert (TREE_TYPE (old), tmp));
9155 tree tmp, atom, old, new_val, comp, stat = NULL_TREE;
9178 old = argse.expr;
9228 if (TREE_TYPE (TREE_TYPE (new_val)) != TREE_TYPE (TREE_TYPE (old)))
9230 tmp = gfc_create_var (TREE_TYPE (TREE_TYPE (old)), "new");
9238 tmp = gfc_create_var (TREE_TYPE (TREE_TYPE (old)), "comp");
9246 token, offset, image_index, old, comp, new_val,
9262 gfc_add_modify (&block, old, comp);
9264 gfc_build_addr_expr (NULL, old),
9265 fold_convert (TREE_TYPE (old), new_val),