Home
last modified time | relevance | path

Searched refs:fsym (Results 1 – 25 of 28) sorted by relevance

12

/netbsd-src/usr.bin/xlint/lint1/
H A Dfunc.c204 begin_function(sym_t *fsym) in begin_function() argument
206 funcsym = fsym; in begin_function()
225 if (!fsym->s_type->t_proto && fsym->u.s_old_style_params == NULL) in begin_function()
226 fsym->s_osdef = true; in begin_function()
228 check_type(fsym); in begin_function()
234 if (fsym->s_type->t_subt->t_tspec != VOID && in begin_function()
235 is_incomplete(fsym->s_type->t_subt)) { in begin_function()
240 fsym->s_def = DEF; in begin_function()
242 if (fsym in begin_function()
[all...]
H A Demit1.c237 outfdef(const sym_t *fsym, const pos_t *posp, bool rval, bool osdef, in outfdef() argument
288 if (fsym->s_inline) in outfdef()
291 if (fsym->s_scl == STATIC) in outfdef()
294 outname(fsym->s_name); in outfdef()
296 if (fsym->s_rename != NULL) { in outfdef()
298 outname(fsym->s_rename); in outfdef()
310 outtype(fsym->s_type->t_subt); in outfdef()
312 outtype(fsym->s_type); in outfdef()
/netbsd-src/external/gpl3/gcc/dist/gcc/fortran/
H A Dtrans-expr.cc4888 const gfc_symbol *fsym, const char *proc_name, in gfc_conv_subref_array_arg() argument
4910 pass_optional = fsym && fsym->attr.optional && sym && sym->attr.optional; in gfc_conv_subref_array_arg()
4925 if (fsym && proc_name) in gfc_conv_subref_array_arg()
4927 "'%s' of procedure '%s'", fsym->name, proc_name); in gfc_conv_subref_array_arg()
5519 gfc_conv_gfc_desc_to_cfi_desc (gfc_se *parmse, gfc_expr *e, gfc_symbol *fsym) in gfc_conv_gfc_desc_to_cfi_desc() argument
5528 if (fsym->attr.optional in gfc_conv_gfc_desc_to_cfi_desc()
5555 if ((fsym->attr.contiguous in gfc_conv_gfc_desc_to_cfi_desc()
5556 || (fsym->ts.type == BT_CHARACTER && !fsym->ts.u.cl->length in gfc_conv_gfc_desc_to_cfi_desc()
5557 && (fsym->as->type == AS_ASSUMED_SIZE in gfc_conv_gfc_desc_to_cfi_desc()
5558 || fsym->as->type == AS_EXPLICIT))) in gfc_conv_gfc_desc_to_cfi_desc()
[all …]
H A Dinterface.cc896 gfc_symbol *fsym = formal->sym; in gfc_check_operator_interface() local
897 if (fsym == NULL) in gfc_check_operator_interface()
905 t1 = fsym->ts.type; in gfc_check_operator_interface()
906 i1 = fsym->attr.intent; in gfc_check_operator_interface()
907 r1 = (fsym->as != NULL) ? fsym->as->rank : 0; in gfc_check_operator_interface()
908 k1 = fsym->ts.kind; in gfc_check_operator_interface()
912 t2 = fsym->ts.type; in gfc_check_operator_interface()
913 i2 = fsym->attr.intent; in gfc_check_operator_interface()
914 r2 = (fsym->as != NULL) ? fsym->as->rank : 0; in gfc_check_operator_interface()
915 k2 = fsym->ts.kind; in gfc_check_operator_interface()
[all …]
H A Dtrans-decl.cc6130 gfc_symbol *fsym; in add_argument_checking() local
6134 fsym = formal->sym; in add_argument_checking()
6135 cl = fsym->ts.u.cl; in add_argument_checking()
6148 if (fsym->attr.pointer || fsym->attr.allocatable in add_argument_checking()
6149 || (fsym->as && (fsym->as->type == AS_ASSUMED_SHAPE in add_argument_checking()
6150 || fsym->as->type == AS_ASSUMED_RANK))) in add_argument_checking()
6156 else if (fsym->as && fsym->as->rank != 0) in add_argument_checking()
6170 if (fsym->attr.optional) in add_argument_checking()
6182 fsym->attr.referenced = 1; in add_argument_checking()
6183 not_absent = gfc_conv_expr_present (fsym); in add_argument_checking()
[all …]
H A Dtrans-array.cc8271 const gfc_symbol *fsym, const char *proc_name, in gfc_conv_array_parameter() argument
8488 if (g77 || (fsym && fsym->attr.contiguous in gfc_conv_array_parameter()
8510 if (fsym) in gfc_conv_array_parameter()
8513 &expr->where, fsym->name); in gfc_conv_array_parameter()
8527 && (fsym == NULL || fsym->ts.type != BT_ASSUMED)) in gfc_conv_array_parameter()
8530 fsym ? fsym->attr.intent : INTENT_INOUT, in gfc_conv_array_parameter()
8531 false, fsym, proc_name, sym, true); in gfc_conv_array_parameter()
8538 if (fsym && fsym->attr.optional && sym && sym->attr.optional) in gfc_conv_array_parameter()
8605 if (fsym && proc_name) in gfc_conv_array_parameter()
8607 "'%s' of procedure '%s'", fsym->name, proc_name); in gfc_conv_array_parameter()
[all …]
H A Dtrans-stmt.cc237 gfc_symbol *fsym; in gfc_conv_elemental_dependencies() local
263 fsym = formal ? formal->sym : NULL; in gfc_conv_elemental_dependencies()
265 && e->rank && fsym in gfc_conv_elemental_dependencies()
266 && fsym->attr.intent != INTENT_IN in gfc_conv_elemental_dependencies()
267 && gfc_check_fncall_dependency (e, fsym->attr.intent, in gfc_conv_elemental_dependencies()
288 if (fsym->attr.intent == INTENT_INOUT in gfc_conv_elemental_dependencies()
289 || (fsym->ts.type ==BT_DERIVED in gfc_conv_elemental_dependencies()
290 && fsym->attr.intent == INTENT_OUT)) in gfc_conv_elemental_dependencies()
H A Dtrans.h549 const gfc_symbol *fsym = NULL,
H A Ddecl.cc9875 gfc_symbol *sym, *fsym; in gfc_match_submod_proc() local
9942 if (gfc_copy_dummy_sym (&fsym, formal->sym, 0)) in gfc_match_submod_proc()
9945 tail->sym = fsym; in gfc_match_submod_proc()
9946 gfc_set_sym_referenced (fsym); in gfc_match_submod_proc()
H A Dresolve.cc13237 gfc_symbol *fsym; in compare_fsyms() local
13242 fsym = new_formal->sym; in compare_fsyms()
13244 if (sym == fsym) in compare_fsyms()
13247 if (strcmp (sym->name, fsym->name) == 0) in compare_fsyms()
13249 if (!gfc_check_dummy_characteristics (fsym, sym, true, errmsg, 200)) in compare_fsyms()
13250 gfc_error ("%s at %L", errmsg, &fsym->declared_at); in compare_fsyms()
/netbsd-src/external/gpl3/gcc.old/dist/gcc/fortran/
H A Dtrans-expr.c4799 const gfc_symbol *fsym, const char *proc_name, in gfc_conv_subref_array_arg() argument
4821 pass_optional = fsym && fsym->attr.optional && sym && sym->attr.optional; in gfc_conv_subref_array_arg()
4836 if (fsym && proc_name) in gfc_conv_subref_array_arg()
4838 "'%s' of procedure '%s'", fsym->name, proc_name); in gfc_conv_subref_array_arg()
5397 gfc_conv_gfc_desc_to_cfi_desc (gfc_se *parmse, gfc_expr *e, gfc_symbol *fsym) in gfc_conv_gfc_desc_to_cfi_desc() argument
5422 if (fsym->as->type == AS_ASSUMED_SHAPE in gfc_conv_gfc_desc_to_cfi_desc()
5423 && !fsym->attr.pointer && !fsym->attr.allocatable) in gfc_conv_gfc_desc_to_cfi_desc()
5431 if (fsym->attr.contiguous in gfc_conv_gfc_desc_to_cfi_desc()
5433 gfc_conv_subref_array_arg (parmse, e, false, fsym->attr.intent, in gfc_conv_gfc_desc_to_cfi_desc()
5434 fsym->attr.pointer); in gfc_conv_gfc_desc_to_cfi_desc()
[all …]
H A Dinterface.c885 gfc_symbol *fsym = formal->sym; in gfc_check_operator_interface() local
886 if (fsym == NULL) in gfc_check_operator_interface()
894 t1 = fsym->ts.type; in gfc_check_operator_interface()
895 i1 = fsym->attr.intent; in gfc_check_operator_interface()
896 r1 = (fsym->as != NULL) ? fsym->as->rank : 0; in gfc_check_operator_interface()
897 k1 = fsym->ts.kind; in gfc_check_operator_interface()
901 t2 = fsym->ts.type; in gfc_check_operator_interface()
902 i2 = fsym->attr.intent; in gfc_check_operator_interface()
903 r2 = (fsym->as != NULL) ? fsym->as->rank : 0; in gfc_check_operator_interface()
904 k2 = fsym->ts.kind; in gfc_check_operator_interface()
[all …]
H A Dtrans-decl.c6197 gfc_symbol *fsym; in add_argument_checking() local
6201 fsym = formal->sym; in add_argument_checking()
6202 cl = fsym->ts.u.cl; in add_argument_checking()
6215 if (fsym->attr.pointer || fsym->attr.allocatable in add_argument_checking()
6216 || (fsym->as && (fsym->as->type == AS_ASSUMED_SHAPE in add_argument_checking()
6217 || fsym->as->type == AS_ASSUMED_RANK))) in add_argument_checking()
6223 else if (fsym->as && fsym->as->rank != 0) in add_argument_checking()
6237 if (fsym->attr.optional) in add_argument_checking()
6249 fsym->attr.referenced = 1; in add_argument_checking()
6250 not_absent = gfc_conv_expr_present (fsym); in add_argument_checking()
[all …]
H A Dtrans-array.c8103 const gfc_symbol *fsym, const char *proc_name, in gfc_conv_array_parameter() argument
8319 if (g77 || (fsym && fsym->attr.contiguous in gfc_conv_array_parameter()
8341 if (fsym) in gfc_conv_array_parameter()
8344 &expr->where, fsym->name); in gfc_conv_array_parameter()
8358 && (fsym == NULL || fsym->ts.type != BT_ASSUMED)) in gfc_conv_array_parameter()
8361 fsym ? fsym->attr.intent : INTENT_INOUT, in gfc_conv_array_parameter()
8362 false, fsym, proc_name, sym, true); in gfc_conv_array_parameter()
8369 if (fsym && fsym->attr.optional && sym && sym->attr.optional) in gfc_conv_array_parameter()
8436 if (fsym && proc_name) in gfc_conv_array_parameter()
8438 "'%s' of procedure '%s'", fsym->name, proc_name); in gfc_conv_array_parameter()
[all …]
H A Dtrans-stmt.c230 gfc_symbol *fsym; in gfc_conv_elemental_dependencies() local
256 fsym = formal ? formal->sym : NULL; in gfc_conv_elemental_dependencies()
258 && e->rank && fsym in gfc_conv_elemental_dependencies()
259 && fsym->attr.intent != INTENT_IN in gfc_conv_elemental_dependencies()
260 && gfc_check_fncall_dependency (e, fsym->attr.intent, in gfc_conv_elemental_dependencies()
281 if (fsym->attr.intent == INTENT_INOUT in gfc_conv_elemental_dependencies()
282 || (fsym->ts.type ==BT_DERIVED in gfc_conv_elemental_dependencies()
283 && fsym->attr.intent == INTENT_OUT)) in gfc_conv_elemental_dependencies()
H A Dtrans.h547 const gfc_symbol *fsym = NULL,
H A Ddecl.c9787 gfc_symbol *sym, *fsym; in gfc_match_submod_proc() local
9854 if (gfc_copy_dummy_sym (&fsym, formal->sym, 0)) in gfc_match_submod_proc()
9857 tail->sym = fsym; in gfc_match_submod_proc()
9858 gfc_set_sym_referenced (fsym); in gfc_match_submod_proc()
H A Dresolve.c13025 gfc_symbol *fsym; in compare_fsyms() local
13030 fsym = new_formal->sym; in compare_fsyms()
13032 if (sym == fsym) in compare_fsyms()
13035 if (strcmp (sym->name, fsym->name) == 0) in compare_fsyms()
13037 if (!gfc_check_dummy_characteristics (fsym, sym, true, errmsg, 200)) in compare_fsyms()
13038 gfc_error ("%s at %L", errmsg, &fsym->declared_at); in compare_fsyms()
/netbsd-src/external/cddl/osnet/dist/lib/libdtrace/common/
H A Ddt_link.c1225 GElf_Sym rsym, fsym, dsym; in process_obj() local
1417 shdr_rel.sh_info, &fsym, (emachine1 == EM_PPC64), in process_obj()
1423 if (fsym.st_name > data_str->d_size) { in process_obj()
1428 s = (char *)data_str->d_buf + fsym.st_name; in process_obj()
1434 if (GELF_ST_TYPE(fsym.st_info) != STT_FUNC) { in process_obj()
1580 rela.r_offset, shdr_rel.sh_info, &fsym, in process_obj()
1582 if (fsym.st_name > data_str->d_size) in process_obj()
1585 r = s = (char *) data_str->d_buf + fsym.st_name; in process_obj()
1589 rela.r_offset, shdr_rel.sh_info, &fsym, in process_obj()
1593 bind = GELF_ST_BIND(fsym.st_info) == STB_WEAK ? in process_obj()
[all …]
/netbsd-src/external/gpl3/gcc.old/dist/libbacktrace/
H A Dxcoff.c874 const b_xcoff_syment *fsym; in xcoff_initialize_fileline() local
897 fsym = NULL; in xcoff_initialize_fileline()
960 fsym = NULL; in xcoff_initialize_fileline()
975 fsym = asym; in xcoff_initialize_fileline()
981 if (fsym == NULL) in xcoff_initialize_fileline()
986 fsym = NULL; in xcoff_initialize_fileline()
1002 fn->name = xcoff_symname (fsym, strtab, strtab_size); in xcoff_initialize_fileline()
1004 fn->sect_base = sects[fsym->n_scnum - 1].s_paddr; in xcoff_initialize_fileline()
1005 fn->pc = base_address + fsym->n_value - fn->sect_base; in xcoff_initialize_fileline()
/netbsd-src/external/gpl3/gcc/dist/libbacktrace/
H A Dxcoff.c873 const b_xcoff_syment *fsym; in xcoff_initialize_fileline() local
896 fsym = NULL; in xcoff_initialize_fileline()
959 fsym = NULL; in xcoff_initialize_fileline()
974 fsym = asym; in xcoff_initialize_fileline()
980 if (fsym == NULL) in xcoff_initialize_fileline()
985 fsym = NULL; in xcoff_initialize_fileline()
1001 fn->name = xcoff_symname (fsym, strtab, strtab_size); in xcoff_initialize_fileline()
1003 fn->sect_base = sects[fsym->n_scnum - 1].s_paddr; in xcoff_initialize_fileline()
1004 fn->pc = base_address + fsym->n_value; in xcoff_initialize_fileline()
/netbsd-src/external/gpl3/gcc.old/dist/gcc/config/msp430/
H A Dmsp430.c2713 rtx c, fusage, fsym; in msp430_expand_helper() local
2792 fsym = gen_rtx_SYMBOL_REF (VOIDmode, concat (helper_name, in msp430_expand_helper()
2799 fsym = gen_rtx_SYMBOL_REF (VOIDmode, concat (helper_name, in msp430_expand_helper()
2802 fsym = gen_rtx_SYMBOL_REF (VOIDmode, concat (helper_name, in msp430_expand_helper()
2807 fsym = gen_rtx_SYMBOL_REF (VOIDmode, concat (helper_name, in msp430_expand_helper()
2810 fsym = gen_rtx_SYMBOL_REF (VOIDmode, helper_name); in msp430_expand_helper()
2813 fsym = gen_rtx_SYMBOL_REF (VOIDmode, in msp430_expand_helper()
2816 c = gen_call_value_internal (gen_rtx_REG (arg0mode, 12), fsym, GEN_INT (0)); in msp430_expand_helper()
/netbsd-src/external/gpl3/gcc/dist/gcc/config/msp430/
H A Dmsp430.cc3238 rtx c, fusage, fsym; in msp430_expand_helper() local
3297 fsym = gen_rtx_SYMBOL_REF (VOIDmode, concat (helper_name, in msp430_expand_helper()
3304 fsym = gen_rtx_SYMBOL_REF (VOIDmode, concat (helper_name, in msp430_expand_helper()
3307 fsym = gen_rtx_SYMBOL_REF (VOIDmode, concat (helper_name, in msp430_expand_helper()
3311 fsym = gen_rtx_SYMBOL_REF (VOIDmode, concat (helper_name, in msp430_expand_helper()
3314 fsym = gen_rtx_SYMBOL_REF (VOIDmode, helper_name); in msp430_expand_helper()
3317 fsym = gen_rtx_SYMBOL_REF (VOIDmode, in msp430_expand_helper()
3320 c = gen_call_value_internal (gen_rtx_REG (arg0mode, 12), fsym, GEN_INT (0)); in msp430_expand_helper()
/netbsd-src/external/gpl3/binutils/dist/bfd/
H A Delflink.c10944 Elf_Internal_Sym fsym; in elf_link_output_extsym() local
10946 memset (&fsym, 0, sizeof (fsym)); in elf_link_output_extsym()
10947 fsym.st_info = ELF_ST_INFO (STB_LOCAL, STT_FILE); in elf_link_output_extsym()
10948 fsym.st_shndx = SHN_ABS; in elf_link_output_extsym()
10949 if (!elf_link_output_symstrtab (eoinfo->flinfo, NULL, &fsym, in elf_link_output_extsym()
/netbsd-src/external/gpl3/binutils.old/dist/bfd/
H A Delflink.c10863 Elf_Internal_Sym fsym; in elf_link_output_extsym() local
10865 memset (&fsym, 0, sizeof (fsym)); in elf_link_output_extsym()
10866 fsym.st_info = ELF_ST_INFO (STB_LOCAL, STT_FILE); in elf_link_output_extsym()
10867 fsym.st_shndx = SHN_ABS; in elf_link_output_extsym()
10868 if (!elf_link_output_symstrtab (eoinfo->flinfo, NULL, &fsym, in elf_link_output_extsym()

12