| /netbsd-src/external/gpl3/gcc.old/dist/gcc/fortran/ |
| H A D | gfortran.h | 87 # define GFC_PREFIX(x) "_F." x macro
89 # define GFC_PREFIX(x) "_F$" x macro
91 # define GFC_PREFIX(x) "_F_" x macro
|
| H A D | intrinsic.c | 3034 add_sym_2 (GFC_PREFIX ("stride"), GFC_ISYM_STRIDE, CLASS_INQUIRY, ACTUAL_NO, in add_functions()
3412 add_sym_1 (GFC_PREFIX ("caf_get"), GFC_ISYM_CAF_GET, CLASS_IMPURE, ACTUAL_NO, in add_functions()
3780 add_sym_2s (GFC_PREFIX ("caf_send"), GFC_ISYM_CAF_SEND, CLASS_IMPURE, in add_subroutines()
|
| 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()
|
| H A D | resolve.c | 10155 GFC_PREFIX ("lock_type")); in resolve_critical()
10160 if (gfc_get_sym_tree (GFC_PREFIX ("lock_type"), gfc_current_ns, &symtree, in resolve_critical()
10170 sprintf(name, GFC_PREFIX ("lock_var") "%d",serial++); in resolve_critical()
11096 gfc_get_sym_tree (GFC_PREFIX ("caf_send"), ns, &code->symtree, true); in resolve_ordinary_assign()
11176 sprintf (name, GFC_PREFIX("DA%d"), serial++); in get_temp_from_expr()
|
| H A D | expr.c | 6107 const char *mangled_name = gfc_get_string (GFC_PREFIX ("%s"), name); in gfc_build_intrinsic_call()
|
| /netbsd-src/external/gpl3/gcc/dist/gcc/fortran/ |
| H A D | gfortran.h | 87 # define GFC_PREFIX(x) "_F." x macro
89 # define GFC_PREFIX(x) "_F$" x macro
91 # define GFC_PREFIX(x) "_F_" x macro
|
| H A D | intrinsic.cc | 3060 add_sym_2 (GFC_PREFIX ("stride"), GFC_ISYM_STRIDE, CLASS_INQUIRY, ACTUAL_NO, in add_functions()
3438 add_sym_1 (GFC_PREFIX ("caf_get"), GFC_ISYM_CAF_GET, CLASS_IMPURE, ACTUAL_NO, in add_functions()
3806 add_sym_2s (GFC_PREFIX ("caf_send"), GFC_ISYM_CAF_SEND, CLASS_IMPURE, in add_subroutines()
|
| 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()
|
| H A D | ChangeLog-2012 | 198 * gfortran.h (GFC_PREFIX): Define.
200 will be TREE_STATIC, use GFC_PREFIX to mangle the names. Handle
|
| H A D | resolve.cc | 10294 GFC_PREFIX ("lock_type")); in resolve_critical()
10299 if (gfc_get_sym_tree (GFC_PREFIX ("lock_type"), gfc_current_ns, &symtree, in resolve_critical()
10309 sprintf(name, GFC_PREFIX ("lock_var") "%d",serial++); in resolve_critical()
11253 gfc_get_sym_tree (GFC_PREFIX ("caf_send"), ns, &code->symtree, true); in resolve_ordinary_assign()
11333 sprintf (name, GFC_PREFIX("DA%d"), serial++); in get_temp_from_expr()
|
| H A D | ChangeLog-2013 | 2032 function GFC_PREFIX ("stride").
|
| H A D | expr.cc | 6161 const char *mangled_name = gfc_get_string (GFC_PREFIX ("%s"), name); in gfc_build_intrinsic_call()
|