1419   struct VMS_DBG_Symbol *spnt1;  in array_suffix()  local
1431   spnt1 = spnt;  in array_suffix()
1433   while (spnt1->advanced == ARRAY)  in array_suffix()
1436       total_size *= (spnt1->index_max - spnt1->index_min + 1);  in array_suffix()
1437       spnt1 = find_symbol (spnt1->type2);  in array_suffix()
1439   total_size = total_size * spnt1->data_size;  in array_suffix()
1440   fpush (spnt1->data_size, 2);	/* element size */  in array_suffix()
1441   if (spnt1->VMS_type == DBG_S_C_ADVANCED_TYPE)  in array_suffix()
1444     fpush (spnt1->VMS_type, 1);	/* element type */  in array_suffix()
1453   spnt1 = spnt;  in array_suffix()
1454   while (spnt1->advanced == ARRAY)  in array_suffix()
1456       fpush (spnt1->index_max - spnt1->index_min + 1, 4);  in array_suffix()
1457       spnt1 = find_symbol (spnt1->type2);  in array_suffix()
1459   spnt1 = spnt;  in array_suffix()
1460   while (spnt1->advanced == ARRAY)  in array_suffix()
1462       fpush (spnt1->index_min, 4);  in array_suffix()
1463       fpush (spnt1->index_max, 4);  in array_suffix()
1464       spnt1 = find_symbol (spnt1->type2);  in array_suffix()
1499   struct VMS_DBG_Symbol *spnt1;  in gen1()  local
1538       spnt1 = find_symbol (spnt->type2);  in gen1()
1540       if (!spnt1)  in gen1()
1543 	i = gen1 (spnt1, 0);  in gen1()
1553       spnt1 = spnt;  in gen1()
1554       while (spnt1->advanced == ARRAY)  in gen1()
1556 	  spnt1 = find_symbol (spnt1->type2);  in gen1()
1557 	  if (!spnt1)  in gen1()
1566       (void) gen1 (spnt1, 1);  in gen1()
1570       switch (spnt1->advanced)  in gen1()
2124   struct VMS_DBG_Symbol *spnt, *spnt1;  in forward_reference()  local
2137 	  spnt1 = find_symbol (spnt->type2);  in forward_reference()
2138 	  if (spnt->advanced == ARRAY && !spnt1)  in forward_reference()
2140 	  spnt = spnt1;  in forward_reference()
2153   struct VMS_DBG_Symbol *spnt1;  in final_forward_reference()  local
2157       spnt1 = find_symbol (spnt->type2);  in final_forward_reference()
2158       if (spnt->advanced == ARRAY && !spnt1)  in final_forward_reference()
2160       spnt = spnt1;  in final_forward_reference()
2193   struct VMS_DBG_Symbol *spnt1;  in VMS_typedef_parse()  local
2418 	  spnt1 = find_symbol (dtype);  in VMS_typedef_parse()
2420 	  if (spnt1 && (spnt1->advanced == BASIC || spnt1->advanced == ENUM)  in VMS_typedef_parse()
2421 	      && ((i3 != spnt1->data_size * 8) || (i2 % 8 != 0)))  in VMS_typedef_parse()
2423 	      if (USE_BITSTRING_DESCRIPTOR (spnt1))  in VMS_typedef_parse()
2428 		  int unsigned_type = (spnt1->VMS_type == DBG_S_C_ULINT  in VMS_typedef_parse()
2429 				    || spnt1->VMS_type == DBG_S_C_USINT  in VMS_typedef_parse()
2430 				    || spnt1->VMS_type == DBG_S_C_UCHAR  in VMS_typedef_parse()
2431 				    || spnt1->VMS_type == DBG_S_C_UQUAD  in VMS_typedef_parse()
2432 				    || spnt1->advanced == ENUM);  in VMS_typedef_parse()
2465 		  bitfield_suffix (spnt1, i3);  in VMS_typedef_parse()
2471 	      if (final_pass && final_forward_reference (spnt1))  in VMS_typedef_parse()
2478 	      Local[i++] = spnt1 ? spnt1->VMS_type : DBG_S_C_ADVANCED_TYPE;  in VMS_typedef_parse()
2487 	      if (!spnt1)  in VMS_typedef_parse()
2488 		generate_suffix (spnt1, dtype);  in VMS_typedef_parse()
2489 	      else if (spnt1->VMS_type == DBG_S_C_ADVANCED_TYPE)  in VMS_typedef_parse()
2490 		generate_suffix (spnt1, 0);  in VMS_typedef_parse()