comment-finding hack for hppa-linux.
[external/binutils.git] / gas / config / tc-hppa.h
1 /* tc-hppa.h -- Header file for the PA
2    Copyright (C) 1989, 93, 94, 95, 96, 97, 98, 99, 2000
3    Free Software Foundation, Inc.
4
5    This file is part of GAS, the GNU Assembler.
6
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)
10    any later version.
11
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.
16
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 the Free
19    Software Foundation, 59 Temple Place - Suite 330, Boston, MA
20    02111-1307, USA.  */
21
22
23 /* HP PA-RISC support was contributed by the Center for Software Science
24    at the University of Utah.  */
25
26 /* Please refrain from exposing the world to the internals of tc-hppa.c
27    when this file is included.  This means only declaring exported functions,
28    (please PARAMize them!) not exporting structures and data items which
29    are used solely within tc-hppa.c, etc.
30
31    Also refrain from adding any more object file dependent code, there is 
32    already far too much object file format dependent code in this file.
33    In theory this file should contain only exported functions, structures
34    and data declarations common to all PA assemblers.  */
35
36 #ifndef _TC_HPPA_H
37 #define _TC_HPPA_H
38
39 #ifndef TC_HPPA
40 #define TC_HPPA 1
41 #endif
42
43 #define TARGET_BYTES_BIG_ENDIAN 1
44
45 #define TARGET_ARCH bfd_arch_hppa
46
47 #define WORKING_DOT_WORD
48
49 #ifdef OBJ_ELF
50 #if TARGET_ARCH_SIZE == 64
51 #include "bfd/elf64-hppa.h"
52 #define TARGET_FORMAT "elf64-hppa"
53 #else
54 #include "bfd/elf32-hppa.h"
55 #define TARGET_FORMAT "elf32-hppa"
56 #endif
57 #endif
58
59 #ifdef OBJ_SOM
60 #include "bfd/som.h"
61 #define TARGET_FORMAT "som"
62 #endif
63
64 #ifdef TE_LINUX
65 /* Define to compile in an extra assembler option, -c, which enables a
66    warning (once per file) when a comment is encountered.
67    The hppa comment char is a `;' which tends to occur in random C asm
68    statements.  A semicolon is a line separator for most assemblers.
69    It's hard to find these lurking semicolons.  Thus...  */
70 #define WARN_COMMENTS 1
71 #endif
72
73 /* FIXME.  Why oh why aren't these defined somewhere globally?  */
74 #ifndef FALSE
75 #define FALSE   (0)
76 #define TRUE    (!FALSE)
77 #endif
78
79 #define ASEC_NULL (asection *)0
80
81 /* pa_define_label gets used outside of tc-hppa.c via tc_frob_label.  */
82 extern void pa_define_label PARAMS ((symbolS *));
83
84 extern void parse_cons_expression_hppa PARAMS ((expressionS *));
85 extern void cons_fix_new_hppa PARAMS ((fragS *, int, int, expressionS *));
86 extern int hppa_force_relocation PARAMS ((struct fix *));
87
88 /* This gets called before writing the object file to make sure
89    things like entry/exit and proc/procend pairs match.  */
90 extern void pa_check_eof PARAMS ((void));
91 #define tc_frob_file pa_check_eof
92
93 #define tc_frob_label(sym) pa_define_label (sym)
94
95 /* The PA does not need support for either of these.  */
96 #define tc_crawl_symbol_chain(headers) {;}
97 #define tc_headers_hook(headers) {;}
98
99 #define RELOC_EXPANSION_POSSIBLE
100 #define MAX_RELOC_EXPANSION 6
101
102 /* FIXME.  More things which are both HPPA and ELF specific.  There is 
103    nowhere to put such things.  */
104 #ifdef OBJ_ELF
105 #define elf_tc_final_processing elf_hppa_final_processing
106 void elf_hppa_final_processing PARAMS ((void));
107 void pa_end_of_source PARAMS ((void));
108 #endif
109
110 /* The PA needs to parse field selectors in .byte, etc.  */
111
112 #define TC_PARSE_CONS_EXPRESSION(EXP, NBYTES) \
113   parse_cons_expression_hppa (EXP)
114 #define TC_CONS_FIX_NEW cons_fix_new_hppa
115
116 /* On the PA, an equal sign often appears as a condition or nullification
117    completer in an instruction.  This can be detected by checking the
118    previous character, if the character is a comma, then the equal is
119    being used as part of an instruction.  */
120 #define TC_EQUAL_IN_INSN(C, PTR)        ((C) == ',')
121
122 /* Similarly for an exclamation point.  It is used in FP comparison
123    instructions and as an end of line marker.  When used in an instruction
124    it will always follow a comma.  */
125 #define TC_EOL_IN_INSN(PTR)     (*(PTR) == '!' && (PTR)[-1] == ',')
126
127 int hppa_fix_adjustable PARAMS((struct fix *));
128 #define tc_fix_adjustable hppa_fix_adjustable
129
130 /* Because of the strange PA calling conventions, it is sometimes
131    necessary to emit a relocation for a call even though it would
132    normally appear safe to handle it completely within GAS.  */
133 #define TC_FORCE_RELOCATION(FIXP) hppa_force_relocation (FIXP)
134
135 #ifdef OBJ_SOM
136 /* If a symbol is imported, but never used, then the symbol should
137    *not* end up in the symbol table.  Likewise for absolute symbols
138    with local scope.  */
139 #define tc_frob_symbol(sym,punt) \
140     if ((S_GET_SEGMENT (sym) == &bfd_und_section && ! symbol_used_p (sym)) \
141         || (S_GET_SEGMENT (sym) == &bfd_abs_section \
142             && ! S_IS_EXTERNAL (sym))) \
143       punt = 1
144
145 /* We need to be able to make relocations involving the difference of
146    two symbols.  This includes the difference of two symbols when
147    one of them is undefined (this comes up in PIC code generation). 
148
149    We don't define DIFF_EXPR_OK because it does the wrong thing if
150    the add symbol is undefined and the sub symbol is a symbol in
151    the same section as the relocation.  We also need some way to
152    specialize some code in adjust_reloc_syms.  */
153 #define UNDEFINED_DIFFERENCE_OK
154 #endif
155
156 #ifdef OBJ_ELF
157 #define tc_frob_symbol(sym,punt) \
158   { \
159     if ((S_GET_SEGMENT (sym) == &bfd_und_section && ! symbol_used_p (sym)) \
160         || (S_GET_SEGMENT (sym) == &bfd_abs_section \
161             && ! S_IS_EXTERNAL (sym)) \
162         || strcmp (S_GET_NAME (sym), "$global$") == 0) \
163       punt = 1; \
164   }
165 #endif
166
167 #define md_operand(x)
168 #ifdef OBJ_ELF
169 #define md_end() pa_end_of_source ()
170 #endif
171
172 #define TC_FIX_TYPE PTR
173 #define TC_INIT_FIX_DATA(FIXP) ((FIXP)->tc_fix_data = NULL)
174
175 #endif /* _TC_HPPA_H */