/netbsd-src/external/gpl3/gcc/dist/gcc/fortran/ |
H A D | iresolve.cc | 48 gfc_get_string (const char *format, ...) in gfc_get_string() function 164 f->value.function.name = gfc_get_string ("%s", name); in resolve_bound() 196 = gfc_get_string (PREFIX ("%s%s_%c%d"), prefix, name, in resolve_transformational() 213 = gfc_get_string ("__abs_%c%d", gfc_type_letter (a->ts.type), in gfc_resolve_abs() 236 f->value.function.name = gfc_get_string ("__adjustl_s%d", f->ts.kind); in gfc_resolve_adjustl() 248 f->value.function.name = gfc_get_string ("__adjustr_s%d", f->ts.kind); in gfc_resolve_adjustr() 263 = gfc_get_string ("__%schar_%d_%c%d", is_achar ? "a" : "", f->ts.kind, in gfc_resolve_char_achar() 281 = gfc_get_string ("__acos_%c%d", gfc_type_letter (x->ts.type), in gfc_resolve_acos() 291 = gfc_get_string ("__acosh_%c%d", gfc_type_letter (x->ts.type), in gfc_resolve_acosh() 302 = gfc_get_string ("__aimag_%c%d", gfc_type_letter (x->ts.type), in gfc_resolve_aimag() [all …]
|
H A D | module.cc | 432 return gfc_get_string ("%c%s", (char) TOLOWER ((unsigned char) name[0]), in gfc_dt_lower_string() 434 return gfc_get_string ("%s", name); in gfc_dt_lower_string() 447 return gfc_get_string ("%c%s", (char) TOUPPER ((unsigned char) name[0]), in gfc_dt_upper_string() 449 return gfc_get_string ("%s", name); in gfc_dt_upper_string() 602 use_list->module_name = gfc_get_string ("%s", name); in gfc_match_use() 799 = gfc_get_string ("%s.%s", module_list->module_name, name); in gfc_match_submodule() 801 = gfc_get_string ("%s@%s", module_list->module_name, name); in gfc_match_submodule() 806 use_list->module_name = gfc_get_string ("%s", name); in gfc_match_submodule() 824 submodule_name = gfc_get_string ("%s@%s", module_list->module_name, in gfc_match_submodule() 827 gfc_new_block->name = gfc_get_string ("%s.%s", in gfc_match_submodule() [all …]
|
H A D | ChangeLog-2017 | 2087 (gfc_match_decl_type_spec): Use gfc_get_string ("%s", x) instead of 2088 gfc_get_string (x). 2092 * trans-stmt.c (gfc_trans_allocate): Use gfc_get_string ("%s", x) 2093 instead of gfc_get_string (x). 2107 * iresolve.c (gfc_get_string): Optimize format "%s" case. 2108 (resolve_bound): Use gfc_get_string ("%s", x) instead of 2109 gfc_get_string (x). 2118 * symbol.c (gfc_add_component): Use gfc_get_string ("%s", x) instead 2119 of gfc_get_string (x). 2124 (gfc_match_omp_declare_reduction): Use gfc_get_string ("%s", x) [all …]
|
H A D | symbol.cc | 2295 p->name = gfc_get_string ("%s", name); in gfc_add_component() 2942 st->name = gfc_get_string ("%s", name); in gfc_new_symtree() 2968 st.name = gfc_get_string ("%s", p); in gfc_delete_symtree() 3030 uop->name = gfc_get_string ("%s", name); in gfc_get_uop() 3150 p->name = gfc_get_string ("%s", name); in gfc_new_symbol() 4371 s->name = gfc_get_string ("%s", name); in gfc_get_gsymbol() 4868 tmp_sym->module = gfc_get_string ("%s", mod_name); in generate_isocbinding_symbol() 4963 dt_sym->name = gfc_get_string (s == ISOCBINDING_PTR in generate_isocbinding_symbol() 4984 dt_sym->module = gfc_get_string ("%s", mod_name); in generate_isocbinding_symbol()
|
H A D | ChangeLog-2005 | 2759 gfc_get_string. 3290 (gfc_intrinsic_symbol): Use 'gfc_get_string' instead of 'strcpy' to 3303 (add_sym): Use 'gfc_get_string' instead of 'strcpy'. 3305 (make_alias): Use 'gfc_get_string' instead of 'strcpy'. 3312 (find_true_name): Initialize string fields with gfc_get_string. 3320 (load_needed, read_module): Use 'gfc_get_string' instead of 'strcpy'. 3330 case of NULL pointer. Use 'gfc_get_string' instead of 'strcpy'. 3332 gfc_get_uop, gfc_new_symbol): Use 'gfc_get_string' instead of
|
H A D | trans-stmt.cc | 730 const char *name = gfc_get_string (PREFIX ("exit_i%d"), 4); in gfc_trans_fail_image() 771 const char *name = gfc_get_string (PREFIX ("exit_i%d"), 4); in gfc_trans_form_team() 801 const char *name = gfc_get_string (PREFIX ("exit_i%d"), 4); in gfc_trans_change_team() 821 const char *name = gfc_get_string (PREFIX ("exit_i%d"), 4); in gfc_trans_end_team() 852 const char *name = gfc_get_string (PREFIX ("exit_i%d"), 4); in gfc_trans_sync_team() 6590 = gfc_get_string ("%s", IDENTIFIER_POINTER (DECL_NAME (expr3))); in gfc_trans_allocate()
|
H A D | ChangeLog-2020 | 1326 * iresolve.c (gfc_get_string): Enlarge internal buffer used in 1377 * iresolve.c (gfc_get_string): Enlarge static buffer size. 1591 * iresolve.c (gfc_get_string): Enlarge temporary for 2196 * iresolve.c (gfc_get_string): Likewise.
|
H A D | trans-decl.cc | 1008 = get_identifier (gfc_get_string (GFC_PREFIX ("caf_token%s"), in gfc_build_qualified_array() 1368 name = gfc_get_string (GFC_PREFIX ("%s_MOD_%s"), sym->module, in gfc_create_string_length() 1371 name = gfc_get_string (GFC_PREFIX ("%s"), sym->name); in gfc_create_string_length() 1374 name = gfc_get_string (".__%s_MOD_%s", sym->module, sym->name); in gfc_create_string_length() 1376 name = gfc_get_string (".%s", sym->name); in gfc_create_string_length() 5105 entry->name = gfc_get_string ("%s", name); in gfc_find_module()
|
H A D | gfortran.h | 3261 const char * gfc_get_string (const char *, ...) ATTRIBUTE_PRINTF_1; 3503 #define gfc_intrinsic_symbol(SYM) SYM->module = gfc_get_string ("(intrinsic)")
|
H A D | intrinsic.cc | 190 return gfc_get_string ("__convert_%c%d_%c%d", in conv_name() 401 next_sym->name = gfc_get_string ("%s", name); in add_sym() 405 next_sym->lib_name = gfc_get_string ("%s", buf); in add_sym() 994 const char *p = gfc_get_string ("%s", name); in find_sym() 1264 next_sym->name = gfc_get_string ("%s", name); in make_alias()
|
H A D | check.cc | 3891 ap->next->next->next->next->name = gfc_get_string ("back"); in gfc_check_minloc_maxloc() 3973 ap->next->next->next->next->next->name = gfc_get_string ("back"); in gfc_check_findloc()
|
H A D | decl.cc | 4651 dt_sym->name = gfc_get_string ("%s", sym->name); in gfc_match_decl_type_spec() 10650 sym->name = gfc_get_string ("%s", gensym->name); in gfc_match_derived_decl() 11113 ba->pass_arg = gfc_get_string ("%s", arg); in match_binding_attributes()
|
H A D | ChangeLog-2004 | 46 (gfc_get_string): Update prototype. 49 (gfc_get_string): Use vsnprintf, get_identifier.
|
H A D | primary.cc | 1754 actual->name = gfc_get_string ("%s", name); in match_keyword_arg()
|
H A D | ChangeLog-2013 | 1631 * iresolve.c (resolve_bound): Use gfc_get_string instead of xstrdup.
|
H A D | frontend-passes.cc | 2293 fn->value.function.name = gfc_get_string ("%s", name); in optimize_minmaxloc()
|
/netbsd-src/external/gpl3/gcc.old/dist/gcc/fortran/ |
H A D | iresolve.c | 48 gfc_get_string (const char *format, ...) in gfc_get_string() function 164 f->value.function.name = gfc_get_string ("%s", name); in resolve_bound() 196 = gfc_get_string (PREFIX ("%s%s_%c%d"), prefix, name, in resolve_transformational() 212 = gfc_get_string ("__abs_%c%d", gfc_type_letter (a->ts.type), a->ts.kind); in gfc_resolve_abs() 234 f->value.function.name = gfc_get_string ("__adjustl_s%d", f->ts.kind); in gfc_resolve_adjustl() 246 f->value.function.name = gfc_get_string ("__adjustr_s%d", f->ts.kind); in gfc_resolve_adjustr() 261 = gfc_get_string ("__%schar_%d_%c%d", is_achar ? "a" : "", f->ts.kind, in gfc_resolve_char_achar() 278 = gfc_get_string ("__acos_%c%d", gfc_type_letter (x->ts.type), x->ts.kind); in gfc_resolve_acos() 287 = gfc_get_string ("__acosh_%c%d", gfc_type_letter (x->ts.type), in gfc_resolve_acosh() 298 = gfc_get_string ("__aimag_%c%d", gfc_type_letter (x->ts.type), in gfc_resolve_aimag() [all …]
|
H A D | module.c | 427 return gfc_get_string ("%c%s", (char) TOLOWER ((unsigned char) name[0]), in gfc_dt_lower_string() 429 return gfc_get_string ("%s", name); in gfc_dt_lower_string() 442 return gfc_get_string ("%c%s", (char) TOUPPER ((unsigned char) name[0]), in gfc_dt_upper_string() 444 return gfc_get_string ("%s", name); in gfc_dt_upper_string() 597 use_list->module_name = gfc_get_string ("%s", name); in gfc_match_use() 794 = gfc_get_string ("%s.%s", module_list->module_name, name); in gfc_match_submodule() 796 = gfc_get_string ("%s@%s", module_list->module_name, name); in gfc_match_submodule() 801 use_list->module_name = gfc_get_string ("%s", name); in gfc_match_submodule() 819 submodule_name = gfc_get_string ("%s@%s", module_list->module_name, in gfc_match_submodule() 822 gfc_new_block->name = gfc_get_string ("%s.%s", in gfc_match_submodule() [all …]
|
H A D | symbol.c | 2288 p->name = gfc_get_string ("%s", name); in gfc_add_component() 2935 st->name = gfc_get_string ("%s", name); in gfc_new_symtree() 2961 st.name = gfc_get_string ("%s", p); in gfc_delete_symtree() 3023 uop->name = gfc_get_string ("%s", name); in gfc_get_uop() 3142 p->name = gfc_get_string ("%s", name); in gfc_new_symbol() 4351 s->name = gfc_get_string ("%s", name); in gfc_get_gsymbol() 4824 tmp_sym->module = gfc_get_string ("%s", mod_name); in generate_isocbinding_symbol() 4919 dt_sym->name = gfc_get_string (s == ISOCBINDING_PTR in generate_isocbinding_symbol() 4940 dt_sym->module = gfc_get_string ("%s", mod_name); in generate_isocbinding_symbol()
|
H A D | trans-decl.c | 1003 = get_identifier (gfc_get_string (GFC_PREFIX ("caf_token%s"), in gfc_build_qualified_array() 1362 name = gfc_get_string (GFC_PREFIX ("%s_MOD_%s"), sym->module, in gfc_create_string_length() 1365 name = gfc_get_string (GFC_PREFIX ("%s"), sym->name); in gfc_create_string_length() 1368 name = gfc_get_string (".__%s_MOD_%s", sym->module, sym->name); in gfc_create_string_length() 1370 name = gfc_get_string (".%s", sym->name); in gfc_create_string_length() 5177 entry->name = gfc_get_string ("%s", name); in gfc_find_module()
|
H A D | gfortran.h | 2976 const char * gfc_get_string (const char *, ...) ATTRIBUTE_PRINTF_1; 3223 #define gfc_intrinsic_symbol(SYM) SYM->module = gfc_get_string ("(intrinsic)")
|
H A D | trans-stmt.c | 696 const char *name = gfc_get_string (PREFIX ("exit_i%d"), 4); in gfc_trans_fail_image() 737 const char *name = gfc_get_string (PREFIX ("exit_i%d"), 4); in gfc_trans_form_team() 767 const char *name = gfc_get_string (PREFIX ("exit_i%d"), 4); in gfc_trans_change_team() 787 const char *name = gfc_get_string (PREFIX ("exit_i%d"), 4); in gfc_trans_end_team() 818 const char *name = gfc_get_string (PREFIX ("exit_i%d"), 4); in gfc_trans_sync_team() 6554 = gfc_get_string ("%s", IDENTIFIER_POINTER (DECL_NAME (expr3))); in gfc_trans_allocate()
|
H A D | intrinsic.c | 132 return gfc_get_string ("__convert_%c%d_%c%d", in conv_name() 342 next_sym->name = gfc_get_string ("%s", name); in add_sym() 346 next_sym->lib_name = gfc_get_string ("%s", buf); in add_sym() 968 const char *p = gfc_get_string ("%s", name); in find_sym() 1238 next_sym->name = gfc_get_string ("%s", name); in make_alias()
|
H A D | decl.c | 4546 dt_sym->name = gfc_get_string ("%s", sym->name); in gfc_match_decl_type_spec() 10560 sym->name = gfc_get_string ("%s", gensym->name); in gfc_match_derived_decl() 11023 ba->pass_arg = gfc_get_string ("%s", arg); in match_binding_attributes()
|
H A D | primary.c | 1775 actual->name = gfc_get_string ("%s", name); in match_keyword_arg()
|