Searched refs:implicit_type (Results 1 – 18 of 18) sorted by relevance
319 sym->attr.implicit_type = 1; in gfc_set_default_type()369 if (!proc->attr.contained || proc->result->attr.implicit_type) in gfc_check_function_type()2005 if (type != BT_UNKNOWN && !(sym->attr.function && sym->attr.implicit_type) in gfc_add_type()
1578 if (!a.implicit_type && sym->ts.type != BT_UNKNOWN) in was_declared()1864 && !sym->attr.implicit_type) in gfc_resolve_intrinsic()1877 if (sym->ts.type != BT_UNKNOWN && !sym->attr.implicit_type) in gfc_resolve_intrinsic()3006 && sym->attr.implicit_type in resolve_unknown_f()13490 if (curr_arg->sym && curr_arg->sym->attr.implicit_type == 0) in resolve_fl_procedure()15388 if (sym->attr.implicit_type in resolve_fl_parameter()15920 else if (sym->common_head != NULL && sym->attr.implicit_type == 0) in resolve_symbol()15924 else if (sym->attr.implicit_type == 0) in resolve_symbol()
1404 && !sym->attr.implicit_type in get_proc_name()1499 if (sym->attr.implicit_type) in gfc_verify_c_interop_param()1768 && (sym->attr.implicit_type == 0 in build_sym()5967 if (tmp_sym->attr.implicit_type && warn_c_binding_type) in verify_bind_c_sym()
2181 intrinsic_sym.attr.implicit_type = 1; in gfc_trans_omp_array_reduction_or_udr()7618 else if (odv->base_proc_symtree->n.sym->attr.implicit_type) in gfc_trans_omp_declare_variant()7708 if (variant_proc_sym == NULL || variant_proc_sym->attr.implicit_type) in gfc_trans_omp_declare_variant()7723 if (!variant_proc_sym->attr.implicit_type in gfc_trans_omp_declare_variant()
883 unsigned implicit_type:1; /* Type defined via implicit rules. */ member
852 if (attr->implicit_type) in show_attr()
3443 && (*sym)->attr.implicit_type in check_for_implicit_index()
6009 && !old_sym->attr.implicit_type) in gfc_fixup_sibling_symbols()
257 attr.implicit_type in intrinsic_sym to avoid undesirable warning.
1120 attr.implicit_type to conditions that throw error for
319 sym->attr.implicit_type = 1; in gfc_set_default_type()369 if (!proc->attr.contained || proc->result->attr.implicit_type) in gfc_check_function_type()1998 if (type != BT_UNKNOWN && !(sym->attr.function && sym->attr.implicit_type) in gfc_add_type()
1404 && !sym->attr.implicit_type in get_proc_name()1499 if (sym->attr.implicit_type) in gfc_verify_c_interop_param()1689 && (sym->attr.implicit_type == 0 in build_sym()5878 if (tmp_sym->attr.implicit_type && warn_c_binding_type) in verify_bind_c_sym()
1539 if (!a.implicit_type && sym->ts.type != BT_UNKNOWN) in was_declared()1823 && !sym->attr.implicit_type) in gfc_resolve_intrinsic()1836 if (sym->ts.type != BT_UNKNOWN && !sym->attr.implicit_type) in gfc_resolve_intrinsic()13278 if (curr_arg->sym && curr_arg->sym->attr.implicit_type == 0) in resolve_fl_procedure()15168 if (sym->attr.implicit_type in resolve_fl_parameter()15696 else if (sym->common_head != NULL && sym->attr.implicit_type == 0) in resolve_symbol()15700 else if (sym->attr.implicit_type == 0) in resolve_symbol()
811 unsigned implicit_type:1; /* Type defined via implicit rules. */ member
827 if (attr->implicit_type) in show_attr()
3435 && (*sym)->attr.implicit_type in check_for_implicit_index()
5667 && !old_sym->attr.implicit_type) in gfc_fixup_sibling_symbols()
1895 intrinsic_sym.attr.implicit_type = 1; in gfc_trans_omp_array_reduction_or_udr()