2160 	  wanted_type = (fci->types[length_chars_val].type  in check_format_info_main()
2161 			 ? *fci->types[length_chars_val].type : 0);  in check_format_info_main()
2162 	  wanted_type_name = fci->types[length_chars_val].name;  in check_format_info_main()
2163 	  wanted_type_std = fci->types[length_chars_val].std;  in check_format_info_main()
2279 		  wanted_type = *fci->types[length_chars_val].type;  in check_format_info_main()
2280 		  wanted_type_name = fci->types[length_chars_val].name;  in check_format_info_main()
2305 check_format_types (format_wanted_type *types)  in check_format_types()  argument
2307   for (; types != 0; types = types->next)  in check_format_types()
2317       wanted_type = types->wanted_type;  in check_format_types()
2318       arg_num = types->arg_num;  in check_format_types()
2322       gcc_assert (wanted_type != void_type_node || types->pointer_count);  in check_format_types()
2324       if (types->pointer_count == 0)  in check_format_types()
2325 	wanted_type = lang_hooks.types.type_promotes_to (wanted_type);  in check_format_types()
2329       cur_param = types->param;  in check_format_types()
2332           format_type_warning (types, wanted_type, NULL);  in check_format_types()
2346       for (i = 0; i < types->pointer_count; ++i)  in check_format_types()
2355 	      if (types->writing_in_flag  in check_format_types()
2363 	      if (types->reading_from_flag  in check_format_types()
2380 	      if (types->writing_in_flag  in check_format_types()
2405               format_type_warning (types, wanted_type, orig_cur_type);  in check_format_types()
2410       if (i < types->pointer_count)  in check_format_types()
2418       if (types->char_lenient_flag)  in check_format_types()
2450       if (types->scalar_identity_flag  in check_format_types()
2457       format_type_warning (types, wanted_type, orig_cur_type);  in check_format_types()
2679 	  gfc_fci[i].types[0].type = &locus;  in init_dynamic_gfc_info()
2805 	  diag_fci[i].types[0].type = &t;  in init_dynamic_diag_info()
2820 	  tdiag_fci[i].types[0].type = &t;  in init_dynamic_diag_info()
2823 	  tdiag_fci[i].types[0].type = &t;  in init_dynamic_diag_info()
2838 	  cdiag_fci[i].types[0].type = &t;  in init_dynamic_diag_info()
2841 	  cdiag_fci[i].types[0].type = &t;  in init_dynamic_diag_info()
2856 	  cxxdiag_fci[i].types[0].type = &t;  in init_dynamic_diag_info()
2859 	  cxxdiag_fci[i].types[0].type = &t;  in init_dynamic_diag_info()