Lines Matching refs:to_expr
12354 gfc_expr *from_expr, *to_expr; in conv_intrinsic_move_alloc() local
12363 to_expr = code->ext.actual->next->expr; in conv_intrinsic_move_alloc()
12369 || to_expr->ts.type == BT_CLASS); in conv_intrinsic_move_alloc()
12382 if (to_expr->ts.type != BT_CLASS) in conv_intrinsic_move_alloc()
12383 to_expr2 = to_expr; in conv_intrinsic_move_alloc()
12386 to_expr2 = gfc_copy_expr (to_expr); in conv_intrinsic_move_alloc()
12399 true, to_expr, to_expr->ts); in conv_intrinsic_move_alloc()
12414 if (to_expr->ts.type == BT_CLASS) in conv_intrinsic_move_alloc()
12421 gfc_add_vptr_component (to_expr); in conv_intrinsic_move_alloc()
12422 gfc_conv_expr (&to_se, to_expr); in conv_intrinsic_move_alloc()
12466 if (to_expr->ts.type == BT_CHARACTER && to_expr->ts.deferred) in conv_intrinsic_move_alloc()
12480 if (to_expr->ts.type == BT_CLASS) in conv_intrinsic_move_alloc()
12485 to_expr2 = gfc_copy_expr (to_expr); in conv_intrinsic_move_alloc()
12546 gfc_conv_expr_descriptor (&to_se, to_expr); in conv_intrinsic_move_alloc()
12556 NULL_TREE, NULL_TREE, true, to_expr, in conv_intrinsic_move_alloc()
12575 if (to_expr->ts.type == BT_DERIVED in conv_intrinsic_move_alloc()
12576 && to_expr->ts.u.derived->attr.alloc_comp) in conv_intrinsic_move_alloc()
12578 tmp = gfc_deallocate_alloc_comp (to_expr->ts.u.derived, in conv_intrinsic_move_alloc()
12579 to_se.expr, to_expr->rank); in conv_intrinsic_move_alloc()
12585 NULL_TREE, true, to_expr, in conv_intrinsic_move_alloc()
12599 if (to_expr->ts.type == BT_CHARACTER && to_expr->ts.deferred) in conv_intrinsic_move_alloc()