/netbsd-src/external/gpl3/gcc.old/dist/gcc/fortran/ |
H A D | class.c | 1450 ptr2->attr.flavor = FL_VARIABLE; in finalizer_insert_packed_call() 1459 tmp_array->attr.flavor = FL_VARIABLE; in finalizer_insert_packed_call() 1702 array->attr.flavor = FL_VARIABLE; in generate_finalization_wrapper() 1720 byte_stride->attr.flavor = FL_VARIABLE; in generate_finalization_wrapper() 1733 fini_coarray->attr.flavor = FL_VARIABLE; in generate_finalization_wrapper() 1756 idx->attr.flavor = FL_VARIABLE; in generate_finalization_wrapper() 1764 idx2->attr.flavor = FL_VARIABLE; in generate_finalization_wrapper() 1772 offset->attr.flavor = FL_VARIABLE; in generate_finalization_wrapper() 1788 is_contiguous->attr.flavor = FL_VARIABLE; in generate_finalization_wrapper() 1799 sizes->attr.flavor = FL_VARIABLE; in generate_finalization_wrapper() [all …]
|
H A D | primary.c | 1677 if (!gfc_add_flavor (&sym->attr, FL_VARIABLE, in match_actual_arg() 3432 if ((*sym)->attr.flavor == FL_VARIABLE in check_for_implicit_index() 3582 && sym->attr.flavor != FL_VARIABLE) in gfc_match_rvalue() 3598 case FL_VARIABLE: in gfc_match_rvalue() 3814 if (!gfc_add_flavor (&sym->attr, FL_VARIABLE, sym->name, NULL)) in gfc_match_rvalue() 3831 if (!gfc_add_flavor (&sym->attr, FL_VARIABLE, sym->name, NULL)) in gfc_match_rvalue() 3856 if (!gfc_add_flavor (&sym->attr, FL_VARIABLE, sym->name, NULL)) in gfc_match_rvalue() 3902 if (sym->attr.flavor != FL_VARIABLE in gfc_match_rvalue() 3903 && !gfc_add_flavor (&sym->attr, FL_VARIABLE, in gfc_match_rvalue() 4063 case FL_VARIABLE: in match_variable() [all …]
|
H A D | symbol.c | 40 minit ("VARIABLE", FL_VARIABLE), minit ("PARAMETER", FL_PARAMETER), 519 case FL_VARIABLE: in gfc_check_conflict() 734 && attr->flavor != FL_VARIABLE in gfc_check_conflict() 789 case FL_VARIABLE: in gfc_check_conflict() 1559 if (attr->flavor == FL_VARIABLE) in gfc_add_in_equivalence() 1562 return gfc_add_flavor (attr, FL_VARIABLE, name, where); in gfc_add_in_equivalence() 1769 if (attr->flavor == f && f == FL_VARIABLE) in gfc_add_flavor() 4248 || sym->attr.flavor != FL_VARIABLE) in save_symbol() 4684 formal_arg->sym->attr.flavor = FL_VARIABLE; in gfc_copy_formal_args_intr()
|
H A D | openmp.c | 2180 || ((s->attr.flavor == FL_UNKNOWN || s->attr.flavor == FL_VARIABLE) in gfc_match_oacc_declare() 3055 omp_out->n.sym->attr.flavor = FL_VARIABLE; in gfc_match_omp_declare_reduction() 3056 omp_in->n.sym->attr.flavor = FL_VARIABLE; in gfc_match_omp_declare_reduction() 3088 omp_priv->n.sym->attr.flavor = FL_VARIABLE; in gfc_match_omp_declare_reduction() 3089 omp_orig->n.sym->attr.flavor = FL_VARIABLE; in gfc_match_omp_declare_reduction() 4263 if (n->sym->attr.flavor == FL_VARIABLE 4961 else if (n->sym->attr.flavor == FL_VARIABLE 5703 if (sym->attr.flavor != FL_VARIABLE in handle_local_var() 6275 if (n->sym->attr.flavor != FL_VARIABLE in gfc_resolve_oacc_declare()
|
H A D | match.c | 6312 gfc_add_flavor (&sym->attr, FL_VARIABLE, name, NULL); in select_intrinsic_set_tmp() 6377 gfc_add_flavor (&sym->attr, FL_VARIABLE, name, NULL); in select_type_set_tmp() 6443 sym->attr.flavor = FL_VARIABLE; in gfc_match_select_type() 6604 gfc_add_flavor (&sym->attr, FL_VARIABLE, name, NULL); in select_rank_set_tmp() 6681 sym->attr.flavor = FL_VARIABLE; in gfc_match_select_rank() 6695 sym->attr.flavor = FL_VARIABLE; in gfc_match_select_rank()
|
H A D | resolve.c | 378 gfc_add_flavor (&sym->attr, FL_VARIABLE, sym->name, &sym->declared_at); in gfc_resolve_formal_arglist() 582 if (! sym || !(sym->attr.function || sym->attr.flavor == FL_VARIABLE) in resolve_contained_fntype() 987 gfc_add_flavor (&csym->attr, FL_VARIABLE, csym->name, &csym->declared_at); in resolve_common_vars() 3188 if (sym && (sym->attr.flavor == FL_VARIABLE || sym->attr.subroutine)) in resolve_function() 5889 if (sym->attr.flavor == FL_VARIABLE in resolve_variable() 7019 || con->expr->symtree->n.sym->attr.flavor == FL_VARIABLE)) in gfc_is_expandable_expr() 8925 gcc_assert (sym->attr.flavor == FL_VARIABLE); in resolve_assoc_var() 10175 symtree->n.sym->attr.flavor = FL_VARIABLE; in resolve_critical() 11214 tmp->n.sym->attr.flavor = FL_VARIABLE; in get_temp_from_expr() 12352 if (sym->attr.flavor == FL_VARIABLE && gsym->type != GSYM_UNKNOWN) in gfc_verify_binding_labels() [all …]
|
H A D | dump-parse-tree.c | 1153 if (sym->attr.flavor == FL_VARIABLE in show_symbol() 3431 gcc_assert (sym->attr.flavor == FL_VARIABLE); in write_variable() 3543 if (sym->attr.flavor == FL_VARIABLE) in write_interop_decl()
|
H A D | trans-decl.c | 1719 if ((sym->attr.flavor == FL_VARIABLE in gfc_get_symbol_decl() 1955 sym->attr.flavor = FL_VARIABLE; in gfc_shadow_sym() 5275 if (sym->attr.flavor != FL_VARIABLE in gfc_create_module_variable() 5531 && (sym->attr.flavor != FL_VARIABLE || sym->attr.referenced)) in gfc_emit_parameter_debug_info() 5925 if (sym->attr.flavor == FL_VARIABLE) in generate_local_decl()
|
H A D | gfortran.h | 285 FL_UNKNOWN = 0, FL_PROGRAM, FL_BLOCK_DATA, FL_MODULE, FL_VARIABLE, enumerator
|
H A D | frontend-passes.c | 845 symbol->attr.flavor = FL_VARIABLE; in create_var() 3487 symbol->attr.flavor = FL_VARIABLE; in create_do_loop()
|
H A D | trans-openmp.c | 1714 init_val_sym.attr.flavor = FL_VARIABLE; in gfc_trans_omp_array_reduction_or_udr() 1740 outer_sym.attr.flavor = FL_VARIABLE; in gfc_trans_omp_array_reduction_or_udr()
|
H A D | parse.c | 4672 sym->attr.flavor = FL_VARIABLE; in parse_associate()
|
/netbsd-src/external/gpl3/gcc/dist/gcc/fortran/ |
H A D | class.cc | 1465 ptr2->attr.flavor = FL_VARIABLE; in finalizer_insert_packed_call() 1474 tmp_array->attr.flavor = FL_VARIABLE; in finalizer_insert_packed_call() 1719 array->attr.flavor = FL_VARIABLE; in generate_finalization_wrapper() 1737 byte_stride->attr.flavor = FL_VARIABLE; in generate_finalization_wrapper() 1750 fini_coarray->attr.flavor = FL_VARIABLE; in generate_finalization_wrapper() 1764 idx->attr.flavor = FL_VARIABLE; in generate_finalization_wrapper() 1772 idx2->attr.flavor = FL_VARIABLE; in generate_finalization_wrapper() 1780 offset->attr.flavor = FL_VARIABLE; in generate_finalization_wrapper() 1796 is_contiguous->attr.flavor = FL_VARIABLE; in generate_finalization_wrapper() 1807 sizes->attr.flavor = FL_VARIABLE; in generate_finalization_wrapper() [all …]
|
H A D | primary.cc | 1656 if (!gfc_add_flavor (&sym->attr, FL_VARIABLE, in match_actual_arg() 3440 if ((*sym)->attr.flavor == FL_VARIABLE in check_for_implicit_index() 3590 && sym->attr.flavor != FL_VARIABLE) in gfc_match_rvalue() 3606 case FL_VARIABLE: in gfc_match_rvalue() 3822 if (!gfc_add_flavor (&sym->attr, FL_VARIABLE, sym->name, NULL)) in gfc_match_rvalue() 3839 if (!gfc_add_flavor (&sym->attr, FL_VARIABLE, sym->name, NULL)) in gfc_match_rvalue() 3864 if (!gfc_add_flavor (&sym->attr, FL_VARIABLE, sym->name, NULL)) in gfc_match_rvalue() 3910 if (sym->attr.flavor != FL_VARIABLE in gfc_match_rvalue() 3911 && !gfc_add_flavor (&sym->attr, FL_VARIABLE, in gfc_match_rvalue() 4071 case FL_VARIABLE: in match_variable() [all …]
|
H A D | symbol.cc | 40 minit ("VARIABLE", FL_VARIABLE), minit ("PARAMETER", FL_PARAMETER), 519 case FL_VARIABLE: in gfc_check_conflict() 735 && attr->flavor != FL_VARIABLE in gfc_check_conflict() 790 case FL_VARIABLE: in gfc_check_conflict() 1566 if (attr->flavor == FL_VARIABLE) in gfc_add_in_equivalence() 1569 return gfc_add_flavor (attr, FL_VARIABLE, name, where); in gfc_add_in_equivalence() 1776 if (attr->flavor == f && f == FL_VARIABLE) in gfc_add_flavor() 4268 || sym->attr.flavor != FL_VARIABLE) in save_symbol() 4719 formal_arg->sym->attr.flavor = FL_VARIABLE; in gfc_copy_formal_args_intr()
|
H A D | match.cc | 6403 gfc_add_flavor (&sym->attr, FL_VARIABLE, name, NULL); in select_intrinsic_set_tmp() 6468 gfc_add_flavor (&sym->attr, FL_VARIABLE, name, NULL); in select_type_set_tmp() 6534 sym->attr.flavor = FL_VARIABLE; in gfc_match_select_type() 6695 gfc_add_flavor (&sym->attr, FL_VARIABLE, name, NULL); in select_rank_set_tmp() 6772 sym->attr.flavor = FL_VARIABLE; in gfc_match_select_rank() 6786 sym->attr.flavor = FL_VARIABLE; in gfc_match_select_rank()
|
H A D | resolve.cc | 378 gfc_add_flavor (&sym->attr, FL_VARIABLE, sym->name, &sym->declared_at); in gfc_resolve_formal_arglist() 582 if (! sym || !(sym->attr.function || sym->attr.flavor == FL_VARIABLE) in resolve_contained_fntype() 1011 gfc_add_flavor (&csym->attr, FL_VARIABLE, csym->name, &csym->declared_at); in resolve_common_vars() 3260 if (sym && (sym->attr.flavor == FL_VARIABLE || sym->attr.subroutine)) in resolve_function() 5973 if (sym->attr.flavor == FL_VARIABLE in resolve_variable() 6173 && old_sym->attr.flavor == FL_VARIABLE in check_host_association() 7141 || con->expr->symtree->n.sym->attr.flavor == FL_VARIABLE)) in gfc_is_expandable_expr() 9063 gcc_assert (sym->attr.flavor == FL_VARIABLE); in resolve_assoc_var() 10314 symtree->n.sym->attr.flavor = FL_VARIABLE; in resolve_critical() 11372 tmp->n.sym->attr.flavor = FL_VARIABLE; in get_temp_from_expr() [all …]
|
H A D | openmp.cc | 1123 sym->attr.flavor = FL_VARIABLE; in gfc_match_iterator() 3216 || ((s->attr.flavor == FL_UNKNOWN || s->attr.flavor == FL_VARIABLE) in gfc_match_oacc_declare() 4348 omp_out->n.sym->attr.flavor = FL_VARIABLE; in gfc_match_omp_declare_reduction() 4349 omp_in->n.sym->attr.flavor = FL_VARIABLE; in gfc_match_omp_declare_reduction() 4381 omp_priv->n.sym->attr.flavor = FL_VARIABLE; in gfc_match_omp_declare_reduction() 4382 omp_orig->n.sym->attr.flavor = FL_VARIABLE; in gfc_match_omp_declare_reduction() 6499 if (n->sym->attr.flavor == FL_VARIABLE in resolve_omp_clauses() 7434 else if (n->sym->attr.flavor == FL_VARIABLE in resolve_omp_clauses() 8438 if (sym->attr.flavor != FL_VARIABLE in handle_local_var() 9074 if (n->sym->attr.flavor != FL_VARIABLE in gfc_resolve_oacc_declare()
|
H A D | dump-parse-tree.cc | 1180 if (sym->attr.flavor == FL_VARIABLE in show_symbol() 3770 gcc_assert (sym->attr.flavor == FL_VARIABLE); in write_variable() 3882 if (sym->attr.flavor == FL_VARIABLE) in write_interop_decl()
|
H A D | trans-decl.cc | 1758 if ((sym->attr.flavor == FL_VARIABLE in gfc_get_symbol_decl() 1994 sym->attr.flavor = FL_VARIABLE; in gfc_shadow_sym() 5203 if (sym->attr.flavor != FL_VARIABLE in gfc_create_module_variable() 5459 && (sym->attr.flavor != FL_VARIABLE || sym->attr.referenced)) in gfc_emit_parameter_debug_info() 5853 if (sym->attr.flavor == FL_VARIABLE) in generate_local_decl()
|
H A D | frontend-passes.cc | 845 symbol->attr.flavor = FL_VARIABLE; in create_var() 3765 symbol->attr.flavor = FL_VARIABLE; in create_do_loop()
|
H A D | interface.cc | 1749 if (s2->attr.subroutine && s1->attr.flavor == FL_VARIABLE) in gfc_compare_interfaces() 5579 s->attr.flavor = FL_VARIABLE; in gfc_get_formal_from_actual_arglist()
|
H A D | gfortran.h | 335 FL_UNKNOWN = 0, FL_PROGRAM, FL_BLOCK_DATA, FL_MODULE, FL_VARIABLE, enumerator
|
H A D | ChangeLog-2006 | 10 FL_VARIABLE this is an error. 935 of init_val_sym and outer_sym to FL_VARIABLE. 3876 code for flavors FL_VARIABLE, FL_PROCEDURE and FL_PARAMETER into new
|
H A D | ChangeLog-2013 | 792 * resolve.c (get_temp_from_expr): Don't set FL_VARIABLE twice.
|