1 /* tc-hppa.h -- Header file for the PA */
3 /* Copyright (C) 1989, 1993 Free Software Foundation, Inc.
5 This file is part of GAS, the GNU Assembler.
7 GAS is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 1, or (at your option)
12 GAS is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with GAS; see the file COPYING. If not, write to
19 the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */
22 /* HP PA-RISC support was contributed by the Center for Software Science
23 at the University of Utah. */
25 /* Please refrain from exposing the world to the internals of tc-hppa.c
26 when this file is included. This means only declaring exported functions,
27 (please PARAMize them!) not exporting structures and data items which
28 are used solely within tc-hppa.c, etc.
30 Also refrain from adding any more object file dependent code, there is
31 already far too much object file format dependent code in this file.
32 In theory this file should contain only exported functions, structures
33 and data declarations common to all PA assemblers. */
42 #define TARGET_ARCH bfd_arch_hppa
44 /* FIXME. The lack of a place to put things which are both target cpu
45 and target format dependent makes hacks like this necessary. */
47 #include "bfd/elf32-hppa.h"
48 #define TARGET_FORMAT "elf32-hppa"
53 #define TARGET_FORMAT "som"
56 /* FIXME. Why oh why aren't these defined somewhere globally? */
62 /* Local labels have an "L$" prefix. */
63 #define LOCAL_LABEL(name) ((name)[0] == 'L' && (name)[1] == '$')
64 #define FAKE_LABEL_NAME "L$0\001"
65 #define ASEC_NULL (asection *)0
67 /* Labels are not required to have a colon for a suffix. */
68 #define LABELS_WITHOUT_COLONS
70 /* FIXME. This should be static and declared in tc-hppa.c, but
71 pa_define_label gets used outside of tc-hppa.c via tc_frob_label.
72 Should also be PARAMized, but symbolS isn't available here. */
73 extern void pa_define_label ();
75 /* FIXME. Types not available here, so they can't be PARAMized. */
76 extern void parse_cons_expression_hppa ();
77 extern void cons_fix_new_hppa ();
78 extern int hppa_force_relocation ();
80 /* This gets called before writing the object file to make sure
81 things like entry/exit and proc/procend pairs match. */
82 extern void pa_check_eof
PARAMS ((void));
83 #define tc_frob_file pa_check_eof
85 #define tc_frob_label(sym) pa_define_label (sym)
87 /* The PA does not need support for either of these. */
88 #define tc_crawl_symbol_chain(headers) {;}
89 #define tc_headers_hook(headers) {;}
91 #define RELOC_EXPANSION_POSSIBLE
92 #define MAX_RELOC_EXPANSION 6
94 /* FIXME. More things which are both HPPA and ELF specific. There is
95 nowhere to put such things. */
97 #define elf_tc_final_processing elf_hppa_final_processing
98 void elf_hppa_final_processing
PARAMS ((void));
101 /* The PA needs to parse field selectors in .byte, etc. */
103 #define TC_PARSE_CONS_EXPRESSION(EXP, NBYTES) \
104 parse_cons_expression_hppa (EXP)
105 #define TC_CONS_FIX_NEW cons_fix_new_hppa
107 /* On the PA, an equal sign often appears as a condition or nullification
108 completer in an instruction. This can be detected by checking the
109 previous character, if the character is a comma, then the equal is
110 being used as part of an instruction. */
111 #define TC_EQUAL_IN_INSN(C, PTR) ((C) == ',')
113 /* Similarly for an exclamation point. It is used in FP comparison
114 instructions and as an end of line marker. When used in an instruction
115 it will always follow a comma. */
116 #define TC_EOL_IN_INSN(PTR) (is_end_of_line[*(PTR)] && (PTR)[-1] == ',')
118 #define tc_fix_adjustable hppa_fix_adjustable
120 /* Because of the strange PA calling conventions, it is sometimes
121 necessary to emit a relocation for a call even though it would
122 normally appear safe to handle it completely within GAS. */
123 #define TC_FORCE_RELOCATION(FIXP) hppa_force_relocation (FIXP)
126 /* If a symbol is imported, but never used, then the symbol should
127 *not* end up in the symbol table. Likewise for absolute symbols
129 #define tc_frob_symbol(sym,punt) \
130 if ((S_GET_SEGMENT (sym) == &bfd_und_section && sym->sy_used == 0) \
131 || (S_GET_SEGMENT (sym) == &bfd_abs_section \
132 && (sym->bsym->flags & BSF_EXPORT) == 0)) \
137 /* Arggg. The generic BFD ELF code always adds in the section->vma
138 to non-common symbols. This is a lose on the PA. To make matters
139 worse, the generic ELF code already defined obj_frob_symbol. */
140 #define tc_frob_symbol(sym,punt) \
142 if (S_GET_SEGMENT (sym) != &bfd_com_section \
143 && S_GET_SEGMENT (sym) != &bfd_und_section) \
144 S_SET_VALUE ((sym), (S_GET_VALUE (sym) - (sym)->bsym->section->vma)); \
145 if ((S_GET_SEGMENT (sym) == &bfd_und_section && sym->sy_used == 0) \
146 || (S_GET_SEGMENT (sym) == &bfd_abs_section \
147 && (sym->bsym->flags & BSF_EXPORT) == 0)) \
152 #define md_operand(x)
154 #endif /* _TC_HPPA_H */