/netbsd-src/external/gpl3/gcc/dist/gcc/fortran/ |
H A D | target-memory.cc | 303 || source->expr_type == EXPR_STRUCTURE in gfc_target_encode_expr() 351 gcc_assert (source->expr_type == EXPR_STRUCTURE); in gfc_target_encode_expr() 501 result->expr_type = EXPR_STRUCTURE; in gfc_interpret_derived() 737 case EXPR_STRUCTURE: in gfc_merge_initializers()
|
H A D | data.cc | 469 expr->expr_type = EXPR_STRUCTURE; in gfc_assign_data_value() 474 gcc_assert (expr->expr_type == EXPR_STRUCTURE); in gfc_assign_data_value() 780 case EXPR_STRUCTURE: in formalize_init_expr()
|
H A D | expr.cc | 129 e->expr_type = EXPR_STRUCTURE; in gfc_get_structure_constructor_expr() 393 case EXPR_STRUCTURE: in gfc_copy_expr() 498 case EXPR_STRUCTURE: in free_expr0() 1092 case EXPR_STRUCTURE: in gfc_is_constant_expr() 2333 case EXPR_STRUCTURE: in gfc_simplify_expr() 2676 gcc_assert (e->expr_type == EXPR_STRUCTURE); in check_alloc_comp_init() 3144 case EXPR_STRUCTURE: in gfc_check_init_expr() 3542 case EXPR_STRUCTURE: in check_restricted() 4917 if (e->expr_type != EXPR_STRUCTURE) in is_non_empty_structure_constructor() 5402 case EXPR_STRUCTURE: in gfc_traverse_expr()
|
H A D | trans-expr.cc | 2518 case EXPR_STRUCTURE: in flatten_array_ctors_without_strlen() 4852 case EXPR_STRUCTURE: in gfc_apply_interface_mapping_to_expr() 9011 gcc_assert (expr->expr_type == EXPR_STRUCTURE); in gfc_trans_subcomponent_assign() 9018 if (expr->expr_type != EXPR_STRUCTURE) in gfc_trans_subcomponent_assign() 9248 gcc_assert (init->expr_type == EXPR_STRUCTURE); in gfc_conv_union_initializer() 9262 gcc_assert (ctor->expr->expr_type == EXPR_STRUCTURE); in gfc_conv_union_initializer() 9285 gcc_assert (expr->expr_type == EXPR_STRUCTURE); in gfc_conv_structure() 9461 case EXPR_STRUCTURE: in gfc_conv_expr()
|
H A D | primary.cc | 2351 || (primary->expr_type == EXPR_STRUCTURE in gfc_match_varspec() 3359 expr->expr_type = EXPR_STRUCTURE; in gfc_convert_to_structure_constructor()
|
H A D | resolve.cc | 1216 if (expr && expr->expr_type == EXPR_STRUCTURE) in get_pdt_constructor() 1227 && cons->expr->expr_type == EXPR_STRUCTURE in get_pdt_constructor() 7274 case EXPR_STRUCTURE: in gfc_resolve_expr() 10042 && exp->expr_type != EXPR_STRUCTURE)) in resolve_transfer() 10053 const gfc_typespec *ts = exp->expr_type == EXPR_STRUCTURE in resolve_transfer() 10150 if (exp->expr_type == EXPR_STRUCTURE) in resolve_transfer() 12470 if (sym->value->expr_type == EXPR_STRUCTURE) in resolve_values() 14994 gcc_assert (struct_expr && struct_expr->expr_type == EXPR_STRUCTURE); in cons_where()
|
H A D | dependency.cc | 1820 case EXPR_STRUCTURE: in contains_forall_index_p()
|
H A D | module.cc | 3590 minit ("STRUCTURE", EXPR_STRUCTURE), 3888 case EXPR_STRUCTURE: in mio_expr()
|
H A D | ChangeLog-2003 | 1758 * module.c (mio_expr): Don't bother saving symtree for EXPR_STRUCTURE. 1759 * primary.c (g95_match_runtime): Don't use symtree for EXPR_STRUCTURE.
|
H A D | trans-decl.cc | 5409 else if (expr->expr_type == EXPR_STRUCTURE) in check_constant_initializer() 5418 if (c->expr->expr_type == EXPR_STRUCTURE) in check_constant_initializer() 5431 if (expr->expr_type != EXPR_STRUCTURE) in check_constant_initializer()
|
H A D | gfortran.h | 180 EXPR_SUBSTRING, EXPR_STRUCTURE, EXPR_ARRAY, EXPR_NULL, EXPR_COMPCALL, EXPR_PPC enumerator
|
H A D | simplify.cc | 239 && c->expr->expr_type != EXPR_STRUCTURE) in is_constant_array_expr() 259 && c->expr->expr_type != EXPR_STRUCTURE) in is_constant_array_expr() 7857 || source->expr_type == EXPR_STRUCTURE) in gfc_simplify_spread()
|
H A D | gfc-internals.texi | 511 @code{expr_type} member set to @code{EXPR_ARRAY} or @code{EXPR_STRUCTURE},
|
/netbsd-src/external/gpl3/gcc.old/dist/gcc/fortran/ |
H A D | target-memory.c | 304 || source->expr_type == EXPR_STRUCTURE in gfc_target_encode_expr() 352 gcc_assert (source->expr_type == EXPR_STRUCTURE); in gfc_target_encode_expr() 501 result->expr_type = EXPR_STRUCTURE; in gfc_interpret_derived() 737 case EXPR_STRUCTURE: in gfc_merge_initializers()
|
H A D | data.c | 449 expr->expr_type = EXPR_STRUCTURE; in gfc_assign_data_value() 454 gcc_assert (expr->expr_type == EXPR_STRUCTURE); in gfc_assign_data_value() 754 case EXPR_STRUCTURE: in formalize_init_expr()
|
H A D | expr.c | 129 e->expr_type = EXPR_STRUCTURE; in gfc_get_structure_constructor_expr() 392 case EXPR_STRUCTURE: in gfc_copy_expr() 497 case EXPR_STRUCTURE: in free_expr0() 1084 case EXPR_STRUCTURE: in gfc_is_constant_expr() 2307 case EXPR_STRUCTURE: in gfc_simplify_expr() 2650 gcc_assert (e->expr_type == EXPR_STRUCTURE); in check_alloc_comp_init() 3112 case EXPR_STRUCTURE: in gfc_check_init_expr() 3510 case EXPR_STRUCTURE: in check_restricted() 4877 if (e->expr_type != EXPR_STRUCTURE) in is_non_empty_structure_constructor() 5362 case EXPR_STRUCTURE: in gfc_traverse_expr()
|
H A D | trans-expr.c | 2424 case EXPR_STRUCTURE: in flatten_array_ctors_without_strlen() 4763 case EXPR_STRUCTURE: in gfc_apply_interface_mapping_to_expr() 8468 gcc_assert (expr->expr_type == EXPR_STRUCTURE); in gfc_trans_subcomponent_assign() 8475 if (expr->expr_type != EXPR_STRUCTURE) in gfc_trans_subcomponent_assign() 8705 gcc_assert (init->expr_type == EXPR_STRUCTURE); in gfc_conv_union_initializer() 8719 gcc_assert (ctor->expr->expr_type == EXPR_STRUCTURE); in gfc_conv_union_initializer() 8742 gcc_assert (expr->expr_type == EXPR_STRUCTURE); in gfc_conv_structure() 8918 case EXPR_STRUCTURE: in gfc_conv_expr()
|
H A D | primary.c | 2363 || (primary->expr_type == EXPR_STRUCTURE in gfc_match_varspec() 3351 expr->expr_type = EXPR_STRUCTURE; in gfc_convert_to_structure_constructor()
|
H A D | resolve.c | 1192 if (expr && expr->expr_type == EXPR_STRUCTURE) in get_pdt_constructor() 1203 && cons->expr->expr_type == EXPR_STRUCTURE in get_pdt_constructor() 7152 case EXPR_STRUCTURE: in gfc_resolve_expr() 9903 && exp->expr_type != EXPR_STRUCTURE)) in resolve_transfer() 9914 const gfc_typespec *ts = exp->expr_type == EXPR_STRUCTURE in resolve_transfer() 10011 if (exp->expr_type == EXPR_STRUCTURE) in resolve_transfer() 12263 if (sym->value->expr_type == EXPR_STRUCTURE) in resolve_values() 14777 gcc_assert (struct_expr && struct_expr->expr_type == EXPR_STRUCTURE); in cons_where()
|
H A D | dependency.c | 1819 case EXPR_STRUCTURE: in contains_forall_index_p()
|
H A D | trans-decl.c | 5481 else if (expr->expr_type == EXPR_STRUCTURE) in check_constant_initializer() 5490 if (c->expr->expr_type == EXPR_STRUCTURE) in check_constant_initializer() 5503 if (expr->expr_type != EXPR_STRUCTURE) in check_constant_initializer()
|
H A D | gfortran.h | 146 EXPR_SUBSTRING, EXPR_STRUCTURE, EXPR_ARRAY, EXPR_NULL, EXPR_COMPCALL, EXPR_PPC enumerator
|
H A D | module.c | 3439 minit ("STRUCTURE", EXPR_STRUCTURE), 3737 case EXPR_STRUCTURE: in mio_expr()
|
H A D | gfc-internals.texi | 511 @code{expr_type} member set to @code{EXPR_ARRAY} or @code{EXPR_STRUCTURE},
|
H A D | dump-parse-tree.c | 498 case EXPR_STRUCTURE: in show_expr()
|