dist/gas/ecoff.c

2509 static type_info_t coff_type;
2543       coff_type = type_info_init;
2597       if (coff_type.num_dims >= N_TQ)
2602       coff_type.dimensions[coff_type.num_dims] = dimens[i];
2603       ++coff_type.num_dims;
2670       if (coff_type.num_sizes >= N_TQ)
2675       coff_type.sizes[coff_type.num_sizes] = sizes[i];
2676       ++coff_type.num_sizes;
2701   coff_type.orig_type = BTYPE (val);
2702   coff_type.basic_type = map_coff_types[coff_type.orig_type];
2704   tq_ptr = &coff_type.type_qualifiers[N_TQ];
2707       if (tq_ptr == &coff_type.type_qualifiers[0])
2728   tq_shft = &coff_type.type_qualifiers[0];
2729   while (tq_ptr != &coff_type.type_qualifiers[N_TQ])
2732   if (tq_shft != &coff_type.type_qualifiers[0] && tq_shft[-1] == tq_Proc)
2744   while (tq_shft != &coff_type.type_qualifiers[N_TQ])
2840   coff_type.extra_sizes = coff_tag != (char *) NULL;
2841   if (coff_type.num_dims > 0)
2843       int diff = coff_type.num_dims - coff_type.num_sizes;
2844       int i = coff_type.num_dims - 1;
2847       if (coff_type.num_sizes != 1 || diff < 0)
2856       coff_type.extra_sizes = 0;
2859 	  j = (sizeof (coff_type.sizes) / sizeof (coff_type.sizes[0])) - 1;
2862 	      coff_type.sizes[j] = (((j - diff) >= 0)
2863 				    ? coff_type.sizes[j - diff]
2868 	  coff_type.num_sizes = i + 1;
2870 	    coff_type.sizes[i] = (coff_type.dimensions[i + 1] == 0
2872 				  : (coff_type.sizes[i + 1]
2873 				     / coff_type.dimensions[i + 1]));
2877 	   && coff_type.num_sizes - coff_type.extra_sizes == 1)
2881       coff_type.bitfield = 1;
2892       if (coff_type.basic_type == bt_Struct
2893 	  || coff_type.basic_type == bt_Union
2894 	  || coff_type.basic_type == bt_Enum)
2902 	  coff_type.tag_ptr = get_tag (coff_tag, (localsym_t *) NULL,
2903 				       coff_type.basic_type);
2908 	  last_func_type_info = coff_type;
2913       indx = add_aux_sym_tir (&coff_type,
2927       if (coff_type.num_sizes - coff_type.num_dims - coff_type.extra_sizes
2934 	coff_value = coff_type.sizes[0];
2936       coff_inside_enumeration = (coff_type.orig_type == T_ENUM);
2955       if (! coff_type.bitfield && ! coff_inside_enumeration)
2976 				coff_type.basic_type);