Home
last modified time | relevance | path

Searched refs:gfc_compare_types (Results 1 – 25 of 35) sorted by relevance

12

/netbsd-src/external/gpl3/gcc.old/dist/gcc/fortran/
H A Ddata.c487 if (!gfc_compare_types (&lvalue->ts, &rexpr->ts)) in gfc_assign_data_value()
595 if (!gfc_compare_types (&lvalue->ts, &expr->ts)) in gfc_assign_data_value()
H A Ddependency.c1225 if (gfc_compare_types (&sym1->ts, &sym2->ts)) in check_data_pointer_types()
1246 && gfc_compare_types (&ref1->u.c.component->ts, &sym2->ts)) in check_data_pointer_types()
1261 && gfc_compare_types (&cm1->ts, &sym2->ts)) in check_data_pointer_types()
H A Dcheck.c923 if (gfc_compare_types (ets, fts))
2279 if (!gfc_compare_types (&a->ts, &sym->result->ts)) in gfc_check_co_reduce()
2287 if (!gfc_compare_types (&a->ts, &formal->sym->ts) in gfc_check_co_reduce()
2288 || !gfc_compare_types (&a->ts, &formal->next->sym->ts)) in gfc_check_co_reduce()
H A Dinterface.c513 && !gfc_compare_types (&cmp1->ts, &cmp2->ts)) in compare_components()
686 gfc_compare_types (gfc_typespec *ts1, gfc_typespec *ts2) in gfc_compare_types() function
748 return gfc_compare_types (&s1->ts, &s2->ts) || s2->ts.type == BT_ASSUMED; in compare_type()
2414 && !gfc_compare_types (&formal->ts, &actual->ts) in compare_parameter()
H A Dtrans-array.c4834 if (gfc_compare_types (&lsym->ts, &rsym->ts) == 0) in symbols_could_alias()
4909 if (gfc_compare_types (&lref->u.c.component->ts, in gfc_could_be_alias()
4931 if (gfc_compare_types (&lref->u.c.component->ts, in gfc_could_be_alias()
4934 if (gfc_compare_types (&lref->u.c.sym->ts, in gfc_could_be_alias()
4937 if (gfc_compare_types (&lref->u.c.component->ts, in gfc_could_be_alias()
4963 if (gfc_compare_types (&lsym->ts, &rref->u.c.component->ts)) in gfc_could_be_alias()
H A Darray.c1397 if (gfc_compare_types (&constructor_ts, &expr->ts)) in check_element_type()
H A Dgfortran.h3462 bool gfc_compare_types (gfc_typespec *, gfc_typespec *);
H A Dresolve.c792 if (! gfc_compare_types (ts, fts) in resolve_entries()
1321 !gfc_compare_types (&cons->expr->ts, &comp->ts)) in resolve_structure_cons()
2627 if (sym->attr.function && !gfc_compare_types (&sym->ts, &def_sym->ts)) in resolve_global_procedure()
15169 && !gfc_compare_types (&sym->ts, gfc_get_default_type (sym->name, in resolve_fl_parameter()
15181 && !gfc_compare_types (&sym->ts, &sym->value->ts)) in resolve_fl_parameter()
16974 if (object == 1 || gfc_compare_types (last_ts, &sym->ts)) in resolve_equivalence()
H A Ddecl.c860 if(ts && !gfc_compare_types (&expr->ts, ts) in match_clist_expr()
920 else if (!gfc_compare_types (&expr->ts, ts) in match_clist_expr()
1690 || !gfc_compare_types (&sym->ts, &current_ts)) in build_sym()
H A Dopenmp.c200 else if (gfc_compare_types (&omp_udr->ts, ts)) in gfc_find_omp_udr()
5378 if (!gfc_compare_types (&expr2->value.op.op1->ts, &expr2->ts)) in resolve_omp_atomic()
H A Dexpr.c3818 if (gfc_compare_types (&lvalue->ts, &rvalue->ts)) in gfc_check_assign()
4245 if (!gfc_compare_types (&lvalue->ts, &rvalue->ts)) in gfc_check_pointer_assign()
H A Ddump-parse-tree.c3106 && gfc_compare_types (&ns->default_type[i+1], in show_namespace()
/netbsd-src/external/gpl3/gcc/dist/gcc/fortran/
H A Ddata.cc507 if (!gfc_compare_types (&lvalue->ts, &rexpr->ts)) in gfc_assign_data_value()
617 if (!gfc_compare_types (&lvalue->ts, &expr->ts)) in gfc_assign_data_value()
H A Ddependency.cc1226 if (gfc_compare_types (&sym1->ts, &sym2->ts)) in check_data_pointer_types()
1247 && gfc_compare_types (&ref1->u.c.component->ts, &sym2->ts)) in check_data_pointer_types()
1262 && gfc_compare_types (&cm1->ts, &sym2->ts)) in check_data_pointer_types()
H A Dcheck.cc923 if (gfc_compare_types (ets, fts)) in same_type_check()
2283 if (!gfc_compare_types (&a->ts, &sym->result->ts)) in gfc_check_co_reduce()
2291 if (!gfc_compare_types (&a->ts, &formal->sym->ts) in gfc_check_co_reduce()
2292 || !gfc_compare_types (&a->ts, &formal->next->sym->ts)) in gfc_check_co_reduce()
H A Dinterface.cc513 && !gfc_compare_types (&cmp1->ts, &cmp2->ts)) in compare_components()
697 gfc_compare_types (gfc_typespec *ts1, gfc_typespec *ts2) in gfc_compare_types() function
759 return gfc_compare_types (&s1->ts, &s2->ts) || s2->ts.type == BT_ASSUMED; in compare_type()
2464 && !gfc_compare_types (&formal->ts, &actual->ts) in compare_parameter()
H A DChangeLog-2016105 * gfortran.h (gfc_compare_derived_types,gfc_compare_types,
112 (gfc_compare_types): Ditto.
1432 * interface.c (gfc_compare_types): Don't compare BT_UNION components
2504 * interface.c (gfc_compare_derived_types, gfc_compare_types): Likewise.
H A Dtrans-array.cc4942 if (gfc_compare_types (&lsym->ts, &rsym->ts) == 0) in symbols_could_alias()
5017 if (gfc_compare_types (&lref->u.c.component->ts, in gfc_could_be_alias()
5039 if (gfc_compare_types (&lref->u.c.component->ts, in gfc_could_be_alias()
5042 if (gfc_compare_types (&lref->u.c.sym->ts, in gfc_could_be_alias()
5045 if (gfc_compare_types (&lref->u.c.component->ts, in gfc_could_be_alias()
5071 if (gfc_compare_types (&lsym->ts, &rref->u.c.component->ts)) in gfc_could_be_alias()
H A Darray.cc1409 if (gfc_compare_types (&constructor_ts, &expr->ts)) in check_element_type()
H A Dresolve.cc792 if (! gfc_compare_types (ts, fts) in resolve_entries()
1349 !gfc_compare_types (&cons->expr->ts, &comp->ts)) in resolve_structure_cons()
2685 if (sym->attr.function && !gfc_compare_types (&sym->ts, &def_sym->ts)) in resolve_global_procedure()
15389 && !gfc_compare_types (&sym->ts, gfc_get_default_type (sym->name, in resolve_fl_parameter()
15401 && !gfc_compare_types (&sym->ts, &sym->value->ts)) in resolve_fl_parameter()
17209 if (object == 1 || gfc_compare_types (last_ts, &sym->ts)) in resolve_equivalence()
H A Ddecl.cc860 if(ts && !gfc_compare_types (&expr->ts, ts) in match_clist_expr()
920 else if (!gfc_compare_types (&expr->ts, ts) in match_clist_expr()
1769 || !gfc_compare_types (&sym->ts, &current_ts)) in build_sym()
H A Dgfortran.h3748 bool gfc_compare_types (gfc_typespec *, gfc_typespec *);
H A DChangeLog-200576 *interface.c(gfc_compare_types): Broken into two.
77 (gfc_compare_derived_types): Second half of gfc_compare_types with
3295 * interface.c (gfc_compare_types): Adapt check to account for possible
H A Dexpr.cc3850 if (gfc_compare_types (&lvalue->ts, &rvalue->ts)) in gfc_check_assign()
4277 if (!gfc_compare_types (&lvalue->ts, &rvalue->ts)) in gfc_check_pointer_assign()
H A Ddump-parse-tree.cc3440 && gfc_compare_types (&ns->default_type[i+1], in show_namespace()

12