dist/gas/ecoff.c

2508 static type_info_t coff_type;
2542       coff_type = type_info_init;
2596       if (coff_type.num_dims >= N_TQ)
2601       coff_type.dimensions[coff_type.num_dims] = dimens[i];
2602       ++coff_type.num_dims;
2669       if (coff_type.num_sizes >= N_TQ)
2674       coff_type.sizes[coff_type.num_sizes] = sizes[i];
2675       ++coff_type.num_sizes;
2700   coff_type.orig_type = BTYPE (val);
2701   coff_type.basic_type = map_coff_types[coff_type.orig_type];
2703   tq_ptr = &coff_type.type_qualifiers[N_TQ];
2706       if (tq_ptr == &coff_type.type_qualifiers[0])
2727   tq_shft = &coff_type.type_qualifiers[0];
2728   while (tq_ptr != &coff_type.type_qualifiers[N_TQ])
2731   if (tq_shft != &coff_type.type_qualifiers[0] && tq_shft[-1] == tq_Proc)
2743   while (tq_shft != &coff_type.type_qualifiers[N_TQ])
2839   coff_type.extra_sizes = coff_tag != (char *) NULL;
2840   if (coff_type.num_dims > 0)
2842       int diff = coff_type.num_dims - coff_type.num_sizes;
2843       int i = coff_type.num_dims - 1;
2846       if (coff_type.num_sizes != 1 || diff < 0)
2855       coff_type.extra_sizes = 0;
2858 	  j = (sizeof (coff_type.sizes) / sizeof (coff_type.sizes[0])) - 1;
2861 	      coff_type.sizes[j] = (((j - diff) >= 0)
2862 				    ? coff_type.sizes[j - diff]
2867 	  coff_type.num_sizes = i + 1;
2869 	    coff_type.sizes[i] = (coff_type.dimensions[i + 1] == 0
2871 				  : (coff_type.sizes[i + 1]
2872 				     / coff_type.dimensions[i + 1]));
2876 	   && coff_type.num_sizes - coff_type.extra_sizes == 1)
2880       coff_type.bitfield = 1;
2891       if (coff_type.basic_type == bt_Struct
2892 	  || coff_type.basic_type == bt_Union
2893 	  || coff_type.basic_type == bt_Enum)
2901 	  coff_type.tag_ptr = get_tag (coff_tag, (localsym_t *) NULL,
2902 				       coff_type.basic_type);
2907 	  last_func_type_info = coff_type;
2912       indx = add_aux_sym_tir (&coff_type,
2926       if (coff_type.num_sizes - coff_type.num_dims - coff_type.extra_sizes
2933 	coff_value = coff_type.sizes[0];
2935       coff_inside_enumeration = (coff_type.orig_type == T_ENUM);
2954       if (! coff_type.bitfield && ! coff_inside_enumeration)
2975 				coff_type.basic_type);