Searched refs:to_expr (Results 1 – 2 of 2) sorted by relevance
11822 gfc_expr *from_expr, *to_expr; in conv_intrinsic_move_alloc() local11831 to_expr = code->ext.actual->next->expr; in conv_intrinsic_move_alloc()11837 || to_expr->ts.type == BT_CLASS); in conv_intrinsic_move_alloc()11850 if (to_expr->ts.type != BT_CLASS) in conv_intrinsic_move_alloc()11851 to_expr2 = to_expr; in conv_intrinsic_move_alloc()11854 to_expr2 = gfc_copy_expr (to_expr); in conv_intrinsic_move_alloc()11867 true, to_expr, to_expr->ts); in conv_intrinsic_move_alloc()11882 if (to_expr->ts.type == BT_CLASS) in conv_intrinsic_move_alloc()11889 gfc_add_vptr_component (to_expr); in conv_intrinsic_move_alloc()11890 gfc_conv_expr (&to_se, to_expr); in conv_intrinsic_move_alloc()[all …]
12354 gfc_expr *from_expr, *to_expr; in conv_intrinsic_move_alloc() local12363 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()[all …]