| /netbsd-src/external/gpl3/gcc/dist/gcc/fortran/ |
| H A D | symbol.cc | 1772 || f == FL_PARAMETER || f == FL_LABEL || gfc_fl_struct(f) in gfc_add_flavor()
2371 if (s == NULL || !gfc_fl_struct (s->attr.flavor)) in gfc_use_derived()
2502 gcc_assert (gfc_fl_struct (sym->attr.flavor)); in gfc_find_component()
3711 if (gfc_fl_struct (p->attr.flavor)) in gfc_restore_last_undo_checkpoint()
5244 if (!sym || gfc_fl_struct (sym->attr.flavor)) in gfc_find_dt_in_generic()
5249 if (gfc_fl_struct (intr->sym->attr.flavor)) in gfc_find_dt_in_generic()
|
| H A D | module.cc | 1025 if (gfc_fl_struct (sym->attr.flavor)) in add_true_name()
1047 if (gfc_fl_struct (st->n.sym->attr.flavor)) in build_tnt()
3654 if (gfc_fl_struct (e->symtree->n.sym->attr.flavor)) in fix_mio_expr()
4630 if (gfc_fl_struct (sym->attr.flavor)) in mio_symbol()
5411 if (gfc_fl_struct (sym->attr.flavor)) in read_module()
5965 if (gfc_fl_struct (sym->attr.flavor)) in write_symbol()
|
| H A D | interface.cc | 1890 && !gfc_fl_struct (p->sym->attr.flavor)) in check_interface0()
1918 && !gfc_fl_struct (p->sym->attr.flavor)) in check_interface0()
1921 if (!gfc_fl_struct (p->sym->attr.flavor)) in check_interface0()
1985 if (!gfc_fl_struct (p->sym->attr.flavor) in check_interface1()
1986 && !gfc_fl_struct (q->sym->attr.flavor) in check_interface1()
4323 if (gfc_fl_struct (intr->sym->attr.flavor)) in gfc_search_interface()
|
| H A D | primary.cc | 2559 if (primary->ts.type == BT_UNKNOWN && !gfc_fl_struct (sym->attr.flavor)) in gfc_match_varspec()
3397 gcc_assert (gfc_fl_struct (sym->attr.flavor) in gfc_match_structure_constructor()
3980 if (gfc_fl_struct (sym->attr.flavor)) in gfc_match_rvalue()
|
| H A D | trans-decl.cc | 903 else if (gfc_fl_struct (sym->attr.flavor)) in gfc_get_module_backend_decl()
910 if (gfc_fl_struct (intr->sym->attr.flavor)) in gfc_get_module_backend_decl()
927 if (gfc_fl_struct (s->attr.flavor) && !s->backend_decl) in gfc_get_module_backend_decl()
5181 if (gfc_fl_struct (sym->attr.flavor) in gfc_create_module_variable()
|
| H A D | decl.cc | 446 && (!dt_sym || !gfc_fl_struct (dt_sym->attr.flavor)))) in match_data_constant()
453 else if (dt_sym && gfc_fl_struct (dt_sym->attr.flavor)) in match_data_constant()
6313 if (sym != NULL && gfc_fl_struct (sym->attr.flavor) in gfc_match_data_decl()
6359 && gfc_fl_struct (current_ts.u.derived->attr.flavor)) in gfc_match_data_decl()
|
| H A D | gfortran.h | 69 #define gfc_fl_struct(f) \ macro
|
| H A D | resolve.cc | 547 || gfc_fl_struct (sym->attr.flavor) || sym->attr.intrinsic) in find_arglists()
1766 || gfc_fl_struct (sym->attr.flavor)) in is_illegal_recursion()
2798 if (gfc_fl_struct (intr->sym->attr.flavor)) in resolve_generic_f()
13000 if (s && !gfc_fl_struct (s->attr.flavor)) in resolve_fl_variable_derived()
|
| H A D | match.cc | 173 if (gfc_fl_struct (sym->attr.flavor)) in gfc_match_member_sep()
|
| H A D | expr.cc | 4939 gcc_assert (gfc_fl_struct (der->attr.flavor)); in gfc_has_default_initializer()
|
| H A D | ChangeLog-2016 | 2480 (gfc_bt_struct, gfc_fl_struct, case_bt_struct, case_fl_struct): New
|
| /netbsd-src/external/gpl3/gcc.old/dist/gcc/fortran/ |
| H A D | symbol.c | 1765 || f == FL_PARAMETER || f == FL_LABEL || gfc_fl_struct(f) in gfc_add_flavor()
2364 if (s == NULL || !gfc_fl_struct (s->attr.flavor)) in gfc_use_derived()
2495 gcc_assert (gfc_fl_struct (sym->attr.flavor)); in gfc_find_component()
3697 if (gfc_fl_struct (p->attr.flavor)) in gfc_restore_last_undo_checkpoint()
5217 if (!sym || gfc_fl_struct (sym->attr.flavor)) in gfc_find_dt_in_generic()
5222 if (gfc_fl_struct (intr->sym->attr.flavor)) in gfc_find_dt_in_generic()
|
| H A D | interface.c | 1870 && !gfc_fl_struct (p->sym->attr.flavor)) in check_interface0()
1898 && !gfc_fl_struct (p->sym->attr.flavor)) in check_interface0()
1901 if (!gfc_fl_struct (p->sym->attr.flavor)) in check_interface0()
1965 if (!gfc_fl_struct (p->sym->attr.flavor) in check_interface1()
1966 && !gfc_fl_struct (q->sym->attr.flavor) in check_interface1()
4120 if (gfc_fl_struct (intr->sym->attr.flavor)) in gfc_search_interface()
|
| H A D | module.c | 1020 if (gfc_fl_struct (sym->attr.flavor)) in add_true_name()
1042 if (gfc_fl_struct (st->n.sym->attr.flavor)) in build_tnt()
3503 if (gfc_fl_struct (e->symtree->n.sym->attr.flavor)) in fix_mio_expr()
4479 if (gfc_fl_struct (sym->attr.flavor)) in mio_symbol()
5259 if (gfc_fl_struct (sym->attr.flavor)) in read_module()
5754 if (gfc_fl_struct (sym->attr.flavor)) in write_symbol()
|
| H A D | primary.c | 2571 if (primary->ts.type == BT_UNKNOWN && !gfc_fl_struct (sym->attr.flavor)) in gfc_match_varspec()
3389 gcc_assert (gfc_fl_struct (sym->attr.flavor) in gfc_match_structure_constructor()
3972 if (gfc_fl_struct (sym->attr.flavor)) in gfc_match_rvalue()
|
| H A D | trans-decl.c | 898 else if (gfc_fl_struct (sym->attr.flavor)) in gfc_get_module_backend_decl()
905 if (gfc_fl_struct (intr->sym->attr.flavor)) in gfc_get_module_backend_decl()
922 if (gfc_fl_struct (s->attr.flavor) && !s->backend_decl) in gfc_get_module_backend_decl()
5253 if (gfc_fl_struct (sym->attr.flavor) in gfc_create_module_variable()
|
| H A D | decl.c | 446 && (!dt_sym || !gfc_fl_struct (dt_sym->attr.flavor)))) in match_data_constant()
453 else if (dt_sym && gfc_fl_struct (dt_sym->attr.flavor)) in match_data_constant()
6224 if (sym != NULL && gfc_fl_struct (sym->attr.flavor) in gfc_match_data_decl()
6270 && gfc_fl_struct (current_ts.u.derived->attr.flavor)) in gfc_match_data_decl()
|
| H A D | gfortran.h | 69 #define gfc_fl_struct(f) \ macro
|
| H A D | resolve.c | 547 || gfc_fl_struct (sym->attr.flavor) || sym->attr.intrinsic) in find_arglists()
1725 || gfc_fl_struct (sym->attr.flavor)) in is_illegal_recursion()
2739 if (gfc_fl_struct (intr->sym->attr.flavor)) in resolve_generic_f()
12789 if (s && !gfc_fl_struct (s->attr.flavor)) in resolve_fl_variable_derived()
|
| H A D | match.c | 173 if (gfc_fl_struct (sym->attr.flavor)) in gfc_match_member_sep()
|
| H A D | expr.c | 4899 gcc_assert (gfc_fl_struct (der->attr.flavor)); in gfc_has_default_initializer()
|