int reloc_offset; /* Offset of reloc within insn */
int reloc;
-
-
}
-
the_insn;
static void machine_ip PARAMS ((char *str));
#endif
const pseudo_typeS
- md_pseudo_table[] =
+md_pseudo_table[] =
{
{"align", s_align_bytes, 4},
{"block", s_space, 0},
{"space", s_ignore, 0}, /* Listing control */
{"sect", s_ignore, 0}, /* Creation of coff sections */
#ifndef OBJ_COFF
-/* We can do this right with coff */
+ /* We can do this right with coff. */
{"use", s_use, 0},
#endif
{"word", cons, 4},
const char FLT_CHARS[] = "rRsSfFdDxXpP";
/* Also be aware that MAXIMUM_NUMBER_OF_CHARS_FOR_FLOAT may have to be
- changed in read.c . Ideally it shouldn't have to know about it at all,
- but nothing is ideal around here.
- */
+ changed in read.c. Ideally it shouldn't have to know about it at
+ all, but nothing is ideal around here. */
static unsigned char octal[256];
#define isoctal(c) octal[c]
s_use (ignore)
int ignore;
{
-
if (strncmp (input_line_pointer, ".text", 5) == 0)
{
input_line_pointer += 5;
s_data1 ();
return;
}
- /* Literals can't go in the text segment because you can't read
- from instruction memory on some 29k's. So, into initialized data. */
+ /* Literals can't go in the text segment because you can't read from
+ instruction memory on some 29k's. So, into initialized data. */
if (strncmp (input_line_pointer, ".lit", 4) == 0)
{
input_line_pointer += 4;
char *regname;
int regnum;
{
- /* FIXME-SOON, put something in these syms so they won't be output to the symbol
- table of the resulting object file. */
+ /* FIXME-SOON, put something in these syms so they won't be output
+ to the symbol table of the resulting object file. */
/* Must be large enough to hold the names of the special registers. */
char buf[80];
symbol_table_insert (symbol_new (buf, SEG_REGISTER, (valueT) regnum,
&zero_address_frag));
-} /* insert_sreg() */
+}
/* Install symbol definitions for assorted special registers.
See ASM29K Ref page 2-9. */
insert_sreg ("fps", SREG + 162);
/* "", SREG+163); Reserved */
insert_sreg ("exop", SREG + 164);
-} /* define_some_regs() */
+}
/* This function is called once, at assembler startup time. It should
- set up all the tables, etc. that the MD part of the assembler will need. */
+ set up all the tables, etc., that the MD part of the assembler will
+ need. */
void
md_begin ()
{
}
/* Hack to avoid multiple opcode entries. We pre-locate all the
- variations (b/i field and P/A field) and handle them. */
+ variations (b/i field and P/A field) and handle them. */
if (!strcmp (name, machine_opcodes[i + 1].name))
{
break;
default:
bad_table:
- fprintf (stderr, "internal error: can't handle opcode %s\n", name);
+ fprintf (stderr, "internal error: can't handle opcode %s\n",
+ name);
lose = 1;
}
- /* OK, this is an i/b or A/P pair. We skip the higher-valued one,
- and let the code for operand checking handle OR-ing in the bit. */
+ /* OK, this is an i/b or A/P pair. We skip the
+ higher-valued one, and let the code for operand checking
+ handle OR-ing in the bit. */
if (machine_opcodes[i].opcode & 1)
continue;
else
char *str;
{
char *toP;
- /* !!!! int rsd; */
know (str);
machine_ip (str);
{
char *s;
const char *args;
- /* !!!! char c; */
- /* !!!! unsigned long i; */
struct machine_opcode *insn;
char *argsStart;
unsigned long opcode;
- /* !!!! unsigned int mask; */
expressionS the_operand;
expressionS *operand = &the_operand;
unsigned int reg;
memset (&the_insn, '\0', sizeof (the_insn));
the_insn.reloc = NO_RELOC;
- /*
- * Build the opcode, checking as we go to make
- * sure that the operands match.
- *
- * If an operand matches, we modify the_insn or opcode appropriately,
- * and do a "continue". If an operand fails to match, we "break".
- */
+ /* Build the opcode, checking as we go to make sure that the
+ operands match.
+
+ If an operand matches, we modify the_insn or opcode appropriately,
+ and do a "continue". If an operand fails to match, we "break". */
+
if (insn->args[0] != '\0')
s = parse_operand (s, operand); /* Prime the pump */
case 'b': /* A general register or 8-bit immediate */
case 'i':
/* We treat the two cases identically since we mashed
- them together in the opcode table. */
+ them together in the opcode table. */
if (operand->X_op == O_register)
goto general_reg;
if (reg >= SREG)
break; /* No special registers */
- /*
- * Got the register, now figure out where
- * it goes in the opcode.
- */
+ /* Got the register, now figure out where it goes in the
+ opcode. */
switch (*args)
{
case 'a':
the_insn.reloc = RELOC_JUMPTARG;
the_insn.exp = *operand;
the_insn.pcrel = 1; /* Assume PC-relative jump */
- /* FIXME-SOON, Do we figure out whether abs later, after know sym val? */
+ /* FIXME-SOON, Do we figure out whether abs later, after
+ know sym val? */
continue;
case 'e': /* Coprocessor enable bit for LOAD/STORE insn */
}
}
-/*
- This is identical to the md_atof in m68k.c. I think this is right,
- but I'm not sure.
+/* This is identical to the md_atof in m68k.c. I think this is right,
+ but I'm not sure.
- Turn a string in input_line_pointer into a floating point constant of type
- type, and store the appropriate bytes in *litP. The number of LITTLENUMS
- emitted is stored in *sizeP . An error message is returned, or NULL on OK.
- */
+ Turn a string in input_line_pointer into a floating point constant
+ of type type, and store the appropriate bytes in *litP. The number
+ of LITTLENUMS emitted is stored in *sizeP . An error message is
+ returned, or NULL on OK. */
/* Equal to MAX_PRECISION in atof-ieee.c */
#define MAX_LITTLENUMS 6
md_number_to_chars (litP, (valueT) (*wordP++), sizeof (LITTLENUM_TYPE));
litP += sizeof (LITTLENUM_TYPE);
}
- return ""; /* Someone should teach Dean about null pointers */
+ return "";
}
/*
know (fixP->fx_size == 4);
know (fixP->fx_r_type < NO_RELOC);
- /*
- * This is a hack. There should be a better way to
- * handle this.
- */
+ /* This is a hack. There should be a better way to handle this. */
if (fixP->fx_r_type == RELOC_WDISP30 && fixP->fx_addsy)
{
val += fixP->fx_where + fixP->fx_frag->fr_address;
} /* switch on type */
return (0);
-} /* tc_coff_fix2rtype() */
+}
#endif /* OBJ_COFF */
-/* should never be called for sparc */
+/* should never be called for 29k */
void
md_create_short_jump (ptr, from_addr, to_addr, frag, to_symbol)
char *ptr;
object_headers *headers;
register fragS *fragP;
{
- as_fatal ("sparc_convert_frag\n");
+ as_fatal ("a29k_convert_frag\n");
}
/* should never be called for 29k */
fragS *frag;
symbolS *to_symbol;
{
- as_fatal ("sparc_create_long_jump\n");
+ as_fatal ("a29k_create_long_jump\n");
}
/* should never be called for a29k */
register fragS *fragP;
segT segtype;
{
- as_fatal ("sparc_estimate_size_before_relax\n");
- return (0);
+ as_fatal ("a29k_estimate_size_before_relax\n");
+ return 0;
}
#if 0
where[7] = (((!S_IS_DEFINED (fixP->fx_addsy)) << 7) & 0x80) | (0 & 0x60) | (fixP->fx_r_type & 0x1F);
/* Also easy */
md_number_to_chars (&where[8], fixP->fx_addnumber, 4);
-
- return;
-} /* tc_aout_fix_to_chars() */
+}
#endif /* OBJ_AOUT */
int *cntP;
char ***vecP;
{
- return (0);
+ return 0;
}
return fixP->fx_where + fixP->fx_frag->fr_address;
}
-/*
- * Local Variables:
- * comment-column: 0
- * End:
- */
-
/* end of tc-a29k.c */