case lang_constructors_statement_enum: fprintf (config.map_file, "constructors:\n"); print_statement (constructor_list.head, os); break; case lang_wild_statement_enum: print_wild_statement (&s->wild_statement, os); break; default: fprintf (config.map_file, "Fail with %d\n", s->header.type); FAIL (); break; case lang_address_statement_enum: fprintf (config.map_file, "address\n"); break; case lang_object_symbols_statement_enum: fprintf (config.map_file, "object symbols\n"); break; case lang_fill_statement_enum: print_fill_statement (&s->fill_statement); break; case lang_data_statement_enum: print_data_statement (&s->data_statement); break; case lang_reloc_statement_enum: print_reloc_statement (&s->reloc_statement); break; case lang_input_section_enum: print_input_section (&s->input_section); break; case lang_padding_statement_enum: print_padding_statement (&s->padding_statement); break; case lang_output_section_statement_enum: print_output_section_statement (&s->output_section_statement); break; case lang_assignment_statement_enum: print_assignment (&s->assignment_statement, os); break; case lang_target_statement_enum: fprintf (config.map_file, "TARGET(%s)\n", s->target_statement.target); break; case lang_output_statement_enum: fprintf (config.map_file, "OUTPUT(%s %s)\n", s->output_statement.name, output_target ? output_target : ""); break; case lang_input_statement_enum: print_input_statement (&s->input_statement); break; case lang_group_statement_enum: print_group (&s->group_statement, os); break; case lang_afile_asection_pair_statement_enum: FAIL (); break;
minfo (" CONSTRUCTORS\n"); print_statement_list (constructor_list.head, os);
print_statement (s, os)     lang_statement_union_type * s;     lang_output_section_statement_type * os;{  while (s)    {      switch (s->header.type)	{	  case lang_constructors_statement_enum:	  fprintf (config.map_file, "constructors:\n");	  print_statement (constructor_list.head, os);	  break;	case lang_wild_statement_enum:	  print_wild_statement (&s->wild_statement, os);	  break;	default:	  fprintf (config.map_file, "Fail with %d\n", s->header.type);	  FAIL ();	  break;	case lang_address_statement_enum:	  fprintf (config.map_file, "address\n");	  break;	case lang_object_symbols_statement_enum:	  fprintf (config.map_file, "object symbols\n");	  break;	case lang_fill_statement_enum:	  print_fill_statement (&s->fill_statement);	  break;	case lang_data_statement_enum:	  print_data_statement (&s->data_statement);	  break;	case lang_reloc_statement_enum:	  print_reloc_statement (&s->reloc_statement);	  break;	case lang_input_section_enum:	  print_input_section (&s->input_section);	  break;	case lang_padding_statement_enum:	  print_padding_statement (&s->padding_statement);	  break;	case lang_output_section_statement_enum:	  print_output_section_statement (&s->output_section_statement);	  break;	case lang_assignment_statement_enum:	  print_assignment (&s->assignment_statement,			    os);	  break;	case lang_target_statement_enum:	  fprintf (config.map_file, "TARGET(%s)\n", s->target_statement.target);	  break;	case lang_output_statement_enum:	  fprintf (config.map_file, "OUTPUT(%s %s)\n",		   s->output_statement.name,		   output_target ? output_target : "");	  break;	case lang_input_statement_enum:	  print_input_statement (&s->input_statement);	  break;	case lang_group_statement_enum:	  print_group (&s->group_statement, os);	  break;	case lang_afile_asection_pair_statement_enum:	  FAIL ();	  break;	}      s = s->next;    }}