| /netbsd-src/external/gpl3/gcc.old/dist/gcc/fortran/ |
| H A D | class.c | 485 if (derived->attr.unlimited_polymorphic) in get_unique_type_string()
490 if (derived->attr.unlimited_polymorphic) in get_unique_type_string()
678 if (ts->u.derived->attr.unlimited_polymorphic) in gfc_build_class_symbol()
722 if (!ts->u.derived->attr.unlimited_polymorphic) in gfc_build_class_symbol()
753 if (ts->u.derived->attr.unlimited_polymorphic) in gfc_build_class_symbol()
774 if (!ts->u.derived->attr.unlimited_polymorphic) in gfc_build_class_symbol()
1607 if (derived->attr.unlimited_polymorphic) in generate_finalization_wrapper()
2295 if (!derived->attr.unlimited_polymorphic && derived->attr.is_class) in gfc_find_derived_vtab()
2363 c = (derived->attr.unlimited_polymorphic in gfc_find_derived_vtab()
2409 if (!derived->attr.unlimited_polymorphic) in gfc_find_derived_vtab()
[all …]
|
| H A D | misc.c | 187 if (ts1 && ts1->u.derived && ts1->u.derived->attr.unlimited_polymorphic) in gfc_typename()
|
| H A D | interface.c | 712 .unlimited_polymorphic) in gfc_compare_types()
713 || ts1->u.derived->attr.unlimited_polymorphic)) in gfc_compare_types()
721 .unlimited_polymorphic) in gfc_compare_types()
722 || ts2->u.derived->attr.unlimited_polymorphic) in gfc_compare_types()
775 && !s1->ts.u.derived->attr.unlimited_polymorphic) in compare_rank()
778 && !s2->ts.u.derived->attr.unlimited_polymorphic) in compare_rank()
|
| H A D | gfortran.h | 903 event_comp:1, defined_assign_comp:1, unlimited_polymorphic:1, member
3609 && CLASS_DATA (sym)->ts.u.derived->attr.unlimited_polymorphic)
|
| H A D | symbol.c | 2346 if (sym->attr.unlimited_polymorphic) in gfc_use_derived()
5134 .unlimited_polymorphic) in gfc_type_compatible()
5135 || ts1->u.derived->attr.unlimited_polymorphic)) in gfc_type_compatible()
|
| H A D | trans-expr.c | 780 ->attr.unlimited_polymorphic) in gfc_conv_derived_to_class()
978 ->attr.unlimited_polymorphic) in gfc_conv_intrinsic_to_class()
1028 .derived->attr.unlimited_polymorphic) in gfc_conv_intrinsic_to_class()
1212 .derived->attr.unlimited_polymorphic) in gfc_conv_class_to_class()
6778 && arg->next->expr->ts.u.derived->attr.unlimited_polymorphic) in gfc_conv_procedure_call()
9146 && vptr_expr->ts.u.derived->attr.unlimited_polymorphic)) in trans_class_vptr_len_assignment()
9177 && vptr_expr->ts.u.derived->attr.unlimited_polymorphic)) in trans_class_vptr_len_assignment()
10961 && rhs->ts.u.derived->attr.unlimited_polymorphic in trans_class_assignment()
10975 && lhs->ts.u.derived->attr.unlimited_polymorphic in trans_class_assignment()
|
| H A D | trans-types.c | 2521 if (derived->attr.unlimited_polymorphic in gfc_get_derived_type()
2646 && derived->components->ts.u.derived->attr.unlimited_polymorphic) in gfc_get_derived_type()
|
| H A D | trans-stmt.c | 1734 && e->ts.u.derived->attr.unlimited_polymorphic)) in trans_associate_var()
6636 && expr->ts.u.derived->attr.unlimited_polymorphic); in gfc_trans_allocate()
7344 && al->expr->ts.u.derived->attr.unlimited_polymorphic)) in gfc_trans_deallocate()
7367 && al->expr->ts.u.derived->attr.unlimited_polymorphic)) in gfc_trans_deallocate()
|
| H A D | resolve.c | 1304 && !comp->ts.u.derived->attr.unlimited_polymorphic in resolve_structure_cons()
8909 && sym->components->ts.u.derived->attr.unlimited_polymorphic)); in gfc_type_is_extensible()
9356 && !selector_type->attr.unlimited_polymorphic in resolve_select_type()
9367 && selector_type && !selector_type->attr.unlimited_polymorphic in resolve_select_type()
14843 if (sym->attr.unlimited_polymorphic) in resolve_fl_derived0()
14953 if (sym->attr.unlimited_polymorphic) in resolve_fl_derived()
14991 if (data->ts.u.derived->attr.unlimited_polymorphic) in resolve_fl_derived()
15308 if (sym->attr.unlimited_polymorphic) in resolve_symbol()
|
| H A D | module.c | 2272 if (attr->unlimited_polymorphic) in mio_symbol_attribute()
2472 attr->unlimited_polymorphic = 1; in mio_symbol_attribute()
|
| H A D | dump-parse-tree.c | 850 if (attr->unlimited_polymorphic) in show_attr()
|
| H A D | decl.c | 4391 upe->attr.unlimited_polymorphic = 1; in gfc_match_decl_type_spec()
6204 && current_ts.u.derived->attr.unlimited_polymorphic) in gfc_match_data_decl()
|
| /netbsd-src/external/gpl3/gcc/dist/gcc/fortran/ |
| H A D | class.cc | 487 if (derived->attr.unlimited_polymorphic) in get_unique_type_string()
492 if (derived->attr.unlimited_polymorphic) in get_unique_type_string()
693 if (ts->u.derived->attr.unlimited_polymorphic) in gfc_build_class_symbol()
737 if (!ts->u.derived->attr.unlimited_polymorphic) in gfc_build_class_symbol()
768 if (ts->u.derived->attr.unlimited_polymorphic) in gfc_build_class_symbol()
789 if (!ts->u.derived->attr.unlimited_polymorphic) in gfc_build_class_symbol()
1621 if (derived->attr.unlimited_polymorphic) in generate_finalization_wrapper()
2303 if (!derived->attr.unlimited_polymorphic && derived->attr.is_class) in gfc_find_derived_vtab()
2372 c = (derived->attr.unlimited_polymorphic in gfc_find_derived_vtab()
2418 if (!derived->attr.unlimited_polymorphic) in gfc_find_derived_vtab()
[all …]
|
| H A D | misc.cc | 188 if (ts->u.derived->components->ts.u.derived->attr.unlimited_polymorphic) in gfc_typename()
|
| H A D | interface.cc | 621 if (derived1->attr.unlimited_polymorphic in gfc_compare_derived_types()
622 && derived2->attr.unlimited_polymorphic) in gfc_compare_derived_types()
625 if (derived1->attr.unlimited_polymorphic in gfc_compare_derived_types()
626 != derived2->attr.unlimited_polymorphic) in gfc_compare_derived_types()
723 .unlimited_polymorphic) in gfc_compare_types()
724 || ts1->u.derived->attr.unlimited_polymorphic)) in gfc_compare_types()
732 .unlimited_polymorphic) in gfc_compare_types()
733 || ts2->u.derived->attr.unlimited_polymorphic) in gfc_compare_types()
786 && !s1->ts.u.derived->attr.unlimited_polymorphic) in compare_rank()
789 && !s2->ts.u.derived->attr.unlimited_polymorphic) in compare_rank()
|
| H A D | trans.h | 57 unsigned unlimited_polymorphic:1; member
|
| H A D | gfortran.h | 975 event_comp:1, defined_assign_comp:1, unlimited_polymorphic:1, member
3897 && CLASS_DATA (sym)->ts.u.derived->attr.unlimited_polymorphic)
|
| H A D | symbol.cc | 2353 if (sym->attr.unlimited_polymorphic) in gfc_use_derived()
5161 .unlimited_polymorphic) in gfc_type_compatible()
5162 || ts1->u.derived->attr.unlimited_polymorphic)) in gfc_type_compatible()
|
| H A D | trans-expr.cc | 873 ->attr.unlimited_polymorphic) in gfc_conv_derived_to_class()
1072 ->attr.unlimited_polymorphic) in gfc_conv_intrinsic_to_class()
1122 .derived->attr.unlimited_polymorphic) in gfc_conv_intrinsic_to_class()
1306 .derived->attr.unlimited_polymorphic) in gfc_conv_class_to_class()
7309 && arg->next->expr->ts.u.derived->attr.unlimited_polymorphic) in gfc_conv_procedure_call()
9689 && vptr_expr->ts.u.derived->attr.unlimited_polymorphic)) in trans_class_vptr_len_assignment()
9720 && vptr_expr->ts.u.derived->attr.unlimited_polymorphic)) in trans_class_vptr_len_assignment()
11499 && rhs->ts.u.derived->attr.unlimited_polymorphic in trans_class_assignment()
11513 && lhs->ts.u.derived->attr.unlimited_polymorphic in trans_class_assignment()
|
| H A D | trans-types.cc | 2589 if (derived->attr.unlimited_polymorphic in gfc_get_derived_type()
2716 && derived->components->ts.u.derived->attr.unlimited_polymorphic) in gfc_get_derived_type()
|
| H A D | trans-stmt.cc | 1770 && e->ts.u.derived->attr.unlimited_polymorphic)) in trans_associate_var()
6669 && expr->ts.u.derived->attr.unlimited_polymorphic); in gfc_trans_allocate()
7377 && al->expr->ts.u.derived->attr.unlimited_polymorphic)) in gfc_trans_deallocate()
7400 && al->expr->ts.u.derived->attr.unlimited_polymorphic)) in gfc_trans_deallocate()
|
| H A D | resolve.cc | 1332 && !comp->ts.u.derived->attr.unlimited_polymorphic in resolve_structure_cons()
9047 && sym->components->ts.u.derived->attr.unlimited_polymorphic)); in gfc_type_is_extensible()
9494 && !selector_type->attr.unlimited_polymorphic in resolve_select_type()
9505 && selector_type && !selector_type->attr.unlimited_polymorphic in resolve_select_type()
15060 if (sym->attr.unlimited_polymorphic) in resolve_fl_derived0()
15170 if (sym->attr.unlimited_polymorphic) in resolve_fl_derived()
15208 if (data->ts.u.derived->attr.unlimited_polymorphic) in resolve_fl_derived()
15528 if (sym->attr.unlimited_polymorphic) in resolve_symbol()
|
| H A D | module.cc | 2335 if (attr->unlimited_polymorphic) in mio_symbol_attribute()
2572 attr->unlimited_polymorphic = 1; in mio_symbol_attribute()
|
| H A D | dump-parse-tree.cc | 875 if (attr->unlimited_polymorphic) in show_attr()
|
| H A D | decl.cc | 4496 upe->attr.unlimited_polymorphic = 1; in gfc_match_decl_type_spec()
6293 && current_ts.u.derived->attr.unlimited_polymorphic) in gfc_match_data_decl()
|