OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-stable/] [binutils-2.20.1/] [gas/] [config/] [tc-alpha.h] - Blame information for rev 818

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 205 julius
/* This file is tc-alpha.h
2
   Copyright 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003
3
   2005, 2006, 2007, 2009
4
   Free Software Foundation, Inc.
5
   Written by Ken Raeburn <raeburn@cygnus.com>.
6
 
7
   This file is part of GAS, the GNU Assembler.
8
 
9
   GAS is free software; you can redistribute it and/or modify
10
   it under the terms of the GNU General Public License as published by
11
   the Free Software Foundation; either version 3, or (at your option)
12
   any later version.
13
 
14
   GAS is distributed in the hope that it will be useful,
15
   but WITHOUT ANY WARRANTY; without even the implied warranty of
16
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17
   GNU General Public License for more details.
18
 
19
   You should have received a copy of the GNU General Public License
20
   along with GAS; see the file COPYING.  If not, write to the Free
21
   Software Foundation, 51 Franklin Street - Fifth Floor, Boston, MA
22
   02110-1301, USA.  */
23
 
24
#define TC_ALPHA
25
 
26
#define TARGET_BYTES_BIG_ENDIAN 0
27
 
28
#define WORKING_DOT_WORD
29
 
30
#define TARGET_ARCH                     bfd_arch_alpha
31
 
32
#ifdef TE_FreeBSD
33
#define ELF_TARGET_FORMAT       "elf64-alpha-freebsd"
34
#endif
35
#ifndef ELF_TARGET_FORMAT
36
#define ELF_TARGET_FORMAT       "elf64-alpha"
37
#endif
38
 
39
#define TARGET_FORMAT (OUTPUT_FLAVOR == bfd_target_ecoff_flavour        \
40
                       ? "ecoff-littlealpha"                            \
41
                       : OUTPUT_FLAVOR == bfd_target_elf_flavour        \
42
                       ? ELF_TARGET_FORMAT                              \
43
                       : OUTPUT_FLAVOR == bfd_target_evax_flavour       \
44
                       ? "vms-alpha"                                    \
45
                       : "unknown-format")
46
 
47
#define NEED_LITERAL_POOL
48
#define REPEAT_CONS_EXPRESSIONS
49
 
50
struct fix;
51
struct alpha_reloc_tag;
52
 
53
extern int alpha_force_relocation (struct fix *);
54
extern int alpha_fix_adjustable   (struct fix *);
55
 
56
extern unsigned long alpha_gprmask, alpha_fprmask;
57
extern valueT alpha_gp_value;
58
 
59
#define TC_FORCE_RELOCATION(FIX)        alpha_force_relocation (FIX)
60
#define tc_fix_adjustable(FIX)          alpha_fix_adjustable (FIX)
61
#define RELOC_REQUIRES_SYMBOL
62
 
63
/* Values passed to md_apply_fix don't include the symbol value.  */
64
#define MD_APPLY_SYM_VALUE(FIX) 0
65
 
66
#define md_convert_frag(b,s,f)          as_fatal ("alpha convert_frag\n")
67
#define md_estimate_size_before_relax(f,s) \
68
                        (as_fatal ("estimate_size_before_relax called"),1)
69
#define md_operand(x)
70
 
71
#ifdef OBJ_EVAX
72
#define TC_VALIDATE_FIX_SUB(FIX, SEG) 1
73
 
74
#define tc_canonicalize_symbol_name evax_shorten_name
75
 
76
#define TC_CONS_FIX_NEW(FRAG,OFF,LEN,EXP) \
77
      fix_new_exp (FRAG, OFF, (int)LEN, EXP, 0, \
78
        LEN == 2 ? BFD_RELOC_16 \
79
        : LEN == 4 ? BFD_RELOC_32 \
80
        : LEN == 8 ? BFD_RELOC_64 \
81
        : BFD_RELOC_ALPHA_LINKAGE);
82
#endif
83
 
84
#ifdef OBJ_EVAX
85
#define TC_IMPLICIT_LCOMM_ALIGNMENT(SIZE, P2VAR) (P2VAR) = 3
86
#else
87
#define TC_IMPLICIT_LCOMM_ALIGNMENT(size, align) \
88
  do                                                    \
89
    {                                                   \
90
      align = 0;                                 \
91
      if (size > 1)                                     \
92
        {                                               \
93
          addressT temp = 1;                            \
94
          while ((size & temp) == 0)                     \
95
            ++align, temp <<= 1;                        \
96
        }                                               \
97
    }                                                   \
98
  while (0)
99
#endif
100
 
101
#define md_number_to_chars              number_to_chars_littleendian
102
 
103
extern int tc_get_register (int);
104
extern void alpha_frob_ecoff_data (void);
105
 
106
#define tc_frob_label(sym) alpha_define_label (sym)
107
extern void alpha_define_label (symbolS *);
108
 
109
#define md_cons_align(nbytes) alpha_cons_align (nbytes)
110
extern void alpha_cons_align (int);
111
 
112
#define HANDLE_ALIGN(fragp) alpha_handle_align (fragp)
113
extern void alpha_handle_align (struct frag *);
114
 
115
#define MAX_MEM_FOR_RS_ALIGN_CODE  (3 + 4 + 8)
116
 
117
#ifdef OBJ_ECOFF
118
#define tc_frob_file_before_adjust() alpha_frob_file_before_adjust ()
119
extern void alpha_frob_file_before_adjust (void);
120
#endif
121
 
122
#define DIFF_EXPR_OK   /* foo-. gets turned into PC relative relocs.  */
123
 
124
#ifdef OBJ_ELF
125
#define md_elf_section_letter           alpha_elf_section_letter
126
extern bfd_vma alpha_elf_section_letter (int, char **);
127
#define md_elf_section_flags            alpha_elf_section_flags
128
extern flagword alpha_elf_section_flags (flagword, bfd_vma, int);
129
#endif
130
 
131
/* Whether to add support for explicit !relocation_op!sequence_number.  At the
132
   moment, only do this for ELF, though ECOFF could use it as well.  */
133
 
134
#ifdef OBJ_ELF
135
#define RELOC_OP_P
136
#endif
137
 
138
#ifndef OBJ_EVAX
139
/* Before the relocations are written, reorder them, so that user
140
   supplied !lituse relocations follow the appropriate !literal
141
   relocations.  Also convert the gas-internal relocations to the
142
   appropriate linker relocations.  */
143
#define tc_frob_file_before_fix() alpha_before_fix ()
144
extern void alpha_before_fix (void);
145
#endif
146
 
147
#ifdef OBJ_ELF
148
#define md_end  alpha_elf_md_end
149
extern void alpha_elf_md_end (void);
150
#endif
151
 
152
/* New fields for supporting explicit relocations (such as !literal to mark
153
   where a pointer is loaded from the global table, and !lituse_base to track
154
   all of the normal uses of that pointer).  */
155
 
156
#define TC_FIX_TYPE struct alpha_fix_tag
157
 
158
struct alpha_fix_tag
159
{
160
  struct fix *next_reloc;               /* Next !lituse or !gpdisp.  */
161
  struct alpha_reloc_tag *info;         /* Other members with same sequence.  */
162
};
163
 
164
/* Initialize the TC_FIX_TYPE field.  */
165
#define TC_INIT_FIX_DATA(FIX)                                           \
166
do {                                                                    \
167
  FIX->tc_fix_data.next_reloc = NULL;                                   \
168
  FIX->tc_fix_data.info = NULL;                                         \
169
} while (0)
170
 
171
/* Work with DEBUG5 to print fields in tc_fix_type.  */
172
#define TC_FIX_DATA_PRINT(STREAM, FIX)                                  \
173
do {                                                                    \
174
  if (FIX->tc_fix_data.info)                                            \
175
    fprintf (STREAM, "\tinfo = 0x%lx, next_reloc = 0x%lx\n", \
176
             (long) FIX->tc_fix_data.info,                              \
177
             (long) FIX->tc_fix_data.next_reloc);                       \
178
} while (0)
179
 
180
#define TARGET_USE_CFIPOP 1
181
 
182
#define tc_cfi_frame_initial_instructions alpha_cfi_frame_initial_instructions
183
extern void alpha_cfi_frame_initial_instructions (void);
184
 
185
#define DWARF2_LINE_MIN_INSN_LENGTH     4
186
#define DWARF2_DEFAULT_RETURN_COLUMN    26
187
#define DWARF2_CIE_DATA_ALIGNMENT       (-8)

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.