* config/tc-h8300.c (get_specific): Remove some #if 0 code.

        (build_bytes): Remove all ABSMOV related code; it's unnecessary.
ABSMOV is gone... Cleaning up.  hmse.

diff --git a/gas/ChangeLog b/gas/ChangeLog
index 6982da9b43111d67ba6c45c18f7b18d47843f05f..65396449b3bf38ccf58842b3b6b3521e850fa139 100644 (file)
--- a/gas/ChangeLog
+++ b/gas/ChangeLog
@@ -1,3 +1,8 @@
+Fri Apr  5 17:01:35 1996  Jeffrey A Law  (law@cygnus.com)
+
+       * config/tc-h8300.c (get_specific): Remove some #if 0 code.
+       (build_bytes): Remove all ABSMOV related code; it's unnecessary.
+
 Fri Apr  5 15:13:10 1996  Andreas Schwab  <schwab@issan.informatik.uni-dortmund.de>
 
        * config/atof-ieee.c: Fix handling of denormalized extended

diff --git a/gas/config/tc-h8300.c b/gas/config/tc-h8300.c
index fe101ccf9c835d2336e7d93fcdc47cfc8e331362..700d3889d08837baaa57fa1279fa015f629e88e5 100644 (file)
--- a/gas/config/tc-h8300.c
+++ b/gas/config/tc-h8300.c
@@ -15,7 +15,7 @@
 
    You should have received a copy of the GNU General Public License
    along with GAS; see the file COPYING.  If not, write to
-   the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.  */
+   the Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
 
 
 /*
@@ -100,10 +100,6 @@ const char EXP_CHARS[] = "eE";
 /* or    0d1.2345e12 */
 const char FLT_CHARS[] = "rRsSfFdDxXpP";
 
-
-const relax_typeS md_relax_table[1];
-
-
 static struct hash_control *opcode_hash_control;       /* Opcode mnemonics */
 
 /*
@@ -116,7 +112,6 @@ void
 md_begin ()
 {
   struct h8_opcode *opcode;
-  const struct reg_entry *reg;
   char prev_buffer[100];
   int idx = 0;
 
@@ -164,6 +159,7 @@ md_begin ()
        opcode->length++;
     }
 
+  linkrelax = 1;
 }
 
 
@@ -293,15 +289,16 @@ skip_colonthing (ptr, exp, mode)
   if (*ptr == ':')
     {
       ptr++;
+      *mode &= ~SIZE;
       if (*ptr == '8')
        {
          ptr++;
          /* ff fill any 8 bit quantity */
         /* exp->X_add_number -= 0x100;*/
+         *mode |= L_8;
        }
       else
        {
-         *mode &= ~SIZE;
          if (*ptr == '2')
            {
              *mode |= L_24;
@@ -371,13 +368,12 @@ get_operand (ptr, op, dst, direction)
      char **ptr;
      struct h8_op *op;
      unsigned int dst;
-
+     int direction;
 {
   char *src = *ptr;
   op_type mode;
   unsigned int num;
   unsigned int len;
-  unsigned int size;
 
   op->mode = E;
 
@@ -630,7 +626,7 @@ get_specific (opcode, operands)
          int x = operands[i].mode;
 
          if ((op & (DISP | REG)) == (DISP | REG)
-             && ((x & DISP | REG) == (DISP | REG)))
+             && ((x & (DISP | REG)) == (DISP | REG)))
            {
              dispreg = operands[i].reg;
            }
@@ -695,13 +691,6 @@ get_specific (opcode, operands)
                  && ((op & SIZE) != (x & SIZE)))
                found = 0;
            }
-#if 0
-         else if ((op & ABSMOV) && (x & ABS))
-           {
-             /* An absmov is only
-             /* Ok */
-           }
-#endif
          else if ((op & MODE) != (x & MODE))
            {
              found = 0;
@@ -735,13 +724,15 @@ check_operand (operand, width, string)
          if (width == 255 
              && (operand->exp.X_add_number & 0xff00) == 0xff00)
            {
-             /* Just ignore this one - which happens when trying to 
-             fit a 16 bit address truncated into an 8 bit address of something like bset  */
+             /* Just ignore this one - which happens when trying to
+                fit a 16 bit address truncated into an 8 bit address
+                of something like bset.  */
            }
          else 
            {
-         as_warn ("operand %s0x%x out of range.", string, operand->exp.X_add_number);
-       }
+             as_warn ("operand %s0x%lx out of range.", string,
+                      (unsigned long) operand->exp.X_add_number);
+           }
        }
     }
 
@@ -849,11 +840,8 @@ build_bytes (this_try, operand)
   unsigned int i;
 
   char *output = frag_more (this_try->length);
-  char *output_ptr = output;
   op_type *nibble_ptr = this_try->data.nib;
-  char part;
   op_type c;
-  char high;
   unsigned int nibble_count = 0;
   int absat;
   int immat;
@@ -863,7 +851,8 @@ build_bytes (this_try, operand)
 
   if (!(this_try->inbase || Hmode))
     {
-      as_warn ("Opcode `%s' only available on H8/300-H", this_try->name);
+      as_warn ("Opcode `%s' only available in this mode on H8/300-H",
+              this_try->name);
     }
 
   while (*nibble_ptr != E)
@@ -888,14 +877,6 @@ build_bytes (this_try, operand)
            {
              nib = dispreg;
            }
-
-         else if (c & ABSMOV)
-           {
-             operand[d].mode &= ~ABS;
-             operand[d].mode |= ABSMOV;
-             immat = nibble_count / 2;
-             nib = 0;
-           }
          else if (c &  ABS )
            {
              operand[d].mode = c;
@@ -989,8 +970,8 @@ build_bytes (this_try, operand)
 
          if (operand[i].exp.X_add_number & 1)
            {
-             as_warn ("branch operand has odd offset (%x)\n",
-                      operand->exp.X_add_number);
+             as_warn ("branch operand has odd offset (%lx)\n",
+                      (unsigned long) operand->exp.X_add_number);
            }
 
          operand[i].exp.X_add_number =
@@ -1011,15 +992,8 @@ build_bytes (this_try, operand)
                       1,
                       &operand[i].exp,
                       0,
-                      R_RELBYTE);
-       }
-
-      else if (x & ABSMOV)
-       {
-         /* This mov is either absolute long or thru a memory loc */
-         do_a_fix_imm (output - frag_now->fr_literal + immat, operand + i, 1);
+                      R_MEM_INDIRECT);
        }
-
       else if (x & ABSJMP)
        {
          /* This jmp may be a jump or a branch */
@@ -1027,8 +1001,8 @@ build_bytes (this_try, operand)
          check_operand (operand + i, Hmode ? 0xffffff : 0xffff, "@");
          if (operand[i].exp.X_add_number & 1)
            {
-             as_warn ("branch operand has odd offset (%x)\n",
-                      operand->exp.X_add_number);
+             as_warn ("branch operand has odd offset (%lx)\n",
+                      (unsigned long) operand->exp.X_add_number);
            }
          if (!Hmode)
            operand[i].exp.X_add_number = (short) operand[i].exp.X_add_number;
@@ -1053,8 +1027,6 @@ clever_message (opcode, operand)
      struct h8_opcode *opcode;
      struct h8_op *operand;
 {
-  struct h8_opcode *scan = opcode;
-
   /* Find out if there was more than one possible opccode */
 
   if ((opcode + 1)->idx != opcode->idx)
@@ -1128,7 +1100,6 @@ md_assemble (str)
 {
   char *op_start;
   char *op_end;
-  unsigned int i;
   struct h8_op operand[2];
   struct h8_opcode *opcode;
   struct h8_opcode *prev_opcode;
@@ -1340,10 +1311,10 @@ md_create_long_jump (ptr, from_addr, to_addr, frag, to_symbol)
 }
 
 void
-md_convert_frag (headers, fragP)
+md_convert_frag (headers, seg, fragP)
      object_headers *headers;
+     segT seg;
      fragS *fragP;
-
 {
   printf ("call to md_convert_frag \n");
   abort ();
@@ -1382,16 +1353,9 @@ md_apply_fix (fixP, val)
       break;
     default:
       abort ();
-
     }
 }
 
-void
-md_operand (expressionP)
-     expressionS * expressionP;
-{
-}
-
 int md_long_jump_size;
 
 int
@@ -1411,20 +1375,7 @@ md_number_to_chars (ptr, use, nbytes)
      valueT use;
      int nbytes;
 {
-  switch (nbytes)
-    {
-    case 4:
-      *ptr++ = (use >> 24) & 0xff;
-    case 3:
-      *ptr++ = (use >> 16) & 0xff;
-    case 2:
-      *ptr++ = (use >> 8) & 0xff;
-    case 1:
-      *ptr++ = (use >> 0) & 0xff;
-      break;
-    default:
-      abort ();
-    }
+  number_to_chars_bigendian (ptr, use, nbytes);
 }
 long
 md_pcrel_from (fixP)
@@ -1447,13 +1398,15 @@ tc_reloc_mangle (fix_ptr, intr, base)
 
   /* If this relocation is attached to a symbol then it's ok
      to output it */
-  if (fix_ptr->fx_r_type == RELOC_32)
+  if (fix_ptr->fx_r_type == TC_CONS_RELOC)
     {
       /* cons likes to create reloc32's whatever the size of the reloc..
        */
       switch (fix_ptr->fx_size)
        {
-
+       case 4:
+         intr->r_type = R_RELLONG;
+         break;
        case 2:
          intr->r_type = R_RELWORD;
          break;
@@ -1482,9 +1435,4 @@ tc_reloc_mangle (fix_ptr, intr, base)
 
 }
 
-tc_coff_sizemachdep ()
-{
-  abort ();
-}
-
 /* end of tc-h8300.c */