From 1e3fba9b78f222b927287f0d32b17a7b6f2e6a8f Mon Sep 17 00:00:00 2001 From: Catherine Moore Date: Wed, 3 Jun 1998 14:32:15 +0000 Subject: config/tc-v850.c (md_begin): Don't create special sections by default. --- gas/ChangeLog | 5 +++ gas/config/tc-v850.c | 100 +++++++++++++++++++++------------------------------ 2 files changed, 46 insertions(+), 59 deletions(-) (limited to 'gas') diff --git a/gas/ChangeLog b/gas/ChangeLog index 8f831da..a208844 100644 --- a/gas/ChangeLog +++ b/gas/ChangeLog @@ -1,3 +1,8 @@ +Wed Jun 3 09:16:00 1998 Catherine Moore + + * config/tc-v850.c (md_begin): Don't create special + sections by default. + Tue Jun 2 14:52:56 1998 Jeffrey A Law (law@cygnus.com) * config/tc-mips.c (macro): For div and udiv, close the diff --git a/gas/config/tc-v850.c b/gas/config/tc-v850.c index c363592..4f42884 100644 --- a/gas/config/tc-v850.c +++ b/gas/config/tc-v850.c @@ -286,6 +286,7 @@ v850_comm (area) { if (S_GET_VALUE (symbolP) != size) { + /* xgettext:c-format */ as_warn (_("Length of .comm \"%s\" is already %ld. Not changed to %d."), S_GET_NAME (symbolP), (long) S_GET_VALUE (symbolP), size); } @@ -926,12 +927,12 @@ parse_register_list expression (& exp); if (exp.X_op != O_constant) - return "constant expression or register list expected"; + return _("constant expression or register list expected"); if (regs == type1_regs) { if (exp.X_add_number & 0xFFFFF000) - return "high bits set in register list expression"; + return _("high bits set in register list expression"); for (reg = 20; reg < 32; reg ++) if (exp.X_add_number & (1 << (reg - 20))) @@ -944,7 +945,7 @@ parse_register_list else if (regs == type2_regs) { if (exp.X_add_number & 0xFFFE0000) - return "high bits set in register list expression"; + return _("high bits set in register list expression"); for (reg = 1; reg < 16; reg ++) if (exp.X_add_number & (1 << (reg - 1))) @@ -963,7 +964,7 @@ parse_register_list else /* regs == type3_regs */ { if (exp.X_add_number & 0xFFFE0000) - return "high bits set in register list expression"; + return _("high bits set in register list expression"); for (reg = 16; reg < 32; reg ++) if (exp.X_add_number & (1 << (reg - 16))) @@ -1046,7 +1047,7 @@ parse_register_list /* Get the second register in the range. */ if (! register_name (& exp2)) { - return "second register should follow dash in register list"; + return _("second register should follow dash in register list"); exp2.X_add_number = exp.X_add_number; } @@ -1067,9 +1068,7 @@ parse_register_list } if (i == 32) - { - return "illegal register included in list"; - } + return _("illegal register included in list"); } } else @@ -1115,7 +1114,8 @@ md_parse_option (c, arg) { if (c != 'm') { - fprintf (stderr, "unknown command line option: -%c%s\n", c, arg); + /* xgettext:c-format */ + fprintf (stderr, _("unknown command line option: -%c%s\n"), c, arg); return 0; } @@ -1151,7 +1151,8 @@ md_parse_option (c, arg) /* end-sanitize-v850e */ else { - fprintf (stderr, "unknown command line option: -%c%s\n", c, arg); + /* xgettext:c-format */ + fprintf (stderr, _("unknown command line option: -%c%s\n"), c, arg); return 0; } @@ -1306,6 +1307,7 @@ md_begin () processor_mask = PROCESSOR_V850; } else + /* xgettext:c-format */ as_bad (_("Unable to determine default target processor from string: %s"), TARGET_CPU); @@ -1329,51 +1331,6 @@ md_begin () bfd_set_arch_mach (stdoutput, TARGET_ARCH, machine); - applicable = bfd_applicable_section_flags (stdoutput); - - sdata_section = subseg_new (".sdata", 0); - bfd_set_section_flags (stdoutput, sdata_section, applicable & (SEC_ALLOC | SEC_LOAD | SEC_RELOC | SEC_DATA | SEC_HAS_CONTENTS)); - - tdata_section = subseg_new (".tdata", 0); - bfd_set_section_flags (stdoutput, tdata_section, applicable & (SEC_ALLOC | SEC_LOAD | SEC_RELOC | SEC_DATA | SEC_HAS_CONTENTS)); - - zdata_section = subseg_new (".zdata", 0); - bfd_set_section_flags (stdoutput, zdata_section, applicable & (SEC_ALLOC | SEC_LOAD | SEC_RELOC | SEC_DATA | SEC_HAS_CONTENTS)); - - sbss_section = subseg_new (".sbss", 0); - bfd_set_section_flags (stdoutput, sbss_section, applicable & SEC_ALLOC); - seg_info (sbss_section)->bss = 1; - - tbss_section = subseg_new (".tbss", 0); - bfd_set_section_flags (stdoutput, tbss_section, applicable & SEC_ALLOC); - seg_info (tbss_section)->bss = 1; - - zbss_section = subseg_new (".zbss", 0); - bfd_set_section_flags (stdoutput, zbss_section, applicable & SEC_ALLOC); - seg_info (zbss_section)->bss = 1; - - rosdata_section = subseg_new (".rosdata", 0); - bfd_set_section_flags (stdoutput, rosdata_section, applicable & (SEC_ALLOC | SEC_LOAD | SEC_RELOC | SEC_READONLY)); - - rozdata_section = subseg_new (".rozdata", 0); - bfd_set_section_flags (stdoutput, rozdata_section, applicable & (SEC_ALLOC | SEC_LOAD | SEC_RELOC | SEC_READONLY)); - - scommon_section = subseg_new (".scommon", 0); - bfd_set_section_flags (stdoutput, scommon_section, applicable & (SEC_ALLOC | SEC_LOAD | SEC_RELOC | SEC_DATA | SEC_HAS_CONTENTS | SEC_IS_COMMON)); - - zcommon_section = subseg_new (".zcommon", 0); - bfd_set_section_flags (stdoutput, zcommon_section, applicable & (SEC_ALLOC | SEC_LOAD | SEC_RELOC | SEC_DATA | SEC_HAS_CONTENTS | SEC_IS_COMMON)); - - tcommon_section = subseg_new (".tcommon", 0); - bfd_set_section_flags (stdoutput, tcommon_section, applicable & (SEC_ALLOC | SEC_LOAD | SEC_RELOC | SEC_DATA | SEC_HAS_CONTENTS | SEC_IS_COMMON)); - -/* start-sanitize-v850e */ - call_table_data_section = subseg_new (".call_table_data", 0); - bfd_set_section_flags (stdoutput, call_table_data_section, applicable & (SEC_ALLOC | SEC_LOAD | SEC_RELOC | SEC_DATA | SEC_HAS_CONTENTS)); - - call_table_text_section = subseg_new (".call_table_text", 0); - bfd_set_section_flags (stdoutput, call_table_text_section, applicable & (SEC_ALLOC | SEC_LOAD | SEC_READONLY | SEC_CODE)); -/* end-sanitize-v850e */ } @@ -1572,7 +1529,8 @@ v850_insert_operand (insn, operand, val, file, line, str) if (val < (offsetT) min || val > (offsetT) max) { - const char * err = "operand out of range (%s not between %ld and %ld)"; + /* xgettext:c-format */ + const char * err = _("operand out of range (%s not between %ld and %ld)"); char buf[100]; /* Restore min and mix to expected values for decimal ranges. */ @@ -1644,6 +1602,7 @@ md_assemble (str) opcode = (struct v850_opcode *) hash_find (v850_hash, str); if (opcode == NULL) { + /* xgettext:c-format */ as_bad (_("Unrecognized opcode: `%s'"), str); ignore_rest_of_line (); return; @@ -1774,7 +1733,7 @@ md_assemble (str) } if (fc > MAX_INSN_FIXUPS) - as_fatal ("too many fixups"); + as_fatal (_("too many fixups")); fixups[ fc ].exp = ex; fixups[ fc ].opindex = * opindex_ptr; @@ -1916,13 +1875,24 @@ md_assemble (str) else if (register_name (& ex) && (operand->flags & V850_OPERAND_REG) == 0) { + char c; + int exists = 0; + /* It is possible that an alias has been defined that matches a register name. For example the code may include a ".set ZERO, 0" directive, which matches the register name "zero". Attempt to reparse the field as an expression, and only complain if we cannot generate a constant. */ + + input_line_pointer = str; + + c = get_symbol_end(); + if (symbol_find (str) != NULL) + exists = 1; + + * input_line_pointer = c; input_line_pointer = str; expression (& ex); @@ -1937,6 +1907,14 @@ md_assemble (str) errmsg = _("syntax error: value is missing before the register name"); else errmsg = _("syntax error: register not expected"); + + /* If we created a symbol in the process of this test then + delete it now, so that it will not be output with the real + symbols... */ + if (exists == 0 + && ex.X_op == O_symbol) + symbol_remove (ex.X_add_symbol, + & symbol_rootP, & symbol_lastP); } } else if (system_register_name (& ex, false @@ -1966,7 +1944,8 @@ md_assemble (str) if (((insn & 0x07e0) == 0x0200) && ex.X_op == O_constant - && (ex.X_add_number < (- (1 << (operand->bits - 1))) || ex.X_add_number > ((1 << operand->bits) - 1))) + && (ex.X_add_number < (- (1 << (operand->bits - 1))) + || ex.X_add_number > ((1 << operand->bits) - 1))) errmsg = _("immediate operand is too large"); /* end-sanitize-v850e */ } @@ -1974,7 +1953,8 @@ md_assemble (str) if (errmsg) goto error; -/* fprintf (stderr, " insn: %x, operand %d, op: %d, add_number: %d\n", insn, opindex_ptr - opcode->operands, ex.X_op, ex.X_add_number); */ +/* fprintf (stderr, " insn: %x, operand %d, op: %d, add_number: %d\n", + insn, opindex_ptr - opcode->operands, ex.X_op, ex.X_add_number); */ switch (ex.X_op) { @@ -2056,6 +2036,7 @@ md_assemble (str) ++str; if (*str != '\0') + /* xgettext:c-format */ as_bad (_("junk at end of line: `%s'"), str); input_line_pointer = str; @@ -2203,6 +2184,7 @@ tc_gen_reloc (seg, fixp) if (reloc->howto == (reloc_howto_type *) NULL) { as_bad_where (fixp->fx_file, fixp->fx_line, + /* xgettext:c-format */ _("reloc %d not supported by object file format"), (int)fixp->fx_r_type); -- cgit v1.1