| /src/external/gpl3/gcc/dist/libgfortran/runtime/ |
| select_inc.c | 26 #define select_struct SUFFIX(select_struct) macro
37 select_struct; typedef in typeref:struct:__anon14425
39 extern int select_string (select_struct *table, int table_len,
46 * select_struct structures, return the address to jump to. */
49 select_string (select_struct *table, int table_len, const CHARTYPE *selector,
52 select_struct *t;
|
| /src/external/gpl3/gcc.old/dist/libgfortran/runtime/ |
| select_inc.c | 26 #define select_struct SUFFIX(select_struct) macro
37 select_struct; typedef in typeref:struct:__anon16837
39 extern int select_string (select_struct *table, int table_len,
46 * select_struct structures, return the address to jump to. */
49 select_string (select_struct *table, int table_len, const CHARTYPE *selector,
52 select_struct *t;
|
| /src/external/gpl3/gcc/dist/gcc/fortran/ |
| trans-stmt.cc | 3330 static GTY(()) tree select_struct[2]; variable
3521 if (select_struct[k] == NULL)
3524 select_struct[k] = make_node (RECORD_TYPE);
3527 TYPE_NAME (select_struct[k]) = get_identifier ("_jump_struct_char1");
3529 TYPE_NAME (select_struct[k]) = get_identifier ("_jump_struct_char4");
3535 ss_##NAME[k] = gfc_add_field_to_struct (select_struct[k], \
3549 gfc_finish_type (select_struct[k]);
3612 tmp = build_constructor (select_struct[k], node);
3616 type = build_array_type (select_struct[k],
|
| /src/external/gpl3/gcc.old/dist/gcc/fortran/ |
| trans-stmt.cc | 3251 static GTY(()) tree select_struct[2]; variable
3442 if (select_struct[k] == NULL)
3445 select_struct[k] = make_node (RECORD_TYPE);
3448 TYPE_NAME (select_struct[k]) = get_identifier ("_jump_struct_char1");
3450 TYPE_NAME (select_struct[k]) = get_identifier ("_jump_struct_char4");
3456 ss_##NAME[k] = gfc_add_field_to_struct (select_struct[k], \
3470 gfc_finish_type (select_struct[k]);
3533 tmp = build_constructor (select_struct[k], node);
3537 type = build_array_type (select_struct[k],
|
