Lines Matching refs:new_expr
2409 gfc_expr* new_expr; in flatten_array_ctors_without_strlen() local
2414 new_expr = c->expr; in flatten_array_ctors_without_strlen()
2417 flatten_array_ctors_without_strlen (new_expr); in flatten_array_ctors_without_strlen()
2418 gfc_replace_expr (e, new_expr); in flatten_array_ctors_without_strlen()
4530 gfc_expr *new_expr; in gfc_map_intrinsic_function() local
4546 new_expr = NULL; in gfc_map_intrinsic_function()
4558 new_expr = gfc_copy_expr (arg1->ts.u.cl->length); in gfc_map_intrinsic_function()
4562 new_expr = gfc_copy_expr (arg1); in gfc_map_intrinsic_function()
4563 gfc_apply_interface_mapping_to_expr (mapping, new_expr); in gfc_map_intrinsic_function()
4565 if (!new_expr) in gfc_map_intrinsic_function()
4568 gfc_replace_expr (arg1, new_expr); in gfc_map_intrinsic_function()
4592 gfc_free_expr (new_expr); in gfc_map_intrinsic_function()
4600 if (new_expr) in gfc_map_intrinsic_function()
4601 new_expr = gfc_multiply (new_expr, tmp); in gfc_map_intrinsic_function()
4603 new_expr = tmp; in gfc_map_intrinsic_function()
4623 new_expr = gfc_copy_expr (sym->as->lower[d]); in gfc_map_intrinsic_function()
4628 new_expr = gfc_copy_expr (sym->as->upper[d]); in gfc_map_intrinsic_function()
4636 gfc_apply_interface_mapping_to_expr (mapping, new_expr); in gfc_map_intrinsic_function()
4637 if (!new_expr) in gfc_map_intrinsic_function()
4640 gfc_replace_expr (expr, new_expr); in gfc_map_intrinsic_function()