OpenE2K/binutils-gdb
12
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Added support for OUTPUT_FORMAT keyword

Browse Source 
Fixed problem where cofflike common was being badly sized due to
incorrectly owned common symbols.
This commit is contained in:
Steve Chamberlain 1991-04-17 00:51:31 +00:00
parent 3a39952366
commit 097879bc04
1 changed files with 31 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

44
ld/ldlang.c
View File

@ -103,8 +103,9 @@ extern boolean write_map;
/* LOCALS */
static CONST char *current_target;
static CONST char *output_target;
size_t longest_section_name = 8; size_t longest_section_name = 8;
@ -684,17 +685,24 @@ DEFUN(wild,(s, section, file, target, output),
read in all the files read in all the files
*/ */
static bfd * static bfd *
DEFUN(open_output,(name, target), DEFUN(open_output,(name),
CONST char *CONST name AND CONST char *CONST name)
CONST char *CONST target)
{ {
extern CONST char *output_filename; extern CONST char *output_filename;
bfd * output = bfd_openw(name, target); bfd *output;
if (output_target == (char *)NULL) {
if (current_target != (char *)NULL)
output_target = current_target;
else
output_target = default_target;
}
output = bfd_openw(name, output_target);
output_filename = name; output_filename = name;
if (output == (bfd *)NULL) if (output == (bfd *)NULL)
{ {
if (bfd_error == invalid_target) { if (bfd_error == invalid_target) {
info("%P%F target %s not found\n", target); info("%P%F target %s not found\n", output_target);
} }
info("%P%F problem opening output file %s, %E", name); info("%P%F problem opening output file %s, %E", name);
} }
@ -705,7 +713,7 @@ DEFUN(open_output,(name, target),
} }
static CONST char *current_target;
static void static void
DEFUN(ldlang_open_output,(statement), DEFUN(ldlang_open_output,(statement),
@ -714,7 +722,7 @@ DEFUN(ldlang_open_output,(statement),
switch (statement->header.type) switch (statement->header.type)
{ {
case lang_output_statement_enum: case lang_output_statement_enum:
output_bfd = open_output(statement->output_statement.name,current_target); output_bfd = open_output(statement->output_statement.name);
ldemul_set_output_arch(); ldemul_set_output_arch();
break; break;
@ -1189,7 +1197,9 @@ DEFUN(print_statement,(s, os),
printf("TARGET(%s)\n", s->target_statement.target); printf("TARGET(%s)\n", s->target_statement.target);
break; break;
case lang_output_statement_enum: case lang_output_statement_enum:
printf("OUTPUT(%s)\n", s->output_statement.name); printf("OUTPUT(%s %s)\n",
s->output_statement.name,
output_target);
break; break;
case lang_input_statement_enum: case lang_input_statement_enum:
print_input_statement(&s->input_statement); print_input_statement(&s->input_statement);
@ -1738,7 +1748,8 @@ DEFUN_VOID(lang_common)
} }
com->flags = BSF_EXPORT | BSF_GLOBAL; com->flags = BSF_EXPORT | BSF_GLOBAL ;
if (write_map) if (write_map)
{ {
@ -1749,6 +1760,8 @@ DEFUN_VOID(lang_common)
} }
com->value = com->section->size; com->value = com->section->size;
com->section->size += size; com->section->size += size;
com->the_bfd = output_bfd;
} }
} }
@ -2239,5 +2252,10 @@ DEFUN(lang_statement_append,(list, element, field),
list->tail = field; list->tail = field;
} }
/* Set the output format type */
void
DEFUN(lang_add_output_format,(format),
CONST char *format)
{
output_target = format;
}