2589   wanted_type = (fci->types[len_modifier.val].type  in handle_conversions()
2590 		 ? *fci->types[len_modifier.val].type : 0);  in handle_conversions()
2591   wanted_type_name = fci->types[len_modifier.val].name;  in handle_conversions()
2592   wanted_type_std = fci->types[len_modifier.val].std;  in handle_conversions()
2738 	      wanted_type = *fci->types[len_modifier.val].type;  in check_argument_type()
2739 	      wanted_type_name = fci->types[len_modifier.val].name;  in check_argument_type()
3050 		    format_wanted_type *types, const format_kind_info *fki,  in check_format_types()  argument
3055   for (; types != 0; types = types->next)  in check_format_types()
3065       wanted_type = types->wanted_type;  in check_format_types()
3066       arg_num = types->arg_num;  in check_format_types()
3070       gcc_assert (wanted_type != void_type_node || types->pointer_count);  in check_format_types()
3072       if (types->pointer_count == 0)  in check_format_types()
3073 	wanted_type = lang_hooks.types.type_promotes_to (wanted_type);  in check_format_types()
3077       cur_param = types->param;  in check_format_types()
3080 	  format_type_warning (fmt_loc, UNKNOWN_LOCATION, types, wanted_type,  in check_format_types()
3098 	  gcc_assert (types->arg_num > 0);  in check_format_types()
3099 	  param_loc = (*arglocs)[types->arg_num - 1];  in check_format_types()
3106       for (i = 0; i < types->pointer_count; ++i)  in check_format_types()
3115 	      if (types->writing_in_flag  in check_format_types()
3123 	      if (types->reading_from_flag  in check_format_types()
3140 	      if (types->writing_in_flag  in check_format_types()
3167 				   types, wanted_type, orig_cur_type, fki,  in check_format_types()
3173       if (i < types->pointer_count)  in check_format_types()
3180       if (types->char_lenient_flag)  in check_format_types()
3220 	      && cur_type == lang_hooks.types.type_promotes_to (t))  in check_format_types()
3229       if (types->scalar_identity_flag  in check_format_types()
3236       format_type_warning (fmt_loc, param_loc, types,  in check_format_types()
3368 	  const format_type_detail *ftd = &spec->types[i];  in get_format_for_type_1()
3813 	  gfc_fci[i].types[0].type = &locus;  in init_dynamic_gfc_info()