Searched refs:gfc_fci (Results 1 – 1 of 1) sorted by relevance
2483 static format_char_info *gfc_fci; in init_dynamic_gfc_info() local2507 if (!gfc_fci) in init_dynamic_gfc_info()2509 gfc_fci = (format_char_info *) in init_dynamic_gfc_info()2515 const unsigned i = find_char_info_specifier_index (gfc_fci, 'L'); in init_dynamic_gfc_info()2516 gfc_fci[i].types[0].type = &locus; in init_dynamic_gfc_info()2517 gfc_fci[i].pointer_count = 1; in init_dynamic_gfc_info()