/* This file is is generated by a shell script. DO NOT EDIT! */
/* AIX emulation code for ppcmacos
- Copyright (C) 1991, 1993, 1995 Free Software Foundation, Inc.
+ Copyright 1991, 1993, 1995, 1996, 1997, 2000, 2001
+ Free Software Foundation, Inc.
Written by Steve Chamberlain <sac@cygnus.com>
AIX support by Ian Lance Taylor <ian@cygnus.com>
#include "bfd.h"
#include "sysdep.h"
#include "libiberty.h"
+#include "safe-ctype.h"
#include "getopt.h"
#include "bfdlink.h"
-#include <ctype.h>
-
#include "ld.h"
#include "ldmain.h"
-#include "ldemul.h"
-#include "ldfile.h"
#include "ldmisc.h"
#include "ldexp.h"
#include "ldlang.h"
#include "ldctor.h"
#include "ldgram.h"
+#include "ldfile.h"
+#include "ldemul.h"
static void gldppcmacos_before_parse PARAMS ((void));
static int gldppcmacos_parse_args PARAMS ((int, char **));
case 'D':
val = strtol (optarg, &end, 0);
if (*end != '\0')
- einfo ("%P: warning: ignoring invalid -D number %s\n", optarg);
+ einfo (_("%P: warning: ignoring invalid -D number %s\n"), optarg);
else if (val != -1)
lang_section_start (".data", exp_intop (val));
break;
val = strtoul (optarg, &end, 0);
if (*end != '\0'
|| (val & (val - 1)) != 0)
- einfo ("%P: warning: ignoring invalid -H number %s\n", optarg);
+ einfo (_("%P: warning: ignoring invalid -H number %s\n"), optarg);
else
file_align = val;
break;
case OPTION_MAXDATA:
val = strtoul (optarg, &end, 0);
if (*end != '\0')
- einfo ("%P: warning: ignoring invalid -bmaxdata number %s\n",
+ einfo (_("%P: warning: ignoring invalid -bmaxdata number %s\n"),
optarg);
else
maxdata = val;
case OPTION_MAXSTACK:
val = strtoul (optarg, &end, 0);
if (*end != '\0')
- einfo ("%P: warning: ignoring invalid -bmaxstack number %s\n",
+ einfo (_("%P: warning: ignoring invalid -bmaxstack number %s\n"),
optarg);
else
maxstack = val;
++optarg;
}
if (*optarg == '\0' || optarg[1] == '\0')
- einfo ("%P: warning: ignoring invalid module type %s\n", optarg);
+ einfo (_("%P: warning: ignoring invalid module type %s\n"), optarg);
else
modtype = (*optarg << 8) | optarg[1];
break;
expression. */
val = strtoul (optarg, &end, 0);
if (*end != '\0')
- einfo ("%P: warning: ignoring invalid -pD number %s\n", optarg);
+ einfo (_("%P: warning: ignoring invalid -pD number %s\n"), optarg);
else
{
etree_type *t;
within the file. */
val = strtoul (optarg, &end, 0);
if (*end != '\0')
- einfo ("%P: warning: ignoring invalid -pT number %s\n", optarg);
+ einfo (_("%P: warning: ignoring invalid -pT number %s\n"), optarg);
else
{
etree_type *t;
size = (p->count + 2) * 4;
if (! bfd_xcoff_link_record_set (output_bfd, &link_info, p->h, size))
- einfo ("%F%P: bfd_xcoff_link_record_set failed: %E\n");
+ einfo (_("%F%P: bfd_xcoff_link_record_set failed: %E\n"));
}
}
h = bfd_link_hash_lookup (link_info.hash, el->name, false, false, false);
if (h == NULL)
- einfo ("%P%F: bfd_link_hash_lookup of export symbol failed: %E\n");
+ einfo (_("%P%F: bfd_link_hash_lookup of export symbol failed: %E\n"));
if (! bfd_xcoff_export_symbol (output_bfd, &link_info, h, el->syscall))
- einfo ("%P%F: bfd_xcoff_export_symbol failed: %E\n");
+ einfo (_("%P%F: bfd_xcoff_export_symbol failed: %E\n"));
}
/* Track down all relocations called for by the linker script (these
textro ? true : false,
unix_ld,
special_sections))
- einfo ("%P%F: failed to set dynamic section sizes: %E\n");
+ einfo (_("%P%F: failed to set dynamic section sizes: %E\n"));
/* Look through the special sections, and put them in the right
place in the link ordering. This is especially magic. */
is = NULL;
os = lang_output_section_find (sec->output_section->name);
if (os == NULL)
- einfo ("%P%F: can't find output section %s\n",
+ einfo (_("%P%F: can't find output section %s\n"),
sec->output_section->name);
- for (pls = &os->children.head; *pls != NULL; pls = &(*pls)->next)
+ for (pls = &os->children.head; *pls != NULL; pls = &(*pls)->header.next)
{
if ((*pls)->header.type == lang_input_section_enum
&& (*pls)->input_section.section == sec)
{
is = (lang_input_section_type *) *pls;
- *pls = (*pls)->next;
+ *pls = (*pls)->header.next;
break;
}
if ((*pls)->header.type == lang_wild_statement_enum)
for (pwls = &(*pls)->wild_statement.children.head;
*pwls != NULL;
- pwls = &(*pwls)->next)
+ pwls = &(*pwls)->header.next)
{
if ((*pwls)->header.type == lang_input_section_enum
&& (*pwls)->input_section.section == sec)
{
is = (lang_input_section_type *) *pwls;
- *pwls = (*pwls)->next;
+ *pwls = (*pwls)->header.next;
break;
}
}
}
if (is == NULL)
- einfo ("%P%F: can't find %s in output section\n",
+ einfo (_("%P%F: can't find %s in output section\n"),
bfd_get_section_name (sec->owner, sec));
/* Now figure out where the section should go. */
++lineno;
s = (char *) obstack_base (o);
- while (isspace ((unsigned char) *s))
+ while (ISSPACE (*s))
++s;
if (*s == '\0'
|| *s == '*'
if (*s == '#' && s[1] == '!')
{
s += 2;
- while (isspace ((unsigned char) *s))
+ while (ISSPACE (*s))
++s;
if (*s == '\0')
{
obstack_free (o, obstack_base (o));
}
else if (*s == '(')
- einfo ("%F%s%d: #! ([member]) is not supported in import files\n",
+ einfo (_("%F%s%d: #! ([member]) is not supported in import files\n"),
filename, lineno);
else
{
keep = true;
imppath = s;
file = NULL;
- while (! isspace ((unsigned char) *s) && *s != '(' && *s != '\0')
+ while (! ISSPACE (*s) && *s != '(' && *s != '\0')
{
if (*s == '/')
file = s + 1;
}
cs = *s;
*s = '\0';
- while (isspace ((unsigned char) cs))
+ while (ISSPACE (cs))
{
++s;
cs = *s;
{
impmember = "";
if (cs != '\0')
- einfo ("%s:%d: warning: syntax error in import file\n",
+ einfo (_("%s:%d: warning: syntax error in import file\n"),
filename, lineno);
}
else
if (*s == ')')
*s = '\0';
else
- einfo ("%s:%d: warning: syntax error in import file\n",
+ einfo (_("%s:%d: warning: syntax error in import file\n"),
filename, lineno);
}
}
syscall = false;
address = (bfd_vma) -1;
- while (! isspace ((unsigned char) *s) && *s != '\0')
+ while (! ISSPACE (*s) && *s != '\0')
++s;
if (*s != '\0')
{
*s++ = '\0';
- while (isspace ((unsigned char) *s))
+ while (ISSPACE (*s))
++s;
se = s;
- while (! isspace ((unsigned char) *se) && *se != '\0')
+ while (! ISSPACE (*se) && *se != '\0')
++se;
if (*se != '\0')
{
*se++ = '\0';
- while (isspace ((unsigned char) *se))
+ while (ISSPACE (*se))
++se;
if (*se != '\0')
- einfo ("%s%d: warning: syntax error in import/export file\n",
+ einfo (_("%s%d: warning: syntax error in import/export file\n"),
filename, lineno);
}
address = strtoul (s, &end, 0);
if (*end != '\0')
- einfo ("%s:%d: warning: syntax error in import/export file\n",
+ einfo (_("%s:%d: warning: syntax error in import/export file\n"),
filename, lineno);
}
}
n = ((struct export_symbol_list *)
xmalloc (sizeof (struct export_symbol_list)));
n->next = export_symbols;
- n->name = buystring (symname);
+ n->name = xstrdup (symname);
n->syscall = syscall;
export_symbols = n;
}
if (! bfd_xcoff_import_symbol (output_bfd, &link_info, h,
address, imppath, impfile,
impmember))
- einfo ("%X%s:%d: failed to import symbol %s: %E\n",
+ einfo (_("%X%s:%d: failed to import symbol %s: %E\n"),
filename, lineno, symname);
}
}
if (obstack_object_size (o) > 0)
{
- einfo ("%s:%d: warning: ignoring unterminated last line\n",
+ einfo (_("%s:%d: warning: ignoring unterminated last line\n"),
filename, lineno);
obstack_free (o, obstack_base (o));
}
rs = &s->reloc_statement;
if (rs->name == NULL)
- einfo ("%F%P: only relocations against symbols are permitted\n");
+ einfo (_("%F%P: only relocations against symbols are permitted\n"));
if (! bfd_xcoff_link_count_reloc (output_bfd, &link_info, rs->name))
- einfo ("%F%P: bfd_xcoff_link_count_reloc failed: %E\n");
+ einfo (_("%F%P: bfd_xcoff_link_count_reloc failed: %E\n"));
}
if (s->header.type == lang_assignment_statement_enum)
{
if (! bfd_xcoff_record_link_assignment (output_bfd, &link_info,
exp->assign.dst))
- einfo ("%P%F: failed to record assignment to %s: %E\n",
+ einfo (_("%P%F: failed to record assignment to %s: %E\n"),
exp->assign.dst);
}
gldppcmacos_find_exp_assignment (exp->assign.src);