Home
last modified time | relevance | path

Searched refs:from_intmod (Results 1 – 25 of 41) sorted by relevance

12

/netbsd-src/external/gpl3/gcc/dist/gcc/fortran/
H A Dmodule.cc4616 intmod = sym->from_intmod; in mio_symbol()
4623 sym->from_intmod = current_intmod; in mio_symbol()
4625 sym->from_intmod = (intmod_id) intmod; in mio_symbol()
6631 sym->from_intmod = module; in create_intrinsic_function()
6670 mod_sym->from_intmod = INTMOD_ISO_C_BINDING; in import_iso_c_binding_module()
6933 sym->from_intmod = module; in create_int_parameter()
6965 sym->from_intmod = module; in create_int_parameter_array()
7002 sym->from_intmod = module; in create_derived_type()
7017 dt_sym->from_intmod = module; in create_derived_type()
7097 mod_sym->from_intmod = INTMOD_ISO_FORTRAN_ENV; in use_iso_fortran_env_module()
H A Dexpr.cc2760 if (sym->from_intmod) in check_inquiry()
2762 if (sym->from_intmod == INTMOD_ISO_FORTRAN_ENV in check_inquiry()
2767 if (sym->from_intmod == INTMOD_ISO_C_BINDING in check_inquiry()
2983 int mod = sym->from_intmod; in gfc_check_init_expr()
2985 mod = sym->generic->sym->from_intmod; in gfc_check_init_expr()
3285 if (f->from_intmod == INTMOD_IEEE_ARITHMETIC in external_spec_function()
3286 || f->from_intmod == INTMOD_IEEE_EXCEPTIONS) in external_spec_function()
6298 && e->ts.u.derived->from_intmod == INTMOD_ISO_FORTRAN_ENV in gfc_check_vardef_context()
6311 && e->ts.u.derived->from_intmod == INTMOD_ISO_FORTRAN_ENV in gfc_check_vardef_context()
H A Dcheck.cc1764 || event->ts.u.derived->from_intmod != INTMOD_ISO_FORTRAN_ENV in gfc_check_event_query()
5333 || c_ptr_1->ts.u.derived->from_intmod != INTMOD_ISO_C_BINDING in gfc_check_c_associated()
5347 || c_ptr_2->ts.u.derived->from_intmod != INTMOD_ISO_C_BINDING in gfc_check_c_associated()
5372 || cptr->ts.u.derived->from_intmod != INTMOD_ISO_C_BINDING in gfc_check_c_f_pointer()
5461 || cptr->ts.u.derived->from_intmod != INTMOD_ISO_C_BINDING in gfc_check_c_f_procpointer()
6035 || team->ts.u.derived->from_intmod != INTMOD_ISO_FORTRAN_ENV in gfc_check_team_number()
H A Dsymbol.cc4405 if (dt_list->from_intmod != INTMOD_NONE in get_iso_c_binding_dt()
4817 || tmp_symtree->n.sym->from_intmod != INTMOD_ISO_C_BINDING in generate_isocbinding_symbol()
4825 && tmp_sym->from_intmod == INTMOD_ISO_C_BINDING) in generate_isocbinding_symbol()
4869 tmp_sym->from_intmod = INTMOD_ISO_C_BINDING; in generate_isocbinding_symbol()
4985 dt_sym->from_intmod = INTMOD_ISO_C_BINDING; in generate_isocbinding_symbol()
H A Dtrans-decl.cc1752 && (sym->from_intmod == INTMOD_ISO_FORTRAN_ENV in gfc_get_symbol_decl()
1753 || sym->from_intmod == INTMOD_ISO_C_BINDING)) in gfc_get_symbol_decl()
5550 && sym->ts.u.derived->from_intmod == INTMOD_ISO_FORTRAN_ENV in generate_coarray_sym_init()
5554 && sym->ts.u.derived->from_intmod == INTMOD_ISO_FORTRAN_ENV in generate_coarray_sym_init()
5990 && sym->from_intmod != INTMOD_ISO_C_BINDING in generate_local_decl()
5991 && sym->from_intmod != INTMOD_ISO_FORTRAN_ENV) in generate_local_decl()
6504 if (sym->from_intmod == INTMOD_IEEE_FEATURES in is_from_ieee_module()
6505 || sym->from_intmod == INTMOD_IEEE_EXCEPTIONS in is_from_ieee_module()
6506 || sym->from_intmod == INTMOD_IEEE_ARITHMETIC) in is_from_ieee_module()
H A Dtarget-memory.cc505 if (result->ts.u.derived->from_intmod == INTMOD_ISO_C_BINDING in gfc_interpret_derived()
H A Dtrans.cc943 && expr->ts.u.derived->from_intmod == INTMOD_ISO_FORTRAN_ENV in gfc_allocate_allocatable()
950 && expr->ts.u.derived->from_intmod == INTMOD_ISO_FORTRAN_ENV in gfc_allocate_allocatable()
H A Dparse.cc3276 && c->ts.u.derived->from_intmod == INTMOD_ISO_FORTRAN_ENV in check_component()
3279 && CLASS_DATA (c)->ts.u.derived->from_intmod in check_component()
3293 && c->ts.u.derived->from_intmod == INTMOD_ISO_FORTRAN_ENV in check_component()
3296 && CLASS_DATA (c)->ts.u.derived->from_intmod in check_component()
H A Dinterface.cc2612 && formal->ts.u.derived->from_intmod == INTMOD_ISO_FORTRAN_ENV in compare_parameter()
2627 && formal->ts.u.derived->from_intmod == INTMOD_ISO_FORTRAN_ENV in compare_parameter()
4149 && ((a->expr->ts.u.derived->from_intmod == INTMOD_ISO_FORTRAN_ENV in gfc_procedure_use()
4163 && ((a->expr->ts.u.derived->from_intmod == INTMOD_ISO_FORTRAN_ENV in gfc_procedure_use()
H A Dintrinsic.cc1010 gfc_isym_id_by_intmod (intmod_id from_intmod, int intmod_sym_id) in gfc_isym_id_by_intmod() argument
1012 if (from_intmod == INTMOD_NONE) in gfc_isym_id_by_intmod()
1014 else if (from_intmod == INTMOD_ISO_C_BINDING) in gfc_isym_id_by_intmod()
1016 else if (from_intmod == INTMOD_ISO_FORTRAN_ENV) in gfc_isym_id_by_intmod()
1038 return gfc_isym_id_by_intmod (sym->from_intmod, sym->intmod_sym_id); in gfc_isym_id_by_intmod_sym()
H A Ddump-parse-tree.cc3673 if (ts->u.derived->from_intmod == INTMOD_ISO_C_BINDING) in get_c_type_name()
3879 if (sym->from_intmod == INTMOD_ISO_C_BINDING) in write_interop_decl()
H A Dresolve.cc1840 if (sym->from_intmod && sym->ts.type != BT_UNKNOWN) in gfc_resolve_intrinsic()
7976 || (code->expr3->ts.u.derived->from_intmod in resolve_allocate_expr()
7991 || (code->expr3->ts.u.derived->from_intmod in resolve_allocate_expr()
8059 && e->ts.u.derived->from_intmod == INTMOD_ISO_FORTRAN_ENV in resolve_allocate_expr()
10210 || code->expr1->ts.u.derived->from_intmod != INTMOD_ISO_FORTRAN_ENV in resolve_lock_unlock_event()
10220 || code->expr1->ts.u.derived->from_intmod in resolve_lock_unlock_event()
10305 lock_type->from_intmod = INTMOD_ISO_FORTRAN_ENV; in resolve_critical()
16005 && ((sym->ts.u.derived->from_intmod == INTMOD_ISO_FORTRAN_ENV in resolve_symbol()
16018 && ((sym->ts.u.derived->from_intmod == INTMOD_ISO_FORTRAN_ENV in resolve_symbol()
/netbsd-src/external/gpl3/gcc.old/dist/gcc/fortran/
H A Dmodule.c4465 intmod = sym->from_intmod; in mio_symbol()
4472 sym->from_intmod = current_intmod; in mio_symbol()
4474 sym->from_intmod = (intmod_id) intmod; in mio_symbol()
6420 sym->from_intmod = module; in create_intrinsic_function()
6459 mod_sym->from_intmod = INTMOD_ISO_C_BINDING; in import_iso_c_binding_module()
6722 sym->from_intmod = module; in create_int_parameter()
6754 sym->from_intmod = module; in create_int_parameter_array()
6791 sym->from_intmod = module; in create_derived_type()
6806 dt_sym->from_intmod = module; in create_derived_type()
6886 mod_sym->from_intmod = INTMOD_ISO_FORTRAN_ENV; in use_iso_fortran_env_module()
H A Dexpr.c2734 if (sym->from_intmod) in check_inquiry()
2736 if (sym->from_intmod == INTMOD_ISO_FORTRAN_ENV in check_inquiry()
2741 if (sym->from_intmod == INTMOD_ISO_C_BINDING in check_inquiry()
2957 int mod = sym->from_intmod; in gfc_check_init_expr()
2959 mod = sym->generic->sym->from_intmod; in gfc_check_init_expr()
3253 if (f->from_intmod == INTMOD_IEEE_ARITHMETIC in external_spec_function()
3254 || f->from_intmod == INTMOD_IEEE_EXCEPTIONS) in external_spec_function()
6242 && e->ts.u.derived->from_intmod == INTMOD_ISO_FORTRAN_ENV in gfc_check_vardef_context()
6255 && e->ts.u.derived->from_intmod == INTMOD_ISO_FORTRAN_ENV in gfc_check_vardef_context()
H A Dtrans-decl.c1713 && (sym->from_intmod == INTMOD_ISO_FORTRAN_ENV in gfc_get_symbol_decl()
1714 || sym->from_intmod == INTMOD_ISO_C_BINDING)) in gfc_get_symbol_decl()
5622 && sym->ts.u.derived->from_intmod == INTMOD_ISO_FORTRAN_ENV in generate_coarray_sym_init()
5626 && sym->ts.u.derived->from_intmod == INTMOD_ISO_FORTRAN_ENV in generate_coarray_sym_init()
6062 && sym->from_intmod != INTMOD_ISO_C_BINDING in generate_local_decl()
6063 && sym->from_intmod != INTMOD_ISO_FORTRAN_ENV) in generate_local_decl()
6571 if (sym->from_intmod == INTMOD_IEEE_FEATURES in is_from_ieee_module()
6572 || sym->from_intmod == INTMOD_IEEE_EXCEPTIONS in is_from_ieee_module()
6573 || sym->from_intmod == INTMOD_IEEE_ARITHMETIC) in is_from_ieee_module()
H A Dcheck.c1760 || event->ts.u.derived->from_intmod != INTMOD_ISO_FORTRAN_ENV in gfc_check_event_query()
5314 || c_ptr_1->ts.u.derived->from_intmod != INTMOD_ISO_C_BINDING in gfc_check_c_associated()
5328 || c_ptr_2->ts.u.derived->from_intmod != INTMOD_ISO_C_BINDING in gfc_check_c_associated()
5353 || cptr->ts.u.derived->from_intmod != INTMOD_ISO_C_BINDING in gfc_check_c_f_pointer()
5442 || cptr->ts.u.derived->from_intmod != INTMOD_ISO_C_BINDING in gfc_check_c_f_procpointer()
6009 || team->ts.u.derived->from_intmod != INTMOD_ISO_FORTRAN_ENV in gfc_check_team_number()
H A Dsymbol.c4385 if (dt_list->from_intmod != INTMOD_NONE in get_iso_c_binding_dt()
4773 || tmp_symtree->n.sym->from_intmod != INTMOD_ISO_C_BINDING in generate_isocbinding_symbol()
4781 && tmp_sym->from_intmod == INTMOD_ISO_C_BINDING) in generate_isocbinding_symbol()
4825 tmp_sym->from_intmod = INTMOD_ISO_C_BINDING; in generate_isocbinding_symbol()
4941 dt_sym->from_intmod = INTMOD_ISO_C_BINDING; in generate_isocbinding_symbol()
H A Dtarget-memory.c505 if (result->ts.u.derived->from_intmod == INTMOD_ISO_C_BINDING in gfc_interpret_derived()
H A Dparse.c3026 && c->ts.u.derived->from_intmod == INTMOD_ISO_FORTRAN_ENV in check_component()
3029 && CLASS_DATA (c)->ts.u.derived->from_intmod in check_component()
3043 && c->ts.u.derived->from_intmod == INTMOD_ISO_FORTRAN_ENV in check_component()
3046 && CLASS_DATA (c)->ts.u.derived->from_intmod in check_component()
H A Dtrans.c870 && expr->ts.u.derived->from_intmod == INTMOD_ISO_FORTRAN_ENV in gfc_allocate_allocatable()
877 && expr->ts.u.derived->from_intmod == INTMOD_ISO_FORTRAN_ENV in gfc_allocate_allocatable()
H A Dinterface.c2547 && formal->ts.u.derived->from_intmod == INTMOD_ISO_FORTRAN_ENV in compare_parameter()
2562 && formal->ts.u.derived->from_intmod == INTMOD_ISO_FORTRAN_ENV in compare_parameter()
3946 && ((a->expr->ts.u.derived->from_intmod == INTMOD_ISO_FORTRAN_ENV in gfc_procedure_use()
3960 && ((a->expr->ts.u.derived->from_intmod == INTMOD_ISO_FORTRAN_ENV in gfc_procedure_use()
H A Dintrinsic.c984 gfc_isym_id_by_intmod (intmod_id from_intmod, int intmod_sym_id) in gfc_isym_id_by_intmod() argument
986 if (from_intmod == INTMOD_NONE) in gfc_isym_id_by_intmod()
988 else if (from_intmod == INTMOD_ISO_C_BINDING) in gfc_isym_id_by_intmod()
990 else if (from_intmod == INTMOD_ISO_FORTRAN_ENV) in gfc_isym_id_by_intmod()
1012 return gfc_isym_id_by_intmod (sym->from_intmod, sym->intmod_sym_id); in gfc_isym_id_by_intmod_sym()
H A Ddump-parse-tree.c3334 if (ts->u.derived->from_intmod == INTMOD_ISO_C_BINDING) in get_c_type_name()
3540 if (sym->from_intmod == INTMOD_ISO_C_BINDING) in write_interop_decl()
H A Dtrans-types.c2523 && derived->from_intmod == INTMOD_ISO_FORTRAN_ENV in gfc_get_derived_type()
2530 && derived->from_intmod == INTMOD_ISO_FORTRAN_ENV in gfc_get_derived_type()
H A Dresolve.c1799 if (sym->from_intmod && sym->ts.type != BT_UNKNOWN) in gfc_resolve_intrinsic()
7853 || (code->expr3->ts.u.derived->from_intmod in resolve_allocate_expr()
7868 || (code->expr3->ts.u.derived->from_intmod in resolve_allocate_expr()
7936 && e->ts.u.derived->from_intmod == INTMOD_ISO_FORTRAN_ENV in resolve_allocate_expr()
10071 || code->expr1->ts.u.derived->from_intmod != INTMOD_ISO_FORTRAN_ENV in resolve_lock_unlock_event()
10081 || code->expr1->ts.u.derived->from_intmod in resolve_lock_unlock_event()
10166 lock_type->from_intmod = INTMOD_ISO_FORTRAN_ENV; in resolve_critical()
15781 && ((sym->ts.u.derived->from_intmod == INTMOD_ISO_FORTRAN_ENV in resolve_symbol()
15794 && ((sym->ts.u.derived->from_intmod == INTMOD_ISO_FORTRAN_ENV in resolve_symbol()

12