diff options
Diffstat (limited to 'gas/config/tc-mmix.h')
-rw-r--r-- | gas/config/tc-mmix.h | 214 |
1 files changed, 214 insertions, 0 deletions
diff --git a/gas/config/tc-mmix.h b/gas/config/tc-mmix.h new file mode 100644 index 0000000..3c7c71a --- /dev/null +++ b/gas/config/tc-mmix.h @@ -0,0 +1,214 @@ +/* tc-mmix.h -- Header file for tc-mmix.c. + Copyright (C) 2001 Free Software Foundation, Inc. + Written by Hans-Peter Nilsson (hp@bitrange.com). + + This file is part of GAS, the GNU Assembler. + + GAS is free software; you can redistribute it and/or modify + it under the terms of the GNU General Public License as published by + the Free Software Foundation; either version 2, or (at your option) + any later version. + + GAS is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + GNU General Public License for more details. + + 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, 59 Temple Place - Suite 330, Boston, MA + 02111-1307, USA. */ + +#define TC_MMIX + +/* See gas/doc/internals.texi for explanation of these macros. */ +#define TARGET_FORMAT "elf64-mmix" +#define TARGET_ARCH bfd_arch_mmix +#define TARGET_BYTES_BIG_ENDIAN 1 + +extern const char mmix_comment_chars[]; +#define tc_comment_chars mmix_comment_chars + +extern const char mmix_symbol_chars[]; +#define tc_symbol_chars mmix_symbol_chars + +extern const char mmix_exp_chars[]; +#define EXP_CHARS mmix_exp_chars + +extern const char mmix_flt_chars[]; +#define FLT_CHARS mmix_flt_chars + +/* "@" is a synonym for ".". */ +#define LEX_AT (LEX_BEGIN_NAME) + +extern int mmix_label_without_colon_this_line PARAMS ((void)); +#define LABELS_WITHOUT_COLONS mmix_label_without_colon_this_line () + +extern int mmix_next_semicolon_is_eoln; +#define TC_EOL_IN_INSN(p) (*(p) == ';' && ! mmix_next_semicolon_is_eoln) + +/* This is one direction we can get mmixal compatibility. */ +extern void mmix_handle_mmixal PARAMS ((void)); +#define md_start_line_hook mmix_handle_mmixal + +extern void mmix_md_begin PARAMS ((void)); +#define md_begin mmix_md_begin + +extern void mmix_md_end PARAMS ((void)); +#define md_end mmix_md_end + +extern int mmix_current_location \ + PARAMS ((void (*fn) (expressionS *), expressionS *)); +extern int mmix_parse_predefined_name PARAMS ((char *, expressionS *)); + +extern char *mmix_current_prefix; + +/* A bit ugly, since we "know" that there's a static function + current_location that does what we want. We also strip off a leading + ':' in another ugly way. + + The [DVWIOUZX]_Handler symbols are provided when-used. */ + +extern int mmix_gnu_syntax; +#define md_parse_name(name, exp, cpos) \ + (! mmix_gnu_syntax \ + && (name[0] == '@' \ + ? (! is_part_of_name (name[1]) \ + && mmix_current_location (current_location, exp)) \ + : ((name[0] == ':' || isupper (name[0])) \ + && mmix_parse_predefined_name (name, exp)))) + +extern char *mmix_prefix_name PARAMS ((char *)); + +/* We implement when *creating* a symbol, we also need to strip a ':' or + prepend a prefix. */ +#define tc_canonicalize_symbol_name(x) \ + (mmix_current_prefix == NULL && (x)[0] != ':' ? (x) : mmix_prefix_name (x)) + +#define md_undefined_symbol(x) NULL + +extern void mmix_fb_label PARAMS ((expressionS *)); + +/* Since integer_constant is local to expr.c, we have to make this a + macro. FIXME: Do it cleaner. */ +#define md_operand(exp) \ + do { \ + if (input_line_pointer[0] == '#') \ + { \ + input_line_pointer++; \ + integer_constant (16, (exp)); \ + } \ + else if (input_line_pointer[0] == '&' \ + && input_line_pointer[1] != '&') \ + as_bad (_("`&' serial number operator is not supported")); \ + else \ + mmix_fb_label (exp); \ + } while (0) + + +/* Gas dislikes the 2ADD, 8ADD etc. insns, so we have to assemble them in + the error-recovery loop. Hopefully there are no significant + differences. Also, space on a line isn't gracefully handled. */ +extern int mmix_assemble_return_nonzero PARAMS ((char *)); +#define tc_unrecognized_line(c) \ + ((c) == ' ' \ + || (((c) == '1' || (c) == '2' || (c) == '4' || (c) == '8') \ + && mmix_assemble_return_nonzero (input_line_pointer - 1))) + +#define md_number_to_chars number_to_chars_bigendian + +#define WORKING_DOT_WORD + +extern const struct relax_type mmix_relax_table[]; +#define TC_GENERIC_RELAX_TABLE mmix_relax_table + +/* We use the relax table for everything except the GREG frags. */ +extern long mmix_md_relax_frag PARAMS ((segT, fragS *, long)); +#define md_relax_frag mmix_md_relax_frag + +#define tc_fix_adjustable(X) \ + ((! (X)->fx_addsy \ + || (! S_IS_WEAK ((X)->fx_addsy) \ + && S_GET_SEGMENT ((X)->fx_addsy) != reg_section)) \ + && (X)->fx_r_type != BFD_RELOC_VTABLE_INHERIT \ + && (X)->fx_r_type != BFD_RELOC_VTABLE_ENTRY) + +/* Adjust symbols which are registers. */ +#define tc_adjust_symtab() mmix_adjust_symtab () +extern void mmix_adjust_symtab PARAMS ((void)); + +/* Avoid outputting GAS register section symbols. This happens when the + assembly had errors, and will propagate to an assert in BFD. FIXME: + It seems the symbol output when-errors is a bug in GAS. Fix that + some time. See also tc_gen_reloc. + + Here's where we make all symbols global, when so requested. + We must avoid doing that for expression symbols or section symbols, + though. */ +extern int mmix_globalize_symbols; +#define tc_frob_symbol(sym, punt) \ + do { \ + if (S_GET_SEGMENT (sym) == reg_section \ + || (symp) == section_symbol (absolute_section)) \ + (punt) = 1; \ + \ + if (mmix_globalize_symbols \ + && ! symbol_section_p (sym) \ + && symp != section_symbol (absolute_section) \ + && (! S_IS_LOCAL (sym) \ + || S_GET_SEGMENT (sym) == reg_section) \ + && (S_GET_SEGMENT (sym) != reg_section \ + || (S_GET_NAME (sym)[0] != '$' \ + && S_GET_VALUE (sym) < 256))) \ + S_SET_EXTERNAL (sym); \ + } while (0) + +/* When relaxing, we need to emit various relocs we otherwise wouldn't. */ +#define TC_FORCE_RELOCATION(fix) mmix_force_relocation (fix) +extern int mmix_force_relocation PARAMS ((struct fix *)); + +/* Call md_pcrel_from_section(), not md_pcrel_from(). */ +#define MD_PCREL_FROM_SECTION(FIXP, SEC) md_pcrel_from_section (FIXP, SEC) +extern long md_pcrel_from_section PARAMS ((struct fix *, segT)); + +#define MD_APPLY_FIX3 + +#define TC_HANDLES_FX_DONE + +#define md_section_align(seg, size) (size) + +#define LISTING_HEADER "GAS for MMIX" + +/* The default of 4 means Bcc expansion looks like it's missing a line. */ +#define LISTING_LHS_CONT_LINES 5 + +extern fragS *mmix_opcode_frag; +#define TC_FRAG_TYPE fragS * +#define TC_FRAG_INIT(frag) (frag)->tc_frag_data = mmix_opcode_frag + +/* We need to associate each section symbol with a list of GREGs defined + for that section/segment and sorted on offset, between the point where + all symbols have been evaluated and all frags mapped, and when the + fixups are done and relocs are output. Similarly for each unknown + symbol. */ +extern void mmix_frob_file PARAMS ((void)); +#define tc_frob_file mmix_frob_file + +/* Used by mmix_frob_file. Hangs on section symbols and unknown symbols. */ +struct mmix_symbol_gregs; +#define TC_SYMFIELD_TYPE struct mmix_symbol_gregs * + +extern void mmix_frob_file_before_adjust PARAMS ((void)); +#define tc_frob_file_before_adjust mmix_frob_file_before_adjust + +extern void mmix_md_elf_section_change_hook PARAMS ((void)); +#define md_elf_section_change_hook mmix_md_elf_section_change_hook + +extern void mmix_md_do_align PARAMS ((int, char *, int, int)); +#define md_do_align(n, fill, len, max, label) \ + mmix_md_do_align (n, fill, len, max) + +/* Each insn is a tetrabyte (4 bytes) long, but if there are BYTE + sequences sprinkled in, we can get unaligned DWARF2 offsets, so let's + explicitly say one byte. */ +#define DWARF2_LINE_MIN_INSN_LENGTH 1 |