OSDN Git Service

* config/mips/mips.h (PREDICATE_CODES): Add stack_operand.
[pf3gnuchains/gcc-fork.git] / gcc / config / mips / mips.h
1 /* Definitions of target machine for GNU compiler.  MIPS version.
2    Copyright (C) 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1996, 1997, 1998
3    1999, 2000, 2001, 2002, 2003 Free Software Foundation, Inc.
4    Contributed by A. Lichnewsky (lich@inria.inria.fr).
5    Changed by Michael Meissner  (meissner@osf.org).
6    64 bit r4000 support by Ian Lance Taylor (ian@cygnus.com) and
7    Brendan Eich (brendan@microunity.com).
8
9 This file is part of GCC.
10
11 GCC is free software; you can redistribute it and/or modify
12 it under the terms of the GNU General Public License as published by
13 the Free Software Foundation; either version 2, or (at your option)
14 any later version.
15
16 GCC is distributed in the hope that it will be useful,
17 but WITHOUT ANY WARRANTY; without even the implied warranty of
18 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
19 GNU General Public License for more details.
20
21 You should have received a copy of the GNU General Public License
22 along with GCC; see the file COPYING.  If not, write to
23 the Free Software Foundation, 59 Temple Place - Suite 330,
24 Boston, MA 02111-1307, USA.  */
25
26
27 /* Standard GCC variables that we reference.  */
28
29 extern int      target_flags;
30
31 /* MIPS external variables defined in mips.c.  */
32
33 /* comparison type */
34 enum cmp_type {
35   CMP_SI,                               /* compare four byte integers */
36   CMP_DI,                               /* compare eight byte integers */
37   CMP_SF,                               /* compare single precision floats */
38   CMP_DF,                               /* compare double precision floats */
39   CMP_MAX                               /* max comparison type */
40 };
41
42 /* Which processor to schedule for.  Since there is no difference between
43    a R2000 and R3000 in terms of the scheduler, we collapse them into
44    just an R3000.  The elements of the enumeration must match exactly
45    the cpu attribute in the mips.md machine description.  */
46
47 enum processor_type {
48   PROCESSOR_DEFAULT,
49   PROCESSOR_4KC,
50   PROCESSOR_5KC,
51   PROCESSOR_20KC,
52   PROCESSOR_M4K,
53   PROCESSOR_R3000,
54   PROCESSOR_R3900,
55   PROCESSOR_R6000,
56   PROCESSOR_R4000,
57   PROCESSOR_R4100,
58   PROCESSOR_R4111,
59   PROCESSOR_R4120,
60   PROCESSOR_R4300,
61   PROCESSOR_R4600,
62   PROCESSOR_R4650,
63   PROCESSOR_R5000,
64   PROCESSOR_R5400,
65   PROCESSOR_R5500,
66   PROCESSOR_R7000,
67   PROCESSOR_R8000,
68   PROCESSOR_R9000,
69   PROCESSOR_SB1,
70   PROCESSOR_SR71000
71 };
72
73 /* Which ABI to use.  ABI_32 (original 32, or o32), ABI_N32 (n32),
74    ABI_64 (n64) are all defined by SGI.  ABI_O64 is o32 extended
75    to work on a 64 bit machine.  */
76
77 #define ABI_32  0
78 #define ABI_N32 1
79 #define ABI_64  2
80 #define ABI_EABI 3
81 #define ABI_O64  4
82
83 /* Information about one recognized processor.  Defined here for the
84    benefit of TARGET_CPU_CPP_BUILTINS.  */
85 struct mips_cpu_info {
86   /* The 'canonical' name of the processor as far as GCC is concerned.
87      It's typically a manufacturer's prefix followed by a numerical
88      designation.  It should be lower case.  */
89   const char *name;
90
91   /* The internal processor number that most closely matches this
92      entry.  Several processors can have the same value, if there's no
93      difference between them from GCC's point of view.  */
94   enum processor_type cpu;
95
96   /* The ISA level that the processor implements.  */
97   int isa;
98 };
99
100 extern char mips_reg_names[][8];        /* register names (a0 vs. $4).  */
101 extern char mips_print_operand_punct[256]; /* print_operand punctuation chars */
102 extern const char *current_function_file; /* filename current function is in */
103 extern int num_source_filenames;        /* current .file # */
104 extern int mips_section_threshold;      /* # bytes of data/sdata cutoff */
105 extern int sym_lineno;                  /* sgi next label # for each stmt */
106 extern int set_noreorder;               /* # of nested .set noreorder's  */
107 extern int set_nomacro;                 /* # of nested .set nomacro's  */
108 extern int set_noat;                    /* # of nested .set noat's  */
109 extern int set_volatile;                /* # of nested .set volatile's  */
110 extern int mips_branch_likely;          /* emit 'l' after br (branch likely) */
111 extern int mips_dbx_regno[];            /* Map register # to debug register # */
112 extern GTY(()) rtx branch_cmp[2];       /* operands for compare */
113 extern enum cmp_type branch_type;       /* what type of branch to use */
114 extern enum processor_type mips_arch;   /* which cpu to codegen for */
115 extern enum processor_type mips_tune;   /* which cpu to schedule for */
116 extern int mips_isa;                    /* architectural level */
117 extern int mips_abi;                    /* which ABI to use */
118 extern int mips16_hard_float;           /* mips16 without -msoft-float */
119 extern int mips_entry;                  /* generate entry/exit for mips16 */
120 extern const char *mips_arch_string;    /* for -march=<xxx> */
121 extern const char *mips_tune_string;    /* for -mtune=<xxx> */
122 extern const char *mips_isa_string;     /* for -mips{1,2,3,4} */
123 extern const char *mips_abi_string;     /* for -mabi={32,n32,64} */
124 extern const char *mips_entry_string;   /* for -mentry */
125 extern const char *mips_cache_flush_func;/* for -mflush-func= and -mno-flush-func */
126 extern int mips_string_length;          /* length of strings for mips16 */
127 extern const struct mips_cpu_info mips_cpu_info_table[];
128 extern const struct mips_cpu_info *mips_arch_info;
129 extern const struct mips_cpu_info *mips_tune_info;
130
131 /* Macros to silence warnings about numbers being signed in traditional
132    C and unsigned in ISO C when compiled on 32-bit hosts.  */
133
134 #define BITMASK_HIGH    (((unsigned long)1) << 31)      /* 0x80000000 */
135 #define BITMASK_UPPER16 ((unsigned long)0xffff << 16)   /* 0xffff0000 */
136 #define BITMASK_LOWER16 ((unsigned long)0xffff)         /* 0x0000ffff */
137
138 \f
139 /* Run-time compilation parameters selecting different hardware subsets.  */
140
141 /* Macros used in the machine description to test the flags.  */
142
143                                         /* Bits for real switches */
144 #define MASK_INT64         0x00000001   /* ints are 64 bits */
145 #define MASK_LONG64        0x00000002   /* longs are 64 bits */
146 #define MASK_SPLIT_ADDR    0x00000004   /* Address splitting is enabled.  */
147 #define MASK_NO_FUSED_MADD 0x00000008   /* Don't generate floating point
148                                            multiply-add operations.  */
149 #define MASK_GAS           0x00000010   /* Gas used instead of MIPS as */
150 #define MASK_NAME_REGS     0x00000020   /* Use MIPS s/w reg name convention */
151 #define MASK_EXPLICIT_RELOCS 0x00000040 /* Use relocation operators.  */
152 #define MASK_MEMCPY        0x00000080   /* call memcpy instead of inline code*/
153 #define MASK_SOFT_FLOAT    0x00000100   /* software floating point */
154 #define MASK_FLOAT64       0x00000200   /* fp registers are 64 bits */
155 #define MASK_ABICALLS      0x00000400   /* emit .abicalls/.cprestore/.cpload */
156 #define MASK_XGOT          0x00000800   /* emit big-got PIC */
157 #define MASK_LONG_CALLS    0x00001000   /* Always call through a register */
158 #define MASK_64BIT         0x00002000   /* Use 64 bit GP registers and insns */
159 #define MASK_EMBEDDED_PIC  0x00004000   /* Generate embedded PIC code */
160 #define MASK_EMBEDDED_DATA 0x00008000   /* Reduce RAM usage, not fast code */
161 #define MASK_BIG_ENDIAN    0x00010000   /* Generate big endian code */
162 #define MASK_SINGLE_FLOAT  0x00020000   /* Only single precision FPU.  */
163 #define MASK_MAD           0x00040000   /* Generate mad/madu as on 4650.  */
164 #define MASK_4300_MUL_FIX  0x00080000   /* Work-around early Vr4300 CPU bug */
165 #define MASK_MIPS16        0x00100000   /* Generate mips16 code */
166 #define MASK_NO_CHECK_ZERO_DIV \
167                            0x00200000   /* divide by zero checking */
168 #define MASK_BRANCHLIKELY  0x00400000   /* Generate Branch Likely
169                                            instructions.  */
170 #define MASK_UNINIT_CONST_IN_RODATA \
171                            0x00800000   /* Store uninitialized
172                                            consts in rodata */
173 #define MASK_FIX_SB1       0x01000000   /* Work around SB-1 errata. */
174
175                                         /* Debug switches, not documented */
176 #define MASK_DEBUG      0               /* unused */
177 #define MASK_DEBUG_A    0               /* don't allow <label>($reg) addrs */
178 #define MASK_DEBUG_B    0               /* GO_IF_LEGITIMATE_ADDRESS debug */
179 #define MASK_DEBUG_C    0               /* don't expand seq, etc.  */
180 #define MASK_DEBUG_D    0               /* don't do define_split's */
181 #define MASK_DEBUG_E    0               /* function_arg debug */
182 #define MASK_DEBUG_F    0               /* ??? */
183 #define MASK_DEBUG_G    0               /* don't support 64 bit arithmetic */
184 #define MASK_DEBUG_I    0               /* unused */
185
186                                         /* Dummy switches used only in specs */
187 #define MASK_MIPS_TFILE 0               /* flag for mips-tfile usage */
188
189                                         /* r4000 64 bit sizes */
190 #define TARGET_INT64            (target_flags & MASK_INT64)
191 #define TARGET_LONG64           (target_flags & MASK_LONG64)
192 #define TARGET_FLOAT64          (target_flags & MASK_FLOAT64)
193 #define TARGET_64BIT            (target_flags & MASK_64BIT)
194
195                                         /* Mips vs. GNU linker */
196 #define TARGET_SPLIT_ADDRESSES  (target_flags & MASK_SPLIT_ADDR)
197
198                                         /* Mips vs. GNU assembler */
199 #define TARGET_GAS              (target_flags & MASK_GAS)
200 #define TARGET_MIPS_AS          (!TARGET_GAS)
201
202                                         /* Debug Modes */
203 #define TARGET_DEBUG_MODE       (target_flags & MASK_DEBUG)
204 #define TARGET_DEBUG_A_MODE     (target_flags & MASK_DEBUG_A)
205 #define TARGET_DEBUG_B_MODE     (target_flags & MASK_DEBUG_B)
206 #define TARGET_DEBUG_C_MODE     (target_flags & MASK_DEBUG_C)
207 #define TARGET_DEBUG_D_MODE     (target_flags & MASK_DEBUG_D)
208 #define TARGET_DEBUG_E_MODE     (target_flags & MASK_DEBUG_E)
209 #define TARGET_DEBUG_F_MODE     (target_flags & MASK_DEBUG_F)
210 #define TARGET_DEBUG_G_MODE     (target_flags & MASK_DEBUG_G)
211 #define TARGET_DEBUG_I_MODE     (target_flags & MASK_DEBUG_I)
212
213                                         /* Reg. Naming in .s ($21 vs. $a0) */
214 #define TARGET_NAME_REGS        (target_flags & MASK_NAME_REGS)
215
216                                         /* call memcpy instead of inline code */
217 #define TARGET_MEMCPY           (target_flags & MASK_MEMCPY)
218
219                                         /* .abicalls, etc from Pyramid V.4 */
220 #define TARGET_ABICALLS         (target_flags & MASK_ABICALLS)
221 #define TARGET_XGOT             (target_flags & MASK_XGOT)
222
223                                         /* software floating point */
224 #define TARGET_SOFT_FLOAT       (target_flags & MASK_SOFT_FLOAT)
225 #define TARGET_HARD_FLOAT       (! TARGET_SOFT_FLOAT)
226
227                                         /* always call through a register */
228 #define TARGET_LONG_CALLS       (target_flags & MASK_LONG_CALLS)
229
230                                         /* generate embedded PIC code;
231                                            requires gas.  */
232 #define TARGET_EMBEDDED_PIC     (target_flags & MASK_EMBEDDED_PIC)
233
234                                         /* for embedded systems, optimize for
235                                            reduced RAM space instead of for
236                                            fastest code.  */
237 #define TARGET_EMBEDDED_DATA    (target_flags & MASK_EMBEDDED_DATA)
238
239                                         /* always store uninitialized const
240                                            variables in rodata, requires
241                                            TARGET_EMBEDDED_DATA.  */
242 #define TARGET_UNINIT_CONST_IN_RODATA   (target_flags & MASK_UNINIT_CONST_IN_RODATA)
243
244                                         /* generate big endian code.  */
245 #define TARGET_BIG_ENDIAN       (target_flags & MASK_BIG_ENDIAN)
246
247 #define TARGET_SINGLE_FLOAT     (target_flags & MASK_SINGLE_FLOAT)
248 #define TARGET_DOUBLE_FLOAT     (! TARGET_SINGLE_FLOAT)
249
250 #define TARGET_MAD              (target_flags & MASK_MAD)
251
252 #define TARGET_FUSED_MADD       (! (target_flags & MASK_NO_FUSED_MADD))
253
254 #define TARGET_4300_MUL_FIX     (target_flags & MASK_4300_MUL_FIX)
255
256 #define TARGET_CHECK_ZERO_DIV   (!(target_flags & MASK_NO_CHECK_ZERO_DIV))
257
258 #define TARGET_BRANCHLIKELY     (target_flags & MASK_BRANCHLIKELY)
259
260 #define TARGET_FIX_SB1          (target_flags & MASK_FIX_SB1)
261
262 /* True if we should use NewABI-style relocation operators for
263    symbolic addresses.  This is never true for mips16 code,
264    which has its own conventions.  */
265
266 #define TARGET_EXPLICIT_RELOCS  (target_flags & MASK_EXPLICIT_RELOCS)
267
268
269 /* True if the call patterns should be split into a jalr followed by
270    an instruction to restore $gp.  This is only ever true for SVR4 PIC,
271    in which $gp is call-clobbered.  It is only safe to split the load
272    from the call when every use of $gp is explicit.  */
273
274 #define TARGET_SPLIT_CALLS \
275   (TARGET_EXPLICIT_RELOCS && TARGET_ABICALLS && !TARGET_NEWABI)
276
277 /* True if we can optimize sibling calls.  For simplicity, we only
278    handle cases in which call_insn_operand will reject invalid
279    sibcall addresses.  There are two cases in which this isn't true:
280
281       - TARGET_MIPS16.  call_insn_operand accepts constant addresses
282         but there is no direct jump instruction.  It isn't worth
283         using sibling calls in this case anyway; they would usually
284         be longer than normal calls.
285
286       - TARGET_ABICALLS && !TARGET_EXPLICIT_RELOCS.  call_insn_operand
287         accepts global constants, but "jr $25" is the only allowed
288         sibcall.  */
289
290 #define TARGET_SIBCALLS \
291   (!TARGET_MIPS16 && (!TARGET_ABICALLS || TARGET_EXPLICIT_RELOCS))
292
293 /* True if .gpword or .gpdword should be used for switch tables.
294    Not all SGI assemblers support this.  */
295
296 #define TARGET_GPWORD (TARGET_ABICALLS && (!TARGET_NEWABI || TARGET_GAS))
297
298                                         /* Generate mips16 code */
299 #define TARGET_MIPS16           (target_flags & MASK_MIPS16)
300
301 /* Generic ISA defines.  */
302 #define ISA_MIPS1                   (mips_isa == 1)
303 #define ISA_MIPS2                   (mips_isa == 2)
304 #define ISA_MIPS3                   (mips_isa == 3)
305 #define ISA_MIPS4                   (mips_isa == 4)
306 #define ISA_MIPS32                  (mips_isa == 32)
307 #define ISA_MIPS32R2                (mips_isa == 33)
308 #define ISA_MIPS64                  (mips_isa == 64)
309
310 /* Architecture target defines.  */
311 #define TARGET_MIPS3900             (mips_arch == PROCESSOR_R3900)
312 #define TARGET_MIPS4000             (mips_arch == PROCESSOR_R4000)
313 #define TARGET_MIPS4100             (mips_arch == PROCESSOR_R4100)
314 #define TARGET_MIPS4120             (mips_arch == PROCESSOR_R4120)
315 #define TARGET_MIPS4300             (mips_arch == PROCESSOR_R4300)
316 #define TARGET_MIPS4KC              (mips_arch == PROCESSOR_4KC)
317 #define TARGET_MIPS5KC              (mips_arch == PROCESSOR_5KC)
318 #define TARGET_MIPS5400             (mips_arch == PROCESSOR_R5400)
319 #define TARGET_MIPS5500             (mips_arch == PROCESSOR_R5500)
320 #define TARGET_MIPS7000             (mips_arch == PROCESSOR_R7000)
321 #define TARGET_MIPS9000             (mips_arch == PROCESSOR_R9000)
322 #define TARGET_SB1                  (mips_arch == PROCESSOR_SB1)
323 #define TARGET_SR71K                (mips_arch == PROCESSOR_SR71000)
324
325 /* Scheduling target defines.  */
326 #define TUNE_MIPS3000               (mips_tune == PROCESSOR_R3000)
327 #define TUNE_MIPS3900               (mips_tune == PROCESSOR_R3900)
328 #define TUNE_MIPS4000               (mips_tune == PROCESSOR_R4000)
329 #define TUNE_MIPS5000               (mips_tune == PROCESSOR_R5000)
330 #define TUNE_MIPS5400               (mips_tune == PROCESSOR_R5400)
331 #define TUNE_MIPS5500               (mips_tune == PROCESSOR_R5500)
332 #define TUNE_MIPS6000               (mips_tune == PROCESSOR_R6000)
333 #define TUNE_MIPS7000               (mips_tune == PROCESSOR_R7000)
334 #define TUNE_MIPS9000               (mips_tune == PROCESSOR_R9000)
335 #define TUNE_SB1                    (mips_tune == PROCESSOR_SB1)
336 #define TUNE_SR71K                  (mips_tune == PROCESSOR_SR71000)
337
338 #define TARGET_NEWABI               (mips_abi == ABI_N32 || mips_abi == ABI_64)
339
340 /* Define preprocessor macros for the -march and -mtune options.
341    PREFIX is either _MIPS_ARCH or _MIPS_TUNE, INFO is the selected
342    processor.  If INFO's canonical name is "foo", define PREFIX to
343    be "foo", and define an additional macro PREFIX_FOO.  */
344 #define MIPS_CPP_SET_PROCESSOR(PREFIX, INFO)                    \
345   do                                                            \
346     {                                                           \
347       char *macro, *p;                                          \
348                                                                 \
349       macro = concat ((PREFIX), "_", (INFO)->name, NULL);       \
350       for (p = macro; *p != 0; p++)                             \
351         *p = TOUPPER (*p);                                      \
352                                                                 \
353       builtin_define (macro);                                   \
354       builtin_define_with_value ((PREFIX), (INFO)->name, 1);    \
355       free (macro);                                             \
356     }                                                           \
357   while (0)
358
359 /* Target CPU builtins.  */
360 #define TARGET_CPU_CPP_BUILTINS()                               \
361   do                                                            \
362     {                                                           \
363       builtin_assert ("cpu=mips");                              \
364       builtin_define ("__mips__");                              \
365       builtin_define ("_mips");                                 \
366                                                                 \
367       /* We do this here because __mips is defined below        \
368          and so we can't use builtin_define_std.  */            \
369       if (!flag_iso)                                            \
370         builtin_define ("mips");                                \
371                                                                 \
372       /* Treat _R3000 and _R4000 like register-size defines,    \
373          which is how they've historically been used.  */       \
374       if (TARGET_64BIT)                                         \
375         {                                                       \
376           builtin_define ("__mips64");                          \
377           builtin_define_std ("R4000");                         \
378           builtin_define ("_R4000");                            \
379         }                                                       \
380       else                                                      \
381         {                                                       \
382           builtin_define_std ("R3000");                         \
383           builtin_define ("_R3000");                            \
384         }                                                       \
385       if (TARGET_FLOAT64)                                       \
386         builtin_define ("__mips_fpr=64");                       \
387       else                                                      \
388         builtin_define ("__mips_fpr=32");                       \
389                                                                 \
390       if (TARGET_MIPS16)                                        \
391         builtin_define ("__mips16");                            \
392                                                                 \
393       MIPS_CPP_SET_PROCESSOR ("_MIPS_ARCH", mips_arch_info);    \
394       MIPS_CPP_SET_PROCESSOR ("_MIPS_TUNE", mips_tune_info);    \
395                                                                 \
396       if (ISA_MIPS1)                                            \
397         {                                                       \
398           builtin_define ("__mips=1");                          \
399           builtin_define ("_MIPS_ISA=_MIPS_ISA_MIPS1");         \
400         }                                                       \
401       else if (ISA_MIPS2)                                       \
402         {                                                       \
403           builtin_define ("__mips=2");                          \
404           builtin_define ("_MIPS_ISA=_MIPS_ISA_MIPS2");         \
405         }                                                       \
406       else if (ISA_MIPS3)                                       \
407         {                                                       \
408           builtin_define ("__mips=3");                          \
409           builtin_define ("_MIPS_ISA=_MIPS_ISA_MIPS3");         \
410         }                                                       \
411       else if (ISA_MIPS4)                                       \
412         {                                                       \
413           builtin_define ("__mips=4");                          \
414           builtin_define ("_MIPS_ISA=_MIPS_ISA_MIPS4");         \
415         }                                                       \
416       else if (ISA_MIPS32)                                      \
417         {                                                       \
418           builtin_define ("__mips=32");                         \
419           builtin_define ("__mips_isa_rev=1");                  \
420           builtin_define ("_MIPS_ISA=_MIPS_ISA_MIPS32");        \
421         }                                                       \
422       else if (ISA_MIPS32R2)                                    \
423         {                                                       \
424           builtin_define ("__mips=32");                         \
425           builtin_define ("__mips_isa_rev=2");                  \
426           builtin_define ("_MIPS_ISA=_MIPS_ISA_MIPS32");        \
427         }                                                       \
428       else if (ISA_MIPS64)                                      \
429         {                                                       \
430           builtin_define ("__mips=64");                         \
431           builtin_define ("__mips_isa_rev=1");                  \
432           builtin_define ("_MIPS_ISA=_MIPS_ISA_MIPS64");        \
433         }                                                       \
434                                                                 \
435       if (TARGET_HARD_FLOAT)                                    \
436         builtin_define ("__mips_hard_float");                   \
437       else if (TARGET_SOFT_FLOAT)                               \
438         builtin_define ("__mips_soft_float");                   \
439                                                                 \
440       if (TARGET_SINGLE_FLOAT)                                  \
441         builtin_define ("__mips_single_float");         \
442                                                                 \
443       if (TARGET_BIG_ENDIAN)                                    \
444         {                                                       \
445           builtin_define_std ("MIPSEB");                        \
446           builtin_define ("_MIPSEB");                           \
447         }                                                       \
448       else                                                      \
449         {                                                       \
450           builtin_define_std ("MIPSEL");                        \
451           builtin_define ("_MIPSEL");                           \
452         }                                                       \
453                                                                 \
454         /* Macros dependent on the C dialect.  */               \
455       if (preprocessing_asm_p ())                               \
456         {                                                       \
457           builtin_define_std ("LANGUAGE_ASSEMBLY");             \
458           builtin_define ("_LANGUAGE_ASSEMBLY");                \
459         }                                                       \
460       else if (c_dialect_cxx ())                                \
461         {                                                       \
462           builtin_define ("_LANGUAGE_C_PLUS_PLUS");             \
463           builtin_define ("__LANGUAGE_C_PLUS_PLUS");            \
464           builtin_define ("__LANGUAGE_C_PLUS_PLUS__");          \
465         }                                                       \
466       else                                                      \
467         {                                                       \
468           builtin_define_std ("LANGUAGE_C");                    \
469           builtin_define ("_LANGUAGE_C");                       \
470         }                                                       \
471       if (c_dialect_objc ())                                    \
472         {                                                       \
473           builtin_define ("_LANGUAGE_OBJECTIVE_C");             \
474           builtin_define ("__LANGUAGE_OBJECTIVE_C");            \
475           /* Bizzare, but needed at least for Irix.  */         \
476           builtin_define_std ("LANGUAGE_C");                    \
477           builtin_define ("_LANGUAGE_C");                       \
478         }                                                       \
479                                                                 \
480       if (mips_abi == ABI_EABI)                                 \
481         builtin_define ("__mips_eabi");                         \
482                                                                 \
483 } while (0)
484
485
486
487 /* Macro to define tables used to set the flags.
488    This is a list in braces of pairs in braces,
489    each pair being { "NAME", VALUE }
490    where VALUE is the bits to set or minus the bits to clear.
491    An empty string NAME is used to identify the default VALUE.  */
492
493 #define TARGET_SWITCHES                                                 \
494 {                                                                       \
495   SUBTARGET_TARGET_SWITCHES                                             \
496   {"int64",               MASK_INT64 | MASK_LONG64,                     \
497      N_("Use 64-bit int type")},                                        \
498   {"long64",              MASK_LONG64,                                  \
499      N_("Use 64-bit long type")},                                       \
500   {"long32",             -(MASK_LONG64 | MASK_INT64),                   \
501      N_("Use 32-bit long type")},                                       \
502   {"split-addresses",     MASK_SPLIT_ADDR,                              \
503      N_("Optimize lui/addiu address loads")},                           \
504   {"no-split-addresses", -MASK_SPLIT_ADDR,                              \
505      N_("Don't optimize lui/addiu address loads")},                     \
506   {"mips-as",            -MASK_GAS,                                     \
507      N_("Use MIPS as")},                                                \
508   {"gas",                 MASK_GAS,                                     \
509      N_("Use GNU as")},                                                 \
510   {"rnames",              MASK_NAME_REGS,                               \
511      N_("Use symbolic register names")},                                \
512   {"no-rnames",          -MASK_NAME_REGS,                               \
513      N_("Don't use symbolic register names")},                          \
514   {"gpOPT",               0,                                            \
515      N_("Use GP relative sdata/sbss sections (now ignored)")},          \
516   {"gpopt",               0,                                            \
517      N_("Use GP relative sdata/sbss sections (now ignored)")},          \
518   {"no-gpOPT",            0,                                            \
519      N_("Don't use GP relative sdata/sbss sections (now ignored)")},    \
520   {"no-gpopt",            0,                                            \
521      N_("Don't use GP relative sdata/sbss sections (now ignored)")},    \
522   {"stats",               0,                                            \
523      N_("Output compiler statistics (now ignored)")},                   \
524   {"no-stats",            0,                                            \
525      N_("Don't output compiler statistics")},                           \
526   {"memcpy",              MASK_MEMCPY,                                  \
527      N_("Don't optimize block moves")},                                 \
528   {"no-memcpy",          -MASK_MEMCPY,                                  \
529      N_("Optimize block moves")},                                       \
530   {"mips-tfile",          MASK_MIPS_TFILE,                              \
531      N_("Use mips-tfile asm postpass")},                                \
532   {"no-mips-tfile",      -MASK_MIPS_TFILE,                              \
533      N_("Don't use mips-tfile asm postpass")},                          \
534   {"soft-float",          MASK_SOFT_FLOAT,                              \
535      N_("Use software floating point")},                                \
536   {"hard-float",         -MASK_SOFT_FLOAT,                              \
537      N_("Use hardware floating point")},                                \
538   {"fp64",                MASK_FLOAT64,                                 \
539      N_("Use 64-bit FP registers")},                                    \
540   {"fp32",               -MASK_FLOAT64,                                 \
541      N_("Use 32-bit FP registers")},                                    \
542   {"gp64",                MASK_64BIT,                                   \
543      N_("Use 64-bit general registers")},                               \
544   {"gp32",               -MASK_64BIT,                                   \
545      N_("Use 32-bit general registers")},                               \
546   {"abicalls",            MASK_ABICALLS,                                \
547      N_("Use Irix PIC")},                                               \
548   {"no-abicalls",        -MASK_ABICALLS,                                \
549      N_("Don't use Irix PIC")},                                         \
550   {"long-calls",          MASK_LONG_CALLS,                              \
551      N_("Use indirect calls")},                                         \
552   {"no-long-calls",      -MASK_LONG_CALLS,                              \
553      N_("Don't use indirect calls")},                                   \
554   {"embedded-pic",        MASK_EMBEDDED_PIC,                            \
555      N_("Use embedded PIC")},                                           \
556   {"no-embedded-pic",    -MASK_EMBEDDED_PIC,                            \
557      N_("Don't use embedded PIC")},                                     \
558   {"embedded-data",       MASK_EMBEDDED_DATA,                           \
559      N_("Use ROM instead of RAM")},                                     \
560   {"no-embedded-data",   -MASK_EMBEDDED_DATA,                           \
561      N_("Don't use ROM instead of RAM")},                               \
562   {"uninit-const-in-rodata", MASK_UNINIT_CONST_IN_RODATA,               \
563      N_("Put uninitialized constants in ROM (needs -membedded-data)")}, \
564   {"no-uninit-const-in-rodata", -MASK_UNINIT_CONST_IN_RODATA,           \
565      N_("Don't put uninitialized constants in ROM")},                   \
566   {"eb",                  MASK_BIG_ENDIAN,                              \
567      N_("Use big-endian byte order")},                                  \
568   {"el",                 -MASK_BIG_ENDIAN,                              \
569      N_("Use little-endian byte order")},                               \
570   {"single-float",        MASK_SINGLE_FLOAT,                            \
571      N_("Use single (32-bit) FP only")},                                \
572   {"double-float",       -MASK_SINGLE_FLOAT,                            \
573      N_("Don't use single (32-bit) FP only")},                          \
574   {"mad",                 MASK_MAD,                                     \
575      N_("Use multiply accumulate")},                                    \
576   {"no-mad",             -MASK_MAD,                                     \
577      N_("Don't use multiply accumulate")},                              \
578   {"no-fused-madd",       MASK_NO_FUSED_MADD,                           \
579      N_("Don't generate fused multiply/add instructions")},             \
580   {"fused-madd",         -MASK_NO_FUSED_MADD,                           \
581      N_("Generate fused multiply/add instructions")},                   \
582   {"fix4300",             MASK_4300_MUL_FIX,                            \
583      N_("Work around early 4300 hardware bug")},                        \
584   {"no-fix4300",         -MASK_4300_MUL_FIX,                            \
585      N_("Don't work around early 4300 hardware bug")},                  \
586   {"fix-sb1",             MASK_FIX_SB1,                                 \
587      N_("Work around errata for early SB-1 revision 2 cores")},         \
588   {"no-fix-sb1",         -MASK_FIX_SB1,                                 \
589      N_("Don't work around errata for early SB-1 revision 2 cores")},   \
590   {"check-zero-division",-MASK_NO_CHECK_ZERO_DIV,                       \
591      N_("Trap on integer divide by zero")},                             \
592   {"no-check-zero-division", MASK_NO_CHECK_ZERO_DIV,                    \
593      N_("Don't trap on integer divide by zero")},                       \
594   { "branch-likely",      MASK_BRANCHLIKELY,                            \
595       N_("Use Branch Likely instructions, overriding default for arch")}, \
596   { "no-branch-likely",  -MASK_BRANCHLIKELY,                            \
597       N_("Don't use Branch Likely instructions, overriding default for arch")}, \
598   {"explicit-relocs",     MASK_EXPLICIT_RELOCS,                         \
599      N_("Use NewABI-style %reloc() assembly operators")},               \
600   {"no-explicit-relocs", -MASK_EXPLICIT_RELOCS,                         \
601      N_("Use assembler macros instead of relocation operators")},       \
602   {"ips16",               MASK_MIPS16,                                  \
603      N_("Generate mips16 code") },                                      \
604   {"no-mips16",          -MASK_MIPS16,                                  \
605      N_("Generate normal-mode code") },                                 \
606   {"xgot",                MASK_XGOT,                                    \
607      N_("Lift restrictions on GOT size") },                             \
608   {"no-xgot",            -MASK_XGOT,                                    \
609      N_("Do not lift restrictions on GOT size") },                      \
610   {"debug",               MASK_DEBUG,                                   \
611      NULL},                                                             \
612   {"debuga",              MASK_DEBUG_A,                                 \
613      NULL},                                                             \
614   {"debugb",              MASK_DEBUG_B,                                 \
615      NULL},                                                             \
616   {"debugc",              MASK_DEBUG_C,                                 \
617      NULL},                                                             \
618   {"debugd",              MASK_DEBUG_D,                                 \
619      NULL},                                                             \
620   {"debuge",              MASK_DEBUG_E,                                 \
621      NULL},                                                             \
622   {"debugf",              MASK_DEBUG_F,                                 \
623      NULL},                                                             \
624   {"debugg",              MASK_DEBUG_G,                                 \
625      NULL},                                                             \
626   {"debugi",              MASK_DEBUG_I,                                 \
627      NULL},                                                             \
628   {"",                    (TARGET_DEFAULT                               \
629                            | TARGET_CPU_DEFAULT                         \
630                            | TARGET_ENDIAN_DEFAULT),                    \
631      NULL},                                                             \
632 }
633
634 /* Default target_flags if no switches are specified  */
635
636 #ifndef TARGET_DEFAULT
637 #define TARGET_DEFAULT 0
638 #endif
639
640 #ifndef TARGET_CPU_DEFAULT
641 #define TARGET_CPU_DEFAULT 0
642 #endif
643
644 #ifndef TARGET_ENDIAN_DEFAULT
645 #define TARGET_ENDIAN_DEFAULT MASK_BIG_ENDIAN
646 #endif
647
648 /* 'from-abi' makes a good default: you get whatever the ABI requires.  */
649 #ifndef MIPS_ISA_DEFAULT
650 #ifndef MIPS_CPU_STRING_DEFAULT
651 #define MIPS_CPU_STRING_DEFAULT "from-abi"
652 #endif
653 #endif
654
655 #ifdef IN_LIBGCC2
656 #undef TARGET_64BIT
657 /* Make this compile time constant for libgcc2 */
658 #ifdef __mips64
659 #define TARGET_64BIT            1
660 #else
661 #define TARGET_64BIT            0
662 #endif
663 #endif /* IN_LIBGCC2 */
664
665 #ifndef MULTILIB_ENDIAN_DEFAULT
666 #if TARGET_ENDIAN_DEFAULT == 0
667 #define MULTILIB_ENDIAN_DEFAULT "EL"
668 #else
669 #define MULTILIB_ENDIAN_DEFAULT "EB"
670 #endif
671 #endif
672
673 #ifndef MULTILIB_ISA_DEFAULT
674 #  if MIPS_ISA_DEFAULT == 1
675 #    define MULTILIB_ISA_DEFAULT "mips1"
676 #  else
677 #    if MIPS_ISA_DEFAULT == 2
678 #      define MULTILIB_ISA_DEFAULT "mips2"
679 #    else
680 #      if MIPS_ISA_DEFAULT == 3
681 #        define MULTILIB_ISA_DEFAULT "mips3"
682 #      else
683 #        if MIPS_ISA_DEFAULT == 4
684 #          define MULTILIB_ISA_DEFAULT "mips4"
685 #        else
686 #          if MIPS_ISA_DEFAULT == 32
687 #            define MULTILIB_ISA_DEFAULT "mips32"
688 #          else
689 #            if MIPS_ISA_DEFAULT == 33
690 #              define MULTILIB_ISA_DEFAULT "mips32r2"
691 #            else
692 #              if MIPS_ISA_DEFAULT == 64
693 #                define MULTILIB_ISA_DEFAULT "mips64"
694 #              else
695 #                define MULTILIB_ISA_DEFAULT "mips1"
696 #              endif
697 #            endif
698 #          endif
699 #        endif
700 #      endif
701 #    endif
702 #  endif
703 #endif
704
705 #ifndef MULTILIB_DEFAULTS
706 #define MULTILIB_DEFAULTS \
707     { MULTILIB_ENDIAN_DEFAULT, MULTILIB_ISA_DEFAULT, MULTILIB_ABI_DEFAULT }
708 #endif
709
710 /* We must pass -EL to the linker by default for little endian embedded
711    targets using linker scripts with a OUTPUT_FORMAT line.  Otherwise, the
712    linker will default to using big-endian output files.  The OUTPUT_FORMAT
713    line must be in the linker script, otherwise -EB/-EL will not work.  */
714
715 #ifndef ENDIAN_SPEC
716 #if TARGET_ENDIAN_DEFAULT == 0
717 #define ENDIAN_SPEC "%{!EB:%{!meb:-EL}} %{EB|meb:-EB}"
718 #else
719 #define ENDIAN_SPEC "%{!EL:%{!mel:-EB}} %{EL|mel:-EL}"
720 #endif
721 #endif
722
723 #define TARGET_OPTIONS                                                  \
724 {                                                                       \
725   SUBTARGET_TARGET_OPTIONS                                              \
726   { "tune=",    &mips_tune_string,                                      \
727       N_("Specify CPU for scheduling purposes"), 0},                    \
728   { "arch=",    &mips_arch_string,                                      \
729       N_("Specify CPU for code generation purposes"), 0},               \
730   { "abi=", &mips_abi_string,                                           \
731       N_("Specify an ABI"), 0},                                         \
732   { "ips",      &mips_isa_string,                                       \
733       N_("Specify a Standard MIPS ISA"), 0},                            \
734   { "entry",    &mips_entry_string,                                     \
735       N_("Use mips16 entry/exit psuedo ops"), 0},                       \
736   { "no-flush-func", &mips_cache_flush_func,                            \
737       N_("Don't call any cache flush functions"), 0},                   \
738   { "flush-func=", &mips_cache_flush_func,                              \
739       N_("Specify cache flush function"), 0},                           \
740 }
741
742 /* This is meant to be redefined in the host dependent files.  */
743 #define SUBTARGET_TARGET_OPTIONS
744
745 /* Support for a compile-time default CPU, et cetera.  The rules are:
746    --with-arch is ignored if -march is specified or a -mips is specified
747      (other than -mips16).
748    --with-tune is ignored if -mtune is specified.
749    --with-abi is ignored if -mabi is specified.
750    --with-float is ignored if -mhard-float or -msoft-float are
751      specified.  */
752 #define OPTION_DEFAULT_SPECS \
753   {"arch", "%{!march=*:%{mips16:-march=%(VALUE)}%{!mips*:-march=%(VALUE)}}" }, \
754   {"tune", "%{!mtune=*:-mtune=%(VALUE)}" }, \
755   {"abi", "%{!mabi=*:-mabi=%(VALUE)}" }, \
756   {"float", "%{!msoft-float:%{!mhard-float:-m%(VALUE)-float}}" }
757
758
759 #define GENERATE_BRANCHLIKELY   (TARGET_BRANCHLIKELY                    \
760                                  && !TARGET_SR71K                       \
761                                  && !TARGET_MIPS16)
762
763 /* Generate three-operand multiply instructions for SImode.  */
764 #define GENERATE_MULT3_SI       ((TARGET_MIPS3900                       \
765                                   || TARGET_MIPS5400                    \
766                                   || TARGET_MIPS5500                    \
767                                   || TARGET_MIPS7000                    \
768                                   || TARGET_MIPS9000                    \
769                                   || ISA_MIPS32                         \
770                                   || ISA_MIPS32R2                       \
771                                   || ISA_MIPS64)                        \
772                                  && !TARGET_MIPS16)
773
774 /* Generate three-operand multiply instructions for DImode.  */
775 #define GENERATE_MULT3_DI       ((TARGET_MIPS3900)                      \
776                                  && !TARGET_MIPS16)
777
778 /* Macros to decide whether certain features are available or not,
779    depending on the instruction set architecture level.  */
780
781 #define HAVE_SQRT_P()           (!ISA_MIPS1)
782
783 /* True if the ABI can only work with 64-bit integer registers.  We
784    generally allow ad-hoc variations for TARGET_SINGLE_FLOAT, but
785    otherwise floating-point registers must also be 64-bit.  */
786 #define ABI_NEEDS_64BIT_REGS    (mips_abi == ABI_64                     \
787                                  || mips_abi == ABI_O64                 \
788                                  || mips_abi == ABI_N32)
789
790 /* Likewise for 32-bit regs.  */
791 #define ABI_NEEDS_32BIT_REGS    (mips_abi == ABI_32)
792
793 /* True if symbols are 64 bits wide.  At present, n64 is the only
794    ABI for which this is true.  */
795 #define ABI_HAS_64BIT_SYMBOLS   (mips_abi == ABI_64)
796
797 /* ISA has instructions for managing 64 bit fp and gp regs (eg. mips3).  */
798 #define ISA_HAS_64BIT_REGS      (ISA_MIPS3                              \
799                                  || ISA_MIPS4                           \
800                                  || ISA_MIPS64)
801
802 /* ISA has branch likely instructions (eg. mips2).  */
803 /* Disable branchlikely for tx39 until compare rewrite.  They haven't
804    been generated up to this point.  */
805 #define ISA_HAS_BRANCHLIKELY    (!ISA_MIPS1                             \
806                                  && !TARGET_MIPS5500)
807
808 /* ISA has the conditional move instructions introduced in mips4.  */
809 #define ISA_HAS_CONDMOVE        ((ISA_MIPS4                             \
810                                   || ISA_MIPS32                         \
811                                   || ISA_MIPS32R2                       \
812                                   || ISA_MIPS64)                        \
813                                  && !TARGET_MIPS5500                    \
814                                  && !TARGET_MIPS16)
815
816 /* ISA has just the integer condition move instructions (movn,movz) */
817 #define ISA_HAS_INT_CONDMOVE     0
818
819 /* ISA has the mips4 FP condition code instructions: FP-compare to CC,
820    branch on CC, and move (both FP and non-FP) on CC.  */
821 #define ISA_HAS_8CC             (ISA_MIPS4                              \
822                                  || ISA_MIPS32                          \
823                                  || ISA_MIPS32R2                        \
824                                  || ISA_MIPS64)
825
826 /* This is a catch all for other mips4 instructions: indexed load, the
827    FP madd and msub instructions, and the FP recip and recip sqrt
828    instructions.  */
829 #define ISA_HAS_FP4             ((ISA_MIPS4                             \
830                                   || ISA_MIPS64)                        \
831                                  && !TARGET_MIPS16)
832
833 /* ISA has conditional trap instructions.  */
834 #define ISA_HAS_COND_TRAP       (!ISA_MIPS1                             \
835                                  && !TARGET_MIPS16)
836
837 /* ISA has integer multiply-accumulate instructions, madd and msub.  */
838 #define ISA_HAS_MADD_MSUB       ((ISA_MIPS32                            \
839                                   || ISA_MIPS32R2                       \
840                                   || ISA_MIPS64                         \
841                                   ) && !TARGET_MIPS16)
842
843 /* ISA has floating-point nmadd and nmsub instructions.  */
844 #define ISA_HAS_NMADD_NMSUB     ((ISA_MIPS4                             \
845                                   || ISA_MIPS64)                        \
846                                  && (!TARGET_MIPS5400 || TARGET_MAD)    \
847                                  && ! TARGET_MIPS16)
848
849 /* ISA has count leading zeroes/ones instruction (not implemented).  */
850 #define ISA_HAS_CLZ_CLO         ((ISA_MIPS32                            \
851                                   || ISA_MIPS32R2                       \
852                                   || ISA_MIPS64                         \
853                                  ) && !TARGET_MIPS16)
854
855 /* ISA has double-word count leading zeroes/ones instruction (not
856    implemented).  */
857 #define ISA_HAS_DCLZ_DCLO       (ISA_MIPS64                             \
858                                  && !TARGET_MIPS16)
859
860 /* ISA has three operand multiply instructions that put
861    the high part in an accumulator: mulhi or mulhiu.  */
862 #define ISA_HAS_MULHI           (TARGET_MIPS5400                        \
863                                  || TARGET_MIPS5500                     \
864                                  || TARGET_SR71K                        \
865                                  )
866
867 /* ISA has three operand multiply instructions that
868    negates the result and puts the result in an accumulator.  */
869 #define ISA_HAS_MULS            (TARGET_MIPS5400                        \
870                                  || TARGET_MIPS5500                     \
871                                  || TARGET_SR71K                        \
872                                  )
873
874 /* ISA has three operand multiply instructions that subtracts the
875    result from a 4th operand and puts the result in an accumulator.  */
876 #define ISA_HAS_MSAC            (TARGET_MIPS5400                        \
877                                  || TARGET_MIPS5500                     \
878                                  || TARGET_SR71K                        \
879                                  )
880 /* ISA has three operand multiply instructions that  the result
881    from a 4th operand and puts the result in an accumulator.  */
882 #define ISA_HAS_MACC            ((TARGET_MIPS4120 && !TARGET_MIPS16)    \
883                                  || TARGET_MIPS5400                     \
884                                  || TARGET_MIPS5500                     \
885                                  || TARGET_SR71K                        \
886                                  )
887
888 /* ISA has 32-bit rotate right instruction.  */
889 #define ISA_HAS_ROTR_SI         (!TARGET_MIPS16                         \
890                                  && (ISA_MIPS32R2                       \
891                                      || TARGET_MIPS5400                 \
892                                      || TARGET_MIPS5500                 \
893                                      || TARGET_SR71K                    \
894                                      ))
895
896 /* ISA has 64-bit rotate right instruction.  */
897 #define ISA_HAS_ROTR_DI         (TARGET_64BIT                           \
898                                  && !TARGET_MIPS16                      \
899                                  && (TARGET_MIPS5400                    \
900                                      || TARGET_MIPS5500                 \
901                                      || TARGET_SR71K                    \
902                                      ))
903
904 /* ISA has data prefetch instructions.  This controls use of 'pref'.  */
905 #define ISA_HAS_PREFETCH        ((ISA_MIPS4                             \
906                                   || ISA_MIPS32                         \
907                                   || ISA_MIPS32R2                       \
908                                   || ISA_MIPS64)                        \
909                                  && !TARGET_MIPS16)
910
911 /* ISA has data indexed prefetch instructions.  This controls use of
912    'prefx', along with TARGET_HARD_FLOAT and TARGET_DOUBLE_FLOAT.
913    (prefx is a cop1x instruction, so can only be used if FP is
914    enabled.)  */
915 #define ISA_HAS_PREFETCHX       ((ISA_MIPS4                             \
916                                   || ISA_MIPS64)                        \
917                                  && !TARGET_MIPS16)
918
919 /* True if trunc.w.s and trunc.w.d are real (not synthetic)
920    instructions.  Both require TARGET_HARD_FLOAT, and trunc.w.d
921    also requires TARGET_DOUBLE_FLOAT.  */
922 #define ISA_HAS_TRUNC_W         (!ISA_MIPS1)
923
924 /* ISA includes the MIPS32r2 seb and seh instructions.  */
925 #define ISA_HAS_SEB_SEH         (!TARGET_MIPS16                        \
926                                  && (ISA_MIPS32R2                      \
927                                      ))
928
929 /* True if the result of a load is not available to the next instruction.
930    A nop will then be needed between instructions like "lw $4,..."
931    and "addiu $4,$4,1".  */
932 #define ISA_HAS_LOAD_DELAY      (mips_isa == 1                          \
933                                  && !TARGET_MIPS3900                    \
934                                  && !TARGET_MIPS16)
935
936 /* Likewise mtc1 and mfc1.  */
937 #define ISA_HAS_XFER_DELAY      (mips_isa <= 3)
938
939 /* Likewise floating-point comparisons.  */
940 #define ISA_HAS_FCMP_DELAY      (mips_isa <= 3)
941
942 /* True if mflo and mfhi can be immediately followed by instructions
943    which write to the HI and LO registers.  Most targets require a
944    two-instruction gap.  */
945 #define ISA_HAS_HILO_INTERLOCKS (TARGET_MIPS5500 || TARGET_SB1)
946 \f
947 /* Add -G xx support.  */
948
949 #undef  SWITCH_TAKES_ARG
950 #define SWITCH_TAKES_ARG(CHAR)                                          \
951   (DEFAULT_SWITCH_TAKES_ARG (CHAR) || (CHAR) == 'G')
952
953 #define OVERRIDE_OPTIONS override_options ()
954
955 #define CONDITIONAL_REGISTER_USAGE mips_conditional_register_usage ()
956
957 /* Show we can debug even without a frame pointer.  */
958 #define CAN_DEBUG_WITHOUT_FP
959 \f
960 /* Tell collect what flags to pass to nm.  */
961 #ifndef NM_FLAGS
962 #define NM_FLAGS "-Bn"
963 #endif
964
965 \f
966 /* Assembler specs.  */
967
968 /* MIPS_AS_ASM_SPEC is passed when using the MIPS assembler rather
969    than gas.  */
970
971 #define MIPS_AS_ASM_SPEC "\
972 %{!.s:-nocpp} %{.s: %{cpp} %{nocpp}} \
973 %{pipe: %e-pipe is not supported} \
974 %{K} %(subtarget_mips_as_asm_spec)"
975
976 /* SUBTARGET_MIPS_AS_ASM_SPEC is passed when using the MIPS assembler
977    rather than gas.  It may be overridden by subtargets.  */
978
979 #ifndef SUBTARGET_MIPS_AS_ASM_SPEC
980 #define SUBTARGET_MIPS_AS_ASM_SPEC "%{v}"
981 #endif
982
983 /* GAS_ASM_SPEC is passed when using gas, rather than the MIPS
984    assembler.  */
985
986 #define GAS_ASM_SPEC "%{mtune=*} %{v}"
987
988 #define SUBTARGET_TARGET_SWITCHES
989
990 #ifndef MIPS_ABI_DEFAULT
991 #define MIPS_ABI_DEFAULT ABI_32
992 #endif
993
994 /* Use the most portable ABI flag for the ASM specs.  */
995
996 #if MIPS_ABI_DEFAULT == ABI_32
997 #define MULTILIB_ABI_DEFAULT "mabi=32"
998 #define ASM_ABI_DEFAULT_SPEC "-32"
999 #endif
1000
1001 #if MIPS_ABI_DEFAULT == ABI_O64
1002 #define MULTILIB_ABI_DEFAULT "mabi=o64"
1003 #define ASM_ABI_DEFAULT_SPEC "-mabi=o64"
1004 #endif
1005
1006 #if MIPS_ABI_DEFAULT == ABI_N32
1007 #define MULTILIB_ABI_DEFAULT "mabi=n32"
1008 #define ASM_ABI_DEFAULT_SPEC "-n32"
1009 #endif
1010
1011 #if MIPS_ABI_DEFAULT == ABI_64
1012 #define MULTILIB_ABI_DEFAULT "mabi=64"
1013 #define ASM_ABI_DEFAULT_SPEC "-64"
1014 #endif
1015
1016 #if MIPS_ABI_DEFAULT == ABI_EABI
1017 #define MULTILIB_ABI_DEFAULT "mabi=eabi"
1018 #define ASM_ABI_DEFAULT_SPEC "-mabi=eabi"
1019 #endif
1020
1021 /* Only ELF targets can switch the ABI.  */
1022 #ifndef OBJECT_FORMAT_ELF
1023 #undef ASM_ABI_DEFAULT_SPEC
1024 #define ASM_ABI_DEFAULT_SPEC ""
1025 #endif
1026
1027 /* TARGET_ASM_SPEC is used to select either MIPS_AS_ASM_SPEC or
1028    GAS_ASM_SPEC as the default, depending upon the value of
1029    TARGET_DEFAULT.  */
1030
1031 #if ((TARGET_CPU_DEFAULT | TARGET_DEFAULT) & MASK_GAS) != 0
1032 /* GAS */
1033
1034 #define TARGET_ASM_SPEC "\
1035 %{mmips-as: %(mips_as_asm_spec)} \
1036 %{!mmips-as: %(gas_asm_spec)}"
1037
1038 #else /* not GAS */
1039
1040 #define TARGET_ASM_SPEC "\
1041 %{!mgas: %(mips_as_asm_spec)} \
1042 %{mgas: %(gas_asm_spec)}"
1043
1044 #endif /* not GAS */
1045
1046 /* SUBTARGET_ASM_OPTIMIZING_SPEC handles passing optimization options
1047    to the assembler.  It may be overridden by subtargets.  */
1048 #ifndef SUBTARGET_ASM_OPTIMIZING_SPEC
1049 #define SUBTARGET_ASM_OPTIMIZING_SPEC "\
1050 %{noasmopt:-O0} \
1051 %{!noasmopt:%{O:-O2} %{O1:-O2} %{O2:-O2} %{O3:-O3}}"
1052 #endif
1053
1054 /* SUBTARGET_ASM_DEBUGGING_SPEC handles passing debugging options to
1055    the assembler.  It may be overridden by subtargets.  */
1056 #ifndef SUBTARGET_ASM_DEBUGGING_SPEC
1057 #define SUBTARGET_ASM_DEBUGGING_SPEC "\
1058 %{g} %{g0} %{g1} %{g2} %{g3} \
1059 %{ggdb:-g} %{ggdb0:-g0} %{ggdb1:-g1} %{ggdb2:-g2} %{ggdb3:-g3} \
1060 %{gstabs:-g} %{gstabs0:-g0} %{gstabs1:-g1} %{gstabs2:-g2} %{gstabs3:-g3} \
1061 %{gstabs+:-g} %{gstabs+0:-g0} %{gstabs+1:-g1} %{gstabs+2:-g2} %{gstabs+3:-g3} \
1062 %{gcoff:-g} %{gcoff0:-g0} %{gcoff1:-g1} %{gcoff2:-g2} %{gcoff3:-g3} \
1063 %(mdebug_asm_spec)"
1064 #endif
1065
1066 /* Beginning with gas 2.13, -mdebug must be passed to correctly handle COFF
1067    and stabs debugging info.  */
1068 #if ((TARGET_CPU_DEFAULT | TARGET_DEFAULT) & MASK_GAS) != 0
1069 /* GAS */
1070 #define MDEBUG_ASM_SPEC "%{!gdwarf*:-mdebug} %{gdwarf*:-no-mdebug}"
1071 #else /* not GAS */
1072 #define MDEBUG_ASM_SPEC ""
1073 #endif /* not GAS */
1074
1075 /* SUBTARGET_ASM_SPEC is always passed to the assembler.  It may be
1076    overridden by subtargets.  */
1077
1078 #ifndef SUBTARGET_ASM_SPEC
1079 #define SUBTARGET_ASM_SPEC ""
1080 #endif
1081
1082 /* ASM_SPEC is the set of arguments to pass to the assembler.  Note: we
1083    pass -mgp32, -mgp64, -march, -mabi=eabi and -meabi=o64 regardless of
1084    whether we're using GAS.  These options can only be used properly
1085    with GAS, and it is better to get an error from a non-GAS assembler
1086    than to silently generate bad code.  */
1087
1088 #undef ASM_SPEC
1089 #define ASM_SPEC "\
1090 %{G*} %(endian_spec) %{mips1} %{mips2} %{mips3} %{mips4} \
1091 %{mips32} %{mips32r2} %{mips64} \
1092 %{mips16:%{!mno-mips16:-mips16}} %{mno-mips16:-no-mips16} \
1093 %(subtarget_asm_optimizing_spec) \
1094 %(subtarget_asm_debugging_spec) \
1095 %{membedded-pic} \
1096 %{mabi=32:-32}%{mabi=n32:-n32}%{mabi=64:-64}%{mabi=n64:-64} \
1097 %{mabi=eabi} %{mabi=o64} %{!mabi*: %(asm_abi_default_spec)} \
1098 %{mgp32} %{mgp64} %{march=*} %{mxgot:-xgot} \
1099 %(target_asm_spec) \
1100 %(subtarget_asm_spec)"
1101
1102 /* Extra switches sometimes passed to the linker.  */
1103 /* ??? The bestGnum will never be passed to the linker, because the gcc driver
1104   will interpret it as a -b option.  */
1105
1106 #ifndef LINK_SPEC
1107 #define LINK_SPEC "\
1108 %(endian_spec) \
1109 %{G*} %{mips1} %{mips2} %{mips3} %{mips4} %{mips32} %{mips32r2} %{mips64} \
1110 %{bestGnum} %{shared} %{non_shared}"
1111 #endif  /* LINK_SPEC defined */
1112
1113
1114 /* Specs for the compiler proper */
1115
1116 /* SUBTARGET_CC1_SPEC is passed to the compiler proper.  It may be
1117    overridden by subtargets.  */
1118 #ifndef SUBTARGET_CC1_SPEC
1119 #define SUBTARGET_CC1_SPEC ""
1120 #endif
1121
1122 /* CC1_SPEC is the set of arguments to pass to the compiler proper.  */
1123
1124 #ifndef CC1_SPEC
1125 #define CC1_SPEC "\
1126 %{gline:%{!g:%{!g0:%{!g1:%{!g2: -g1}}}}} \
1127 %{G*} %{EB:-meb} %{EL:-mel} %{EB:%{EL:%emay not use both -EB and -EL}} \
1128 %{save-temps: } \
1129 %(subtarget_cc1_spec)"
1130 #endif
1131
1132 /* Preprocessor specs.  */
1133
1134 /* SUBTARGET_CPP_SPEC is passed to the preprocessor.  It may be
1135    overridden by subtargets.  */
1136 #ifndef SUBTARGET_CPP_SPEC
1137 #define SUBTARGET_CPP_SPEC ""
1138 #endif
1139
1140 #define CPP_SPEC "%(subtarget_cpp_spec)"
1141
1142 /* This macro defines names of additional specifications to put in the specs
1143    that can be used in various specifications like CC1_SPEC.  Its definition
1144    is an initializer with a subgrouping for each command option.
1145
1146    Each subgrouping contains a string constant, that defines the
1147    specification name, and a string constant that used by the GCC driver
1148    program.
1149
1150    Do not define this macro if it does not need to do anything.  */
1151
1152 #define EXTRA_SPECS                                                     \
1153   { "subtarget_cc1_spec", SUBTARGET_CC1_SPEC },                         \
1154   { "subtarget_cpp_spec", SUBTARGET_CPP_SPEC },                         \
1155   { "mips_as_asm_spec", MIPS_AS_ASM_SPEC },                             \
1156   { "gas_asm_spec", GAS_ASM_SPEC },                                     \
1157   { "target_asm_spec", TARGET_ASM_SPEC },                               \
1158   { "subtarget_mips_as_asm_spec", SUBTARGET_MIPS_AS_ASM_SPEC },         \
1159   { "subtarget_asm_optimizing_spec", SUBTARGET_ASM_OPTIMIZING_SPEC },   \
1160   { "subtarget_asm_debugging_spec", SUBTARGET_ASM_DEBUGGING_SPEC },     \
1161   { "mdebug_asm_spec", MDEBUG_ASM_SPEC },                               \
1162   { "subtarget_asm_spec", SUBTARGET_ASM_SPEC },                         \
1163   { "asm_abi_default_spec", ASM_ABI_DEFAULT_SPEC },                     \
1164   { "endian_spec", ENDIAN_SPEC },                                       \
1165   SUBTARGET_EXTRA_SPECS
1166
1167 #ifndef SUBTARGET_EXTRA_SPECS
1168 #define SUBTARGET_EXTRA_SPECS
1169 #endif
1170
1171 /* If defined, this macro is an additional prefix to try after
1172    `STANDARD_EXEC_PREFIX'.  */
1173
1174 #ifndef MD_EXEC_PREFIX
1175 #define MD_EXEC_PREFIX "/usr/lib/cmplrs/cc/"
1176 #endif
1177
1178 #ifndef MD_STARTFILE_PREFIX
1179 #define MD_STARTFILE_PREFIX "/usr/lib/cmplrs/cc/"
1180 #endif
1181
1182 \f
1183 #define DBX_DEBUGGING_INFO 1            /* generate stabs (OSF/rose) */
1184 #define MIPS_DEBUGGING_INFO 1           /* MIPS specific debugging info */
1185
1186 /* By default, turn on GDB extensions.  */
1187 #define DEFAULT_GDB_EXTENSIONS 1
1188
1189 /* If we are passing smuggling stabs through the MIPS ECOFF object
1190    format, put a comment in front of the .stab<x> operation so
1191    that the MIPS assembler does not choke.  The mips-tfile program
1192    will correctly put the stab into the object file.  */
1193
1194 #define ASM_STABS_OP    ((TARGET_GAS) ? "\t.stabs\t" : " #.stabs\t")
1195 #define ASM_STABN_OP    ((TARGET_GAS) ? "\t.stabn\t" : " #.stabn\t")
1196 #define ASM_STABD_OP    ((TARGET_GAS) ? "\t.stabd\t" : " #.stabd\t")
1197
1198 /* Local compiler-generated symbols must have a prefix that the assembler
1199    understands.   By default, this is $, although some targets (e.g.,
1200    NetBSD-ELF) need to override this.  */
1201
1202 #ifndef LOCAL_LABEL_PREFIX
1203 #define LOCAL_LABEL_PREFIX      "$"
1204 #endif
1205
1206 /* By default on the mips, external symbols do not have an underscore
1207    prepended, but some targets (e.g., NetBSD) require this.  */
1208
1209 #ifndef USER_LABEL_PREFIX
1210 #define USER_LABEL_PREFIX       ""
1211 #endif
1212
1213 /* On Sun 4, this limit is 2048.  We use 1500 to be safe,
1214    since the length can run past this up to a continuation point.  */
1215 #undef DBX_CONTIN_LENGTH
1216 #define DBX_CONTIN_LENGTH 1500
1217
1218 /* How to renumber registers for dbx and gdb.  */
1219 #define DBX_REGISTER_NUMBER(REGNO) mips_dbx_regno[ (REGNO) ]
1220
1221 /* The mapping from gcc register number to DWARF 2 CFA column number.  */
1222 #define DWARF_FRAME_REGNUM(REG)                         \
1223   (REG == GP_REG_FIRST + 31 ? DWARF_FRAME_RETURN_COLUMN : REG)
1224
1225 /* The DWARF 2 CFA column which tracks the return address.  */
1226 #define DWARF_FRAME_RETURN_COLUMN (FP_REG_LAST + 1)
1227
1228 /* Before the prologue, RA lives in r31.  */
1229 #define INCOMING_RETURN_ADDR_RTX  gen_rtx_REG (VOIDmode, GP_REG_FIRST + 31)
1230
1231 /* Describe how we implement __builtin_eh_return.  */
1232 #define EH_RETURN_DATA_REGNO(N) \
1233   ((N) < (TARGET_MIPS16 ? 2 : 4) ? (N) + GP_ARG_FIRST : INVALID_REGNUM)
1234
1235 #define EH_RETURN_STACKADJ_RTX  gen_rtx_REG (Pmode, GP_REG_FIRST + 3)
1236
1237 /* Offsets recorded in opcodes are a multiple of this alignment factor.
1238    The default for this in 64-bit mode is 8, which causes problems with
1239    SFmode register saves.  */
1240 #define DWARF_CIE_DATA_ALIGNMENT 4
1241
1242 #define FIND_BASE_TERM(X) mips_delegitimize_address (X)
1243
1244 /* Correct the offset of automatic variables and arguments.  Note that
1245    the MIPS debug format wants all automatic variables and arguments
1246    to be in terms of the virtual frame pointer (stack pointer before
1247    any adjustment in the function), while the MIPS 3.0 linker wants
1248    the frame pointer to be the stack pointer after the initial
1249    adjustment.  */
1250
1251 #define DEBUGGER_AUTO_OFFSET(X)                         \
1252   mips_debugger_offset (X, (HOST_WIDE_INT) 0)
1253 #define DEBUGGER_ARG_OFFSET(OFFSET, X)                  \
1254   mips_debugger_offset (X, (HOST_WIDE_INT) OFFSET)
1255 \f
1256 /* Target machine storage layout */
1257
1258 #define BITS_BIG_ENDIAN 0
1259 #define BYTES_BIG_ENDIAN (TARGET_BIG_ENDIAN != 0)
1260 #define WORDS_BIG_ENDIAN (TARGET_BIG_ENDIAN != 0)
1261
1262 /* Define this to set the endianness to use in libgcc2.c, which can
1263    not depend on target_flags.  */
1264 #if !defined(MIPSEL) && !defined(__MIPSEL__)
1265 #define LIBGCC2_WORDS_BIG_ENDIAN 1
1266 #else
1267 #define LIBGCC2_WORDS_BIG_ENDIAN 0
1268 #endif
1269
1270 #define MAX_BITS_PER_WORD 64
1271
1272 /* Width of a word, in units (bytes).  */
1273 #define UNITS_PER_WORD (TARGET_64BIT ? 8 : 4)
1274 #define MIN_UNITS_PER_WORD 4
1275
1276 /* For MIPS, width of a floating point register.  */
1277 #define UNITS_PER_FPREG (TARGET_FLOAT64 ? 8 : 4)
1278
1279 /* If register $f0 holds a floating-point value, $f(0 + FP_INC) is
1280    the next available register.  */
1281 #define FP_INC (TARGET_FLOAT64 || TARGET_SINGLE_FLOAT ? 1 : 2)
1282
1283 /* The largest size of value that can be held in floating-point
1284    registers and moved with a single instruction.  */
1285 #define UNITS_PER_HWFPVALUE (TARGET_SOFT_FLOAT ? 0 : FP_INC * UNITS_PER_FPREG)
1286
1287 /* The largest size of value that can be held in floating-point
1288    registers.  */
1289 #define UNITS_PER_FPVALUE \
1290   (TARGET_SOFT_FLOAT ? 0 : (LONG_DOUBLE_TYPE_SIZE / BITS_PER_UNIT))
1291
1292 /* The number of bytes in a double.  */
1293 #define UNITS_PER_DOUBLE (TYPE_PRECISION (double_type_node) / BITS_PER_UNIT)
1294
1295 /* Tell the preprocessor the maximum size of wchar_t.  */
1296 #ifndef MAX_WCHAR_TYPE_SIZE
1297 #ifndef WCHAR_TYPE_SIZE
1298 #define MAX_WCHAR_TYPE_SIZE 64
1299 #endif
1300 #endif
1301
1302 /* Set the sizes of the core types.  */
1303 #define SHORT_TYPE_SIZE 16
1304 #define INT_TYPE_SIZE (TARGET_INT64 ? 64 : 32)
1305 #define LONG_TYPE_SIZE (TARGET_LONG64 ? 64 : 32)
1306 #define LONG_LONG_TYPE_SIZE 64
1307
1308 #define MAX_LONG_TYPE_SIZE 64
1309
1310 #define FLOAT_TYPE_SIZE 32
1311 #define DOUBLE_TYPE_SIZE 64
1312 #define LONG_DOUBLE_TYPE_SIZE \
1313   (mips_abi == ABI_N32 || mips_abi == ABI_64 ? 128 : 64)
1314
1315 /* long double is not a fixed mode, but the idea is that, if we
1316    support long double, we also want a 128-bit integer type.  */
1317 #define MAX_FIXED_MODE_SIZE LONG_DOUBLE_TYPE_SIZE
1318
1319 #ifdef IN_LIBGCC2
1320 #if  (defined _ABIN32 && _MIPS_SIM == _ABIN32) \
1321   || (defined _ABI64 && _MIPS_SIM == _ABI64)
1322 #  define LIBGCC2_LONG_DOUBLE_TYPE_SIZE 128
1323 # else
1324 #  define LIBGCC2_LONG_DOUBLE_TYPE_SIZE 64
1325 # endif
1326 #endif
1327
1328 /* Width in bits of a pointer.  */
1329 #ifndef POINTER_SIZE
1330 #define POINTER_SIZE ((TARGET_LONG64 && TARGET_64BIT) ? 64 : 32)
1331 #endif
1332
1333 #define POINTERS_EXTEND_UNSIGNED 0
1334
1335 /* Allocation boundary (in *bits*) for storing arguments in argument list.  */
1336 #define PARM_BOUNDARY ((mips_abi == ABI_O64 || mips_abi == ABI_N32 \
1337                         || mips_abi == ABI_64 \
1338                         || (mips_abi == ABI_EABI && TARGET_64BIT)) ? 64 : 32)
1339
1340
1341 /* Allocation boundary (in *bits*) for the code of a function.  */
1342 #define FUNCTION_BOUNDARY 32
1343
1344 /* Alignment of field after `int : 0' in a structure.  */
1345 #define EMPTY_FIELD_BOUNDARY 32
1346
1347 /* Every structure's size must be a multiple of this.  */
1348 /* 8 is observed right on a DECstation and on riscos 4.02.  */
1349 #define STRUCTURE_SIZE_BOUNDARY 8
1350
1351 /* There is no point aligning anything to a rounder boundary than this.  */
1352 #define BIGGEST_ALIGNMENT LONG_DOUBLE_TYPE_SIZE
1353
1354 /* All accesses must be aligned.  */
1355 #define STRICT_ALIGNMENT 1
1356
1357 /* Define this if you wish to imitate the way many other C compilers
1358    handle alignment of bitfields and the structures that contain
1359    them.
1360
1361    The behavior is that the type written for a bit-field (`int',
1362    `short', or other integer type) imposes an alignment for the
1363    entire structure, as if the structure really did contain an
1364    ordinary field of that type.  In addition, the bit-field is placed
1365    within the structure so that it would fit within such a field,
1366    not crossing a boundary for it.
1367
1368    Thus, on most machines, a bit-field whose type is written as `int'
1369    would not cross a four-byte boundary, and would force four-byte
1370    alignment for the whole structure.  (The alignment used may not
1371    be four bytes; it is controlled by the other alignment
1372    parameters.)
1373
1374    If the macro is defined, its definition should be a C expression;
1375    a nonzero value for the expression enables this behavior.  */
1376
1377 #define PCC_BITFIELD_TYPE_MATTERS 1
1378
1379 /* If defined, a C expression to compute the alignment given to a
1380    constant that is being placed in memory.  CONSTANT is the constant
1381    and ALIGN is the alignment that the object would ordinarily have.
1382    The value of this macro is used instead of that alignment to align
1383    the object.
1384
1385    If this macro is not defined, then ALIGN is used.
1386
1387    The typical use of this macro is to increase alignment for string
1388    constants to be word aligned so that `strcpy' calls that copy
1389    constants can be done inline.  */
1390
1391 #define CONSTANT_ALIGNMENT(EXP, ALIGN)                                  \
1392   ((TREE_CODE (EXP) == STRING_CST  || TREE_CODE (EXP) == CONSTRUCTOR)   \
1393    && (ALIGN) < BITS_PER_WORD ? BITS_PER_WORD : (ALIGN))
1394
1395 /* If defined, a C expression to compute the alignment for a static
1396    variable.  TYPE is the data type, and ALIGN is the alignment that
1397    the object would ordinarily have.  The value of this macro is used
1398    instead of that alignment to align the object.
1399
1400    If this macro is not defined, then ALIGN is used.
1401
1402    One use of this macro is to increase alignment of medium-size
1403    data to make it all fit in fewer cache lines.  Another is to
1404    cause character arrays to be word-aligned so that `strcpy' calls
1405    that copy constants to character arrays can be done inline.  */
1406
1407 #undef DATA_ALIGNMENT
1408 #define DATA_ALIGNMENT(TYPE, ALIGN)                                     \
1409   ((((ALIGN) < BITS_PER_WORD)                                           \
1410     && (TREE_CODE (TYPE) == ARRAY_TYPE                                  \
1411         || TREE_CODE (TYPE) == UNION_TYPE                               \
1412         || TREE_CODE (TYPE) == RECORD_TYPE)) ? BITS_PER_WORD : (ALIGN))
1413
1414
1415 #define PAD_VARARGS_DOWN \
1416   (FUNCTION_ARG_PADDING (TYPE_MODE (type), type) == downward)
1417
1418 /* Arguments declared as 'char' or 'short' in a prototype should be
1419    passed as 'int's.  */
1420 #define PROMOTE_PROTOTYPES 1
1421
1422 /* Define if operations between registers always perform the operation
1423    on the full register even if a narrower mode is specified.  */
1424 #define WORD_REGISTER_OPERATIONS
1425
1426 /* When in 64 bit mode, move insns will sign extend SImode and CCmode
1427    moves.  All other references are zero extended.  */
1428 #define LOAD_EXTEND_OP(MODE) \
1429   (TARGET_64BIT && ((MODE) == SImode || (MODE) == CCmode) \
1430    ? SIGN_EXTEND : ZERO_EXTEND)
1431
1432 /* Define this macro if it is advisable to hold scalars in registers
1433    in a wider mode than that declared by the program.  In such cases,
1434    the value is constrained to be within the bounds of the declared
1435    type, but kept valid in the wider mode.  The signedness of the
1436    extension may differ from that of the type.  */
1437
1438 #define PROMOTE_MODE(MODE, UNSIGNEDP, TYPE)     \
1439   if (GET_MODE_CLASS (MODE) == MODE_INT         \
1440       && GET_MODE_SIZE (MODE) < UNITS_PER_WORD) \
1441     {                                           \
1442       if ((MODE) == SImode)                     \
1443         (UNSIGNEDP) = 0;                        \
1444       (MODE) = Pmode;                           \
1445     }
1446
1447 /* Define if loading short immediate values into registers sign extends.  */
1448 #define SHORT_IMMEDIATES_SIGN_EXTEND
1449
1450
1451 /* Define this if function arguments should also be promoted using the above
1452    procedure.  */
1453 #define PROMOTE_FUNCTION_ARGS
1454
1455 /* Likewise, if the function return value is promoted.  */
1456 #define PROMOTE_FUNCTION_RETURN
1457
1458 \f
1459 /* Standard register usage.  */
1460
1461 /* Number of hardware registers.  We have:
1462
1463    - 32 integer registers
1464    - 32 floating point registers
1465    - 8 condition code registers
1466    - 2 accumulator registers (hi and lo)
1467    - 32 registers each for coprocessors 0, 2 and 3
1468    - 6 dummy entries that were used at various times in the past.  */
1469
1470 #define FIRST_PSEUDO_REGISTER 176
1471
1472 /* By default, fix the kernel registers ($26 and $27), the global
1473    pointer ($28) and the stack pointer ($29).  This can change
1474    depending on the command-line options.
1475
1476    Regarding coprocessor registers: without evidence to the contrary,
1477    it's best to assume that each coprocessor register has a unique
1478    use.  This can be overridden, in, e.g., override_options() or
1479    CONDITIONAL_REGISTER_USAGE should the assumption be inappropriate
1480    for a particular target.  */
1481
1482 #define FIXED_REGISTERS                                                 \
1483 {                                                                       \
1484   1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,                       \
1485   0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 0, 0,                       \
1486   0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,                       \
1487   0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,                       \
1488   0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1,                       \
1489   /* COP0 registers */                                                  \
1490   1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,                       \
1491   1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,                       \
1492   /* COP2 registers */                                                  \
1493   1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,                       \
1494   1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,                       \
1495   /* COP3 registers */                                                  \
1496   1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,                       \
1497   1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1                        \
1498 }
1499
1500
1501 /* Set up this array for o32 by default.
1502
1503    Note that we don't mark $31 as a call-clobbered register.  The idea is
1504    that it's really the call instructions themselves which clobber $31.
1505    We don't care what the called function does with it afterwards.
1506
1507    This approach makes it easier to implement sibcalls.  Unlike normal
1508    calls, sibcalls don't clobber $31, so the register reaches the
1509    called function in tact.  EPILOGUE_USES says that $31 is useful
1510    to the called function.  */
1511
1512 #define CALL_USED_REGISTERS                                             \
1513 {                                                                       \
1514   1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,                       \
1515   0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 0, 0,                       \
1516   1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,                       \
1517   1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,                       \
1518   1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,                       \
1519   /* COP0 registers */                                                  \
1520   1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,                       \
1521   1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,                       \
1522   /* COP2 registers */                                                  \
1523   1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,                       \
1524   1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,                       \
1525   /* COP3 registers */                                                  \
1526   1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,                       \
1527   1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1                        \
1528 }
1529
1530
1531 /* Define this since $28, though fixed, is call-saved in many ABIs.  */
1532
1533 #define CALL_REALLY_USED_REGISTERS                                      \
1534 { /* General registers.  */                                             \
1535   1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,                       \
1536   0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 0, 1, 0, 0,                       \
1537   /* Floating-point registers.  */                                      \
1538   1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,                       \
1539   1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,                       \
1540   /* Others.  */                                                        \
1541   1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,                       \
1542   /* COP0 registers */                                                  \
1543   0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,                       \
1544   0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,                       \
1545   /* COP2 registers */                                                  \
1546   0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,                       \
1547   0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,                       \
1548   /* COP3 registers */                                                  \
1549   0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,                       \
1550   0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0                        \
1551 }
1552
1553 /* Internal macros to classify a register number as to whether it's a
1554    general purpose register, a floating point register, a
1555    multiply/divide register, or a status register.  */
1556
1557 #define GP_REG_FIRST 0
1558 #define GP_REG_LAST  31
1559 #define GP_REG_NUM   (GP_REG_LAST - GP_REG_FIRST + 1)
1560 #define GP_DBX_FIRST 0
1561
1562 #define FP_REG_FIRST 32
1563 #define FP_REG_LAST  63
1564 #define FP_REG_NUM   (FP_REG_LAST - FP_REG_FIRST + 1)
1565 #define FP_DBX_FIRST ((write_symbols == DBX_DEBUG) ? 38 : 32)
1566
1567 #define MD_REG_FIRST 64
1568 #define MD_REG_LAST  65
1569 #define MD_REG_NUM   (MD_REG_LAST - MD_REG_FIRST + 1)
1570 #define MD_DBX_FIRST (FP_DBX_FIRST + FP_REG_NUM)
1571
1572 #define ST_REG_FIRST 67
1573 #define ST_REG_LAST  74
1574 #define ST_REG_NUM   (ST_REG_LAST - ST_REG_FIRST + 1)
1575
1576
1577 /* FIXME: renumber.  */
1578 #define COP0_REG_FIRST 80
1579 #define COP0_REG_LAST 111
1580 #define COP0_REG_NUM (COP0_REG_LAST - COP0_REG_FIRST + 1)
1581
1582 #define COP2_REG_FIRST 112
1583 #define COP2_REG_LAST 143
1584 #define COP2_REG_NUM (COP2_REG_LAST - COP2_REG_FIRST + 1)
1585
1586 #define COP3_REG_FIRST 144
1587 #define COP3_REG_LAST 175
1588 #define COP3_REG_NUM (COP3_REG_LAST - COP3_REG_FIRST + 1)
1589 /* ALL_COP_REG_NUM assumes that COP0,2,and 3 are numbered consecutively.  */
1590 #define ALL_COP_REG_NUM (COP3_REG_LAST - COP0_REG_FIRST + 1)
1591
1592 #define AT_REGNUM       (GP_REG_FIRST + 1)
1593 #define HI_REGNUM       (MD_REG_FIRST + 0)
1594 #define LO_REGNUM       (MD_REG_FIRST + 1)
1595
1596 /* FPSW_REGNUM is the single condition code used if !ISA_HAS_8CC.
1597    If ISA_HAS_8CC, it should not be used, and an arbitrary ST_REG
1598    should be used instead.  */
1599 #define FPSW_REGNUM     ST_REG_FIRST
1600
1601 #define GP_REG_P(REGNO) \
1602   ((unsigned int) ((int) (REGNO) - GP_REG_FIRST) < GP_REG_NUM)
1603 #define M16_REG_P(REGNO) \
1604   (((REGNO) >= 2 && (REGNO) <= 7) || (REGNO) == 16 || (REGNO) == 17)
1605 #define FP_REG_P(REGNO)  \
1606   ((unsigned int) ((int) (REGNO) - FP_REG_FIRST) < FP_REG_NUM)
1607 #define MD_REG_P(REGNO) \
1608   ((unsigned int) ((int) (REGNO) - MD_REG_FIRST) < MD_REG_NUM)
1609 #define ST_REG_P(REGNO) \
1610   ((unsigned int) ((int) (REGNO) - ST_REG_FIRST) < ST_REG_NUM)
1611 #define COP0_REG_P(REGNO) \
1612   ((unsigned int) ((int) (REGNO) - COP0_REG_FIRST) < COP0_REG_NUM)
1613 #define COP2_REG_P(REGNO) \
1614   ((unsigned int) ((int) (REGNO) - COP2_REG_FIRST) < COP2_REG_NUM)
1615 #define COP3_REG_P(REGNO) \
1616   ((unsigned int) ((int) (REGNO) - COP3_REG_FIRST) < COP3_REG_NUM)
1617 #define ALL_COP_REG_P(REGNO) \
1618   ((unsigned int) ((int) (REGNO) - COP0_REG_FIRST) < ALL_COP_REG_NUM)
1619
1620 #define FP_REG_RTX_P(X) (GET_CODE (X) == REG && FP_REG_P (REGNO (X)))
1621
1622 /* Return coprocessor number from register number.  */
1623
1624 #define COPNUM_AS_CHAR_FROM_REGNUM(REGNO)                               \
1625   (COP0_REG_P (REGNO) ? '0' : COP2_REG_P (REGNO) ? '2'                  \
1626    : COP3_REG_P (REGNO) ? '3' : '?')
1627
1628
1629 #define HARD_REGNO_NREGS(REGNO, MODE) mips_hard_regno_nregs (REGNO, MODE)
1630
1631 /* To make the code simpler, HARD_REGNO_MODE_OK just references an
1632    array built in override_options.  Because machmodes.h is not yet
1633    included before this file is processed, the MODE bound can't be
1634    expressed here.  */
1635
1636 extern char mips_hard_regno_mode_ok[][FIRST_PSEUDO_REGISTER];
1637
1638 #define HARD_REGNO_MODE_OK(REGNO, MODE)                                 \
1639   mips_hard_regno_mode_ok[ (int)(MODE) ][ (REGNO) ]
1640
1641 /* Value is 1 if it is a good idea to tie two pseudo registers
1642    when one has mode MODE1 and one has mode MODE2.
1643    If HARD_REGNO_MODE_OK could produce different values for MODE1 and MODE2,
1644    for any hard reg, then this must be 0 for correct output.  */
1645 #define MODES_TIEABLE_P(MODE1, MODE2)                                   \
1646   ((GET_MODE_CLASS (MODE1) == MODE_FLOAT ||                             \
1647     GET_MODE_CLASS (MODE1) == MODE_COMPLEX_FLOAT)                       \
1648    == (GET_MODE_CLASS (MODE2) == MODE_FLOAT ||                          \
1649        GET_MODE_CLASS (MODE2) == MODE_COMPLEX_FLOAT))
1650
1651 /* Register to use for pushing function arguments.  */
1652 #define STACK_POINTER_REGNUM (GP_REG_FIRST + 29)
1653
1654 /* Base register for access to local variables of the function.  We
1655    pretend that the frame pointer is $1, and then eliminate it to
1656    HARD_FRAME_POINTER_REGNUM.  We can get away with this because $1 is
1657    a fixed register, and will not be used for anything else.  */
1658 #define FRAME_POINTER_REGNUM (GP_REG_FIRST + 1)
1659
1660 /* $30 is not available on the mips16, so we use $17 as the frame
1661    pointer.  */
1662 #define HARD_FRAME_POINTER_REGNUM \
1663   (TARGET_MIPS16 ? GP_REG_FIRST + 17 : GP_REG_FIRST + 30)
1664
1665 /* Value should be nonzero if functions must have frame pointers.
1666    Zero means the frame pointer need not be set up (and parms
1667    may be accessed via the stack pointer) in functions that seem suitable.
1668    This is computed in `reload', in reload1.c.  */
1669 #define FRAME_POINTER_REQUIRED (current_function_calls_alloca)
1670
1671 /* Base register for access to arguments of the function.  */
1672 #define ARG_POINTER_REGNUM GP_REG_FIRST
1673
1674 /* Register in which static-chain is passed to a function.  */
1675 #define STATIC_CHAIN_REGNUM (GP_REG_FIRST + 2)
1676
1677 /* Pass structure addresses as an "invisible" first argument.  */
1678 #define STRUCT_VALUE 0
1679
1680 /* Mips registers used in prologue/epilogue code when the stack frame
1681    is larger than 32K bytes.  These registers must come from the
1682    scratch register set, and not used for passing and returning
1683    arguments and any other information used in the calling sequence
1684    (such as pic).  Must start at 12, since t0/t3 are parameter passing
1685    registers in the 64 bit ABI.  */
1686
1687 #define MIPS_TEMP1_REGNUM (GP_REG_FIRST + 12)
1688 #define MIPS_TEMP2_REGNUM (GP_REG_FIRST + 13)
1689
1690 /* Define this macro if it is as good or better to call a constant
1691    function address than to call an address kept in a register.  */
1692 #define NO_FUNCTION_CSE 1
1693
1694 /* Define this macro if it is as good or better for a function to
1695    call itself with an explicit address than to call an address
1696    kept in a register.  */
1697 #define NO_RECURSIVE_FUNCTION_CSE 1
1698
1699 /* The ABI-defined global pointer.  Sometimes we use a different
1700    register in leaf functions: see PIC_OFFSET_TABLE_REGNUM.  */
1701 #define GLOBAL_POINTER_REGNUM (GP_REG_FIRST + 28)
1702
1703 /* We normally use $28 as the global pointer.  However, when generating
1704    n32/64 PIC, it is better for leaf functions to use a call-clobbered
1705    register instead.  They can then avoid saving and restoring $28
1706    and perhaps avoid using a frame at all.
1707
1708    When a leaf function uses something other than $28, mips_expand_prologue
1709    will modify pic_offset_table_rtx in place.  Take the register number
1710    from there after reload.  */
1711 #define PIC_OFFSET_TABLE_REGNUM \
1712   (reload_completed ? REGNO (pic_offset_table_rtx) : GLOBAL_POINTER_REGNUM)
1713
1714 #define PIC_FUNCTION_ADDR_REGNUM (GP_REG_FIRST + 25)
1715 \f
1716 /* Define the classes of registers for register constraints in the
1717    machine description.  Also define ranges of constants.
1718
1719    One of the classes must always be named ALL_REGS and include all hard regs.
1720    If there is more than one class, another class must be named NO_REGS
1721    and contain no registers.
1722
1723    The name GENERAL_REGS must be the name of a class (or an alias for
1724    another name such as ALL_REGS).  This is the class of registers
1725    that is allowed by "g" or "r" in a register constraint.
1726    Also, registers outside this class are allocated only when
1727    instructions express preferences for them.
1728
1729    The classes must be numbered in nondecreasing order; that is,
1730    a larger-numbered class must never be contained completely
1731    in a smaller-numbered class.
1732
1733    For any two classes, it is very desirable that there be another
1734    class that represents their union.  */
1735
1736 enum reg_class
1737 {
1738   NO_REGS,                      /* no registers in set */
1739   M16_NA_REGS,                  /* mips16 regs not used to pass args */
1740   M16_REGS,                     /* mips16 directly accessible registers */
1741   T_REG,                        /* mips16 T register ($24) */
1742   M16_T_REGS,                   /* mips16 registers plus T register */
1743   PIC_FN_ADDR_REG,              /* SVR4 PIC function address register */
1744   LEA_REGS,                     /* Every GPR except $25 */
1745   GR_REGS,                      /* integer registers */
1746   FP_REGS,                      /* floating point registers */
1747   HI_REG,                       /* hi register */
1748   LO_REG,                       /* lo register */
1749   MD_REGS,                      /* multiply/divide registers (hi/lo) */
1750   COP0_REGS,                    /* generic coprocessor classes */
1751   COP2_REGS,
1752   COP3_REGS,
1753   HI_AND_GR_REGS,               /* union classes */
1754   LO_AND_GR_REGS,
1755   HI_AND_FP_REGS,
1756   COP0_AND_GR_REGS,
1757   COP2_AND_GR_REGS,
1758   COP3_AND_GR_REGS,
1759   ALL_COP_REGS,
1760   ALL_COP_AND_GR_REGS,
1761   ST_REGS,                      /* status registers (fp status) */
1762   ALL_REGS,                     /* all registers */
1763   LIM_REG_CLASSES               /* max value + 1 */
1764 };
1765
1766 #define N_REG_CLASSES (int) LIM_REG_CLASSES
1767
1768 #define GENERAL_REGS GR_REGS
1769
1770 /* An initializer containing the names of the register classes as C
1771    string constants.  These names are used in writing some of the
1772    debugging dumps.  */
1773
1774 #define REG_CLASS_NAMES                                                 \
1775 {                                                                       \
1776   "NO_REGS",                                                            \
1777   "M16_NA_REGS",                                                        \
1778   "M16_REGS",                                                           \
1779   "T_REG",                                                              \
1780   "M16_T_REGS",                                                         \
1781   "PIC_FN_ADDR_REG",                                                    \
1782   "LEA_REGS",                                                           \
1783   "GR_REGS",                                                            \
1784   "FP_REGS",                                                            \
1785   "HI_REG",                                                             \
1786   "LO_REG",                                                             \
1787   "MD_REGS",                                                            \
1788   /* coprocessor registers */                                           \
1789   "COP0_REGS",                                                          \
1790   "COP2_REGS",                                                          \
1791   "COP3_REGS",                                                          \
1792   "HI_AND_GR_REGS",                                                     \
1793   "LO_AND_GR_REGS",                                                     \
1794   "HI_AND_FP_REGS",                                                     \
1795   "COP0_AND_GR_REGS",                                                   \
1796   "COP2_AND_GR_REGS",                                                   \
1797   "COP3_AND_GR_REGS",                                                   \
1798   "ALL_COP_REGS",                                                       \
1799   "ALL_COP_AND_GR_REGS",                                                \
1800   "ST_REGS",                                                            \
1801   "ALL_REGS"                                                            \
1802 }
1803
1804 /* An initializer containing the contents of the register classes,
1805    as integers which are bit masks.  The Nth integer specifies the
1806    contents of class N.  The way the integer MASK is interpreted is
1807    that register R is in the class if `MASK & (1 << R)' is 1.
1808
1809    When the machine has more than 32 registers, an integer does not
1810    suffice.  Then the integers are replaced by sub-initializers,
1811    braced groupings containing several integers.  Each
1812    sub-initializer must be suitable as an initializer for the type
1813    `HARD_REG_SET' which is defined in `hard-reg-set.h'.  */
1814
1815 #define REG_CLASS_CONTENTS                                                                              \
1816 {                                                                                                       \
1817   { 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000 },   /* no registers */      \
1818   { 0x0003000c, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000 },   /* mips16 nonarg regs */\
1819   { 0x000300fc, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000 },   /* mips16 registers */  \
1820   { 0x01000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000 },   /* mips16 T register */ \
1821   { 0x010300fc, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000 },   /* mips16 and T regs */ \
1822   { 0x02000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000 },   /* SVR4 PIC function address register */ \
1823   { 0xfdffffff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000 },   /* Every other GPR */   \
1824   { 0xffffffff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000 },   /* integer registers */ \
1825   { 0x00000000, 0xffffffff, 0x00000000, 0x00000000, 0x00000000, 0x00000000 },   /* floating registers*/ \
1826   { 0x00000000, 0x00000000, 0x00000001, 0x00000000, 0x00000000, 0x00000000 },   /* hi register */       \
1827   { 0x00000000, 0x00000000, 0x00000002, 0x00000000, 0x00000000, 0x00000000 },   /* lo register */       \
1828   { 0x00000000, 0x00000000, 0x00000003, 0x00000000, 0x00000000, 0x00000000 },   /* mul/div registers */ \
1829   { 0x00000000, 0x00000000, 0xffff0000, 0x0000ffff, 0x00000000, 0x00000000 },   /* cop0 registers */    \
1830   { 0x00000000, 0x00000000, 0x00000000, 0xffff0000, 0x0000ffff, 0x00000000 },   /* cop2 registers */    \
1831   { 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xffff0000, 0x0000ffff },   /* cop3 registers */    \
1832   { 0xffffffff, 0x00000000, 0x00000001, 0x00000000, 0x00000000, 0x00000000 },   /* union classes */     \
1833   { 0xffffffff, 0x00000000, 0x00000002, 0x00000000, 0x00000000, 0x00000000 },                           \
1834   { 0x00000000, 0xffffffff, 0x00000001, 0x00000000, 0x00000000, 0x00000000 },                           \
1835   { 0xffffffff, 0x00000000, 0xffff0000, 0x0000ffff, 0x00000000, 0x00000000 },                           \
1836   { 0xffffffff, 0x00000000, 0x00000000, 0xffff0000, 0x0000ffff, 0x00000000 },                           \
1837   { 0xffffffff, 0x00000000, 0x00000000, 0x00000000, 0xffff0000, 0x0000ffff },                           \
1838   { 0x00000000, 0x00000000, 0xffff0000, 0xffffffff, 0xffffffff, 0x0000ffff },                           \
1839   { 0xffffffff, 0x00000000, 0xffff0000, 0xffffffff, 0xffffffff, 0x0000ffff },                           \
1840   { 0x00000000, 0x00000000, 0x000007f8, 0x00000000, 0x00000000, 0x00000000 },   /* status registers */  \
1841   { 0xffffffff, 0xffffffff, 0xffff07ff, 0xffffffff, 0xffffffff, 0x0000ffff }    /* all registers */     \
1842 }
1843
1844
1845 /* A C expression whose value is a register class containing hard
1846    register REGNO.  In general there is more that one such class;
1847    choose a class which is "minimal", meaning that no smaller class
1848    also contains the register.  */
1849
1850 extern const enum reg_class mips_regno_to_class[];
1851
1852 #define REGNO_REG_CLASS(REGNO) mips_regno_to_class[ (REGNO) ]
1853
1854 /* A macro whose definition is the name of the class to which a
1855    valid base register must belong.  A base register is one used in
1856    an address which is the register value plus a displacement.  */
1857
1858 #define BASE_REG_CLASS  (TARGET_MIPS16 ? M16_REGS : GR_REGS)
1859
1860 /* A macro whose definition is the name of the class to which a
1861    valid index register must belong.  An index register is one used
1862    in an address where its value is either multiplied by a scale
1863    factor or added to another register (as well as added to a
1864    displacement).  */
1865
1866 #define INDEX_REG_CLASS NO_REGS
1867
1868 /* When SMALL_REGISTER_CLASSES is nonzero, the compiler allows
1869    registers explicitly used in the rtl to be used as spill registers
1870    but prevents the compiler from extending the lifetime of these
1871    registers.  */
1872
1873 #define SMALL_REGISTER_CLASSES (TARGET_MIPS16)
1874
1875 /* This macro is used later on in the file.  */
1876 #define GR_REG_CLASS_P(CLASS)                                           \
1877   ((CLASS) == GR_REGS || (CLASS) == M16_REGS || (CLASS) == T_REG        \
1878    || (CLASS) == M16_T_REGS || (CLASS) == M16_NA_REGS                   \
1879    || (CLASS) == PIC_FN_ADDR_REG || (CLASS) == LEA_REGS)
1880
1881 /* This macro is also used later on in the file.  */
1882 #define COP_REG_CLASS_P(CLASS)                                          \
1883   ((CLASS)  == COP0_REGS || (CLASS) == COP2_REGS || (CLASS) == COP3_REGS)
1884
1885 /* REG_ALLOC_ORDER is to order in which to allocate registers.  This
1886    is the default value (allocate the registers in numeric order).  We
1887    define it just so that we can override it for the mips16 target in
1888    ORDER_REGS_FOR_LOCAL_ALLOC.  */
1889
1890 #define REG_ALLOC_ORDER                                                 \
1891 {  0,  1,  2,  3,  4,  5,  6,  7,  8,  9, 10, 11, 12, 13, 14, 15,       \
1892   16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31,       \
1893   32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47,       \
1894   48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63,       \
1895   64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79,       \
1896   80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95,       \
1897   96, 97, 98, 99, 100,101,102,103,104,105,106,107,108,109,110,111,      \
1898   112,113,114,115,116,117,118,119,120,121,122,123,124,125,126,127,      \
1899   128,129,130,131,132,133,134,135,136,137,138,139,140,141,142,143,      \
1900   144,145,146,147,148,149,150,151,152,153,154,155,156,157,158,159,      \
1901   160,161,162,163,164,165,166,167,168,169,170,171,172,173,174,175       \
1902 }
1903
1904 /* ORDER_REGS_FOR_LOCAL_ALLOC is a macro which permits reg_alloc_order
1905    to be rearranged based on a particular function.  On the mips16, we
1906    want to allocate $24 (T_REG) before other registers for
1907    instructions for which it is possible.  */
1908
1909 #define ORDER_REGS_FOR_LOCAL_ALLOC mips_order_regs_for_local_alloc ()
1910
1911 /* REGISTER AND CONSTANT CLASSES */
1912
1913 /* Get reg_class from a letter such as appears in the machine
1914    description.
1915
1916    DEFINED REGISTER CLASSES:
1917
1918    'd'  General (aka integer) registers
1919         Normally this is GR_REGS, but in mips16 mode this is M16_REGS
1920    'y'  General registers (in both mips16 and non mips16 mode)
1921    'e'  mips16 non argument registers (M16_NA_REGS)
1922    't'  mips16 temporary register ($24)
1923    'f'  Floating point registers
1924    'h'  Hi register
1925    'l'  Lo register
1926    'x'  Multiply/divide registers
1927    'z'  FP Status register
1928    'B'  Cop0 register
1929    'C'  Cop2 register
1930    'D'  Cop3 register
1931    'b'  All registers */
1932
1933 extern enum reg_class mips_char_to_class[256];
1934
1935 #define REG_CLASS_FROM_LETTER(C) mips_char_to_class[(unsigned char)(C)]
1936
1937 /* True if VALUE is a signed 16-bit number.  */
1938
1939 #define SMALL_OPERAND(VALUE) \
1940   ((unsigned HOST_WIDE_INT) (VALUE) + 0x8000 < 0x10000)
1941
1942 /* True if VALUE is an unsigned 16-bit number.  */
1943
1944 #define SMALL_OPERAND_UNSIGNED(VALUE) \
1945   (((VALUE) & ~(unsigned HOST_WIDE_INT) 0xffff) == 0)
1946
1947 /* True if VALUE can be loaded into a register using LUI.  */
1948
1949 #define LUI_OPERAND(VALUE)                                      \
1950   (((VALUE) | 0x7fff0000) == 0x7fff0000                         \
1951    || ((VALUE) | 0x7fff0000) + 0x10000 == 0)
1952
1953 /* Return a value X with the low 16 bits clear, and such that
1954    VALUE - X is a signed 16-bit value.  */
1955
1956 #define CONST_HIGH_PART(VALUE) \
1957   (((VALUE) + 0x8000) & ~(unsigned HOST_WIDE_INT) 0xffff)
1958
1959 #define CONST_LOW_PART(VALUE) \
1960   ((VALUE) - CONST_HIGH_PART (VALUE))
1961
1962 #define SMALL_INT(X) SMALL_OPERAND (INTVAL (X))
1963 #define SMALL_INT_UNSIGNED(X) SMALL_OPERAND_UNSIGNED (INTVAL (X))
1964 #define LUI_INT(X) LUI_OPERAND (INTVAL (X))
1965
1966 /* The letters I, J, K, L, M, N, O, and P in a register constraint
1967    string can be used to stand for particular ranges of immediate
1968    operands.  This macro defines what the ranges are.  C is the
1969    letter, and VALUE is a constant value.  Return 1 if VALUE is
1970    in the range specified by C.  */
1971
1972 /* For MIPS:
1973
1974    `I'  is used for the range of constants an arithmetic insn can
1975         actually contain (16 bits signed integers).
1976
1977    `J'  is used for the range which is just zero (ie, $r0).
1978
1979    `K'  is used for the range of constants a logical insn can actually
1980         contain (16 bit zero-extended integers).
1981
1982    `L'  is used for the range of constants that be loaded with lui
1983         (ie, the bottom 16 bits are zero).
1984
1985    `M'  is used for the range of constants that take two words to load
1986         (ie, not matched by `I', `K', and `L').
1987
1988    `N'  is used for negative 16 bit constants other than -65536.
1989
1990    `O'  is a 15 bit signed integer.
1991
1992    `P'  is used for positive 16 bit constants.  */
1993
1994 #define CONST_OK_FOR_LETTER_P(VALUE, C)                                 \
1995   ((C) == 'I' ? SMALL_OPERAND (VALUE)                                   \
1996    : (C) == 'J' ? ((VALUE) == 0)                                        \
1997    : (C) == 'K' ? SMALL_OPERAND_UNSIGNED (VALUE)                        \
1998    : (C) == 'L' ? LUI_OPERAND (VALUE)                                   \
1999    : (C) == 'M' ? (!SMALL_OPERAND (VALUE)                               \
2000                    && !SMALL_OPERAND_UNSIGNED (VALUE)                   \
2001                    && !LUI_OPERAND (VALUE))                             \
2002    : (C) == 'N' ? ((unsigned HOST_WIDE_INT) ((VALUE) + 0xffff) < 0xffff) \
2003    : (C) == 'O' ? ((unsigned HOST_WIDE_INT) ((VALUE) + 0x4000) < 0x8000) \
2004    : (C) == 'P' ? ((VALUE) != 0 && (((VALUE) & ~0x0000ffff) == 0))      \
2005    : 0)
2006
2007 /* Similar, but for floating constants, and defining letters G and H.
2008    Here VALUE is the CONST_DOUBLE rtx itself.  */
2009
2010 /* For Mips
2011
2012   'G'   : Floating point 0 */
2013
2014 #define CONST_DOUBLE_OK_FOR_LETTER_P(VALUE, C)                          \
2015   ((C) == 'G'                                                           \
2016    && (VALUE) == CONST0_RTX (GET_MODE (VALUE)))
2017
2018 /* True if OP is a constant that should not be moved into $25.
2019    We need this because many versions of gas treat 'la $25,foo' as
2020    part of a call sequence and allow a global 'foo' to be lazily bound.  */
2021
2022 #define DANGEROUS_FOR_LA25_P(OP)                                        \
2023   (TARGET_ABICALLS                                                      \
2024    && !TARGET_EXPLICIT_RELOCS                                           \
2025    && mips_global_pic_constant_p (OP))
2026
2027 /* Letters in the range `Q' through `U' may be defined in a
2028    machine-dependent fashion to stand for arbitrary operand types.
2029    The machine description macro `EXTRA_CONSTRAINT' is passed the
2030    operand as its first argument and the constraint letter as its
2031    second operand.
2032
2033    `Q' is for signed 16-bit constants.
2034    `R' is for single-instruction memory references.  Note that this
2035          constraint has often been used in linux and glibc code.
2036    `S' is for legitimate constant call addresses.
2037    `T' is for constant move_operands that cannot be safely loaded into $25.
2038    `U' is for constant move_operands that can be safely loaded into $25.  */
2039
2040 #define EXTRA_CONSTRAINT(OP,CODE)                                       \
2041   (((CODE) == 'Q')        ? const_arith_operand (OP, VOIDmode)          \
2042    : ((CODE) == 'R')      ? (GET_CODE (OP) == MEM                       \
2043                              && mips_fetch_insns (OP) == 1)             \
2044    : ((CODE) == 'S')      ? (CONSTANT_P (OP)                            \
2045                              && call_insn_operand (OP, VOIDmode))       \
2046    : ((CODE) == 'T')      ? (CONSTANT_P (OP)                            \
2047                              && move_operand (OP, VOIDmode)             \
2048                              && DANGEROUS_FOR_LA25_P (OP))              \
2049    : ((CODE) == 'U')      ? (CONSTANT_P (OP)                            \
2050                              && move_operand (OP, VOIDmode)             \
2051                              && !DANGEROUS_FOR_LA25_P (OP))             \
2052    : FALSE)
2053
2054 /* Given an rtx X being reloaded into a reg required to be
2055    in class CLASS, return the class of reg to actually use.
2056    In general this is just CLASS; but on some machines
2057    in some cases it is preferable to use a more restrictive class.  */
2058
2059 #define PREFERRED_RELOAD_CLASS(X,CLASS)                                 \
2060   ((CLASS) != ALL_REGS                                                  \
2061    ? (! TARGET_MIPS16                                                   \
2062       ? (CLASS)                                                         \
2063       : ((CLASS) != GR_REGS                                             \
2064          ? (CLASS)                                                      \
2065          : M16_REGS))                                                   \
2066    : ((GET_MODE_CLASS (GET_MODE (X)) == MODE_FLOAT                      \
2067        || GET_MODE_CLASS (GET_MODE (X)) == MODE_COMPLEX_FLOAT)          \
2068       ? (TARGET_SOFT_FLOAT                                              \
2069          ? (TARGET_MIPS16 ? M16_REGS : GR_REGS)                         \
2070          : FP_REGS)                                                     \
2071       : ((GET_MODE_CLASS (GET_MODE (X)) == MODE_INT                     \
2072           || GET_MODE (X) == VOIDmode)                                  \
2073          ? (TARGET_MIPS16 ? M16_REGS : GR_REGS)                         \
2074          : (CLASS))))
2075
2076 /* Certain machines have the property that some registers cannot be
2077    copied to some other registers without using memory.  Define this
2078    macro on those machines to be a C expression that is nonzero if
2079    objects of mode MODE in registers of CLASS1 can only be copied to
2080    registers of class CLASS2 by storing a register of CLASS1 into
2081    memory and loading that memory location into a register of CLASS2.
2082
2083    Do not define this macro if its value would always be zero.  */
2084 #if 0
2085 #define SECONDARY_MEMORY_NEEDED(CLASS1, CLASS2, MODE)                   \
2086   ((!TARGET_DEBUG_H_MODE                                                \
2087     && GET_MODE_CLASS (MODE) == MODE_INT                                \
2088     && ((CLASS1 == FP_REGS && GR_REG_CLASS_P (CLASS2))                  \
2089         || (GR_REG_CLASS_P (CLASS1) && CLASS2 == FP_REGS)))             \
2090    || (TARGET_FLOAT64 && !TARGET_64BIT && (MODE) == DFmode              \
2091        && ((GR_REG_CLASS_P (CLASS1) && CLASS2 == FP_REGS)               \
2092            || (GR_REG_CLASS_P (CLASS2) && CLASS1 == FP_REGS))))
2093 #endif
2094 /* The HI and LO registers can only be reloaded via the general
2095    registers.  Condition code registers can only be loaded to the
2096    general registers, and from the floating point registers.  */
2097
2098 #define SECONDARY_INPUT_RELOAD_CLASS(CLASS, MODE, X)                    \
2099   mips_secondary_reload_class (CLASS, MODE, X, 1)
2100 #define SECONDARY_OUTPUT_RELOAD_CLASS(CLASS, MODE, X)                   \
2101   mips_secondary_reload_class (CLASS, MODE, X, 0)
2102
2103 /* Return the maximum number of consecutive registers
2104    needed to represent mode MODE in a register of class CLASS.  */
2105
2106 #define CLASS_MAX_NREGS(CLASS, MODE) mips_class_max_nregs (CLASS, MODE)
2107
2108 #define CANNOT_CHANGE_MODE_CLASS(FROM, TO, CLASS) \
2109   mips_cannot_change_mode_class (FROM, TO, CLASS)
2110 \f
2111 /* Stack layout; function entry, exit and calling.  */
2112
2113 #define STACK_GROWS_DOWNWARD
2114
2115 /* The offset of the first local variable from the beginning of the frame.
2116    See compute_frame_size for details about the frame layout.  */
2117 #define STARTING_FRAME_OFFSET                                           \
2118   (current_function_outgoing_args_size                                  \
2119    + (TARGET_ABICALLS && !TARGET_NEWABI                                 \
2120       ? MIPS_STACK_ALIGN (UNITS_PER_WORD) : 0))
2121
2122 #define RETURN_ADDR_RTX mips_return_addr
2123
2124 /* Since the mips16 ISA mode is encoded in the least-significant bit
2125    of the address, mask it off return addresses for purposes of
2126    finding exception handling regions.  */
2127
2128 #define MASK_RETURN_ADDR GEN_INT (-2)
2129
2130
2131 /* Similarly, don't use the least-significant bit to tell pointers to
2132    code from vtable index.  */
2133
2134 #define TARGET_PTRMEMFUNC_VBIT_LOCATION ptrmemfunc_vbit_in_delta
2135
2136 /* The eliminations to $17 are only used for mips16 code.  See the
2137    definition of HARD_FRAME_POINTER_REGNUM.  */
2138
2139 #define ELIMINABLE_REGS                                                 \
2140 {{ ARG_POINTER_REGNUM,   STACK_POINTER_REGNUM},                         \
2141  { ARG_POINTER_REGNUM,   GP_REG_FIRST + 30},                            \
2142  { ARG_POINTER_REGNUM,   GP_REG_FIRST + 17},                            \
2143  { FRAME_POINTER_REGNUM, STACK_POINTER_REGNUM},                         \
2144  { FRAME_POINTER_REGNUM, GP_REG_FIRST + 30},                            \
2145  { FRAME_POINTER_REGNUM, GP_REG_FIRST + 17}}
2146
2147 /* We can always eliminate to the hard frame pointer.  We can eliminate
2148    to the stack pointer unless a frame pointer is needed.
2149
2150    In mips16 mode, we need a frame pointer for a large frame; otherwise,
2151    reload may be unable to compute the address of a local variable,
2152    since there is no way to add a large constant to the stack pointer
2153    without using a temporary register.
2154
2155    Also, for some mips16 instructions (eg lwu), we can't eliminate the
2156    frame pointer for the stack pointer.  These instructions are
2157    only generated in TARGET_64BIT mode.  */
2158 #define CAN_ELIMINATE(FROM, TO)                                         \
2159   ((TO) == HARD_FRAME_POINTER_REGNUM                                    \
2160    || ((TO) == STACK_POINTER_REGNUM && !frame_pointer_needed            \
2161        && !(TARGET_MIPS16 && TARGET_64BIT)                              \
2162        && (!TARGET_MIPS16                                               \
2163            || compute_frame_size (get_frame_size ()) < 32768)))
2164
2165 #define INITIAL_ELIMINATION_OFFSET(FROM, TO, OFFSET) \
2166   (OFFSET) = mips_initial_elimination_offset ((FROM), (TO))
2167
2168 /* Allocate stack space for arguments at the beginning of each function.  */
2169 #define ACCUMULATE_OUTGOING_ARGS 1
2170
2171 /* The argument pointer always points to the first argument.  */
2172 #define FIRST_PARM_OFFSET(FNDECL) 0
2173
2174 /* o32 and o64 reserve stack space for all argument registers.  */
2175 #define REG_PARM_STACK_SPACE(FNDECL)                    \
2176   ((mips_abi == ABI_32 || mips_abi == ABI_O64)          \
2177    ? (MAX_ARGS_IN_REGISTERS * UNITS_PER_WORD)           \
2178    : 0)
2179
2180 /* Define this if it is the responsibility of the caller to
2181    allocate the area reserved for arguments passed in registers.
2182    If `ACCUMULATE_OUTGOING_ARGS' is also defined, the only effect
2183    of this macro is to determine whether the space is included in
2184    `current_function_outgoing_args_size'.  */
2185 #define OUTGOING_REG_PARM_STACK_SPACE
2186
2187 #define STACK_BOUNDARY \
2188   ((mips_abi == ABI_32 || mips_abi == ABI_O64 || mips_abi == ABI_EABI) \
2189    ? 64 : 128)
2190
2191 \f
2192 #define RETURN_POPS_ARGS(FUNDECL,FUNTYPE,SIZE) 0
2193
2194 /* Symbolic macros for the registers used to return integer and floating
2195    point values.  */
2196
2197 #define GP_RETURN (GP_REG_FIRST + 2)
2198 #define FP_RETURN ((TARGET_SOFT_FLOAT) ? GP_RETURN : (FP_REG_FIRST + 0))
2199
2200 #define MAX_ARGS_IN_REGISTERS \
2201   ((mips_abi == ABI_32 || mips_abi == ABI_O64) ? 4 : 8)
2202
2203 /* Largest possible value of MAX_ARGS_IN_REGISTERS.  */
2204
2205 #define BIGGEST_MAX_ARGS_IN_REGISTERS 8
2206
2207 /* Symbolic macros for the first/last argument registers.  */
2208
2209 #define GP_ARG_FIRST (GP_REG_FIRST + 4)
2210 #define GP_ARG_LAST  (GP_ARG_FIRST + MAX_ARGS_IN_REGISTERS - 1)
2211 #define FP_ARG_FIRST (FP_REG_FIRST + 12)
2212 #define FP_ARG_LAST  (FP_ARG_FIRST + MAX_ARGS_IN_REGISTERS - 1)
2213
2214 #define LIBCALL_VALUE(MODE) \
2215   mips_function_value (NULL_TREE, NULL, (MODE))
2216
2217 #define FUNCTION_VALUE(VALTYPE, FUNC) \
2218   mips_function_value ((VALTYPE), (FUNC), VOIDmode)
2219
2220 /* 1 if N is a possible register number for a function value.
2221    On the MIPS, R2 R3 and F0 F2 are the only register thus used.
2222    Currently, R2 and F0 are only implemented  here (C has no complex type)  */
2223
2224 #define FUNCTION_VALUE_REGNO_P(N) ((N) == GP_RETURN || (N) == FP_RETURN \
2225   || (LONG_DOUBLE_TYPE_SIZE == 128 && FP_RETURN != GP_RETURN \
2226       && (N) == FP_RETURN + 2))
2227
2228 /* 1 if N is a possible register number for function argument passing.
2229    We have no FP argument registers when soft-float.  When FP registers
2230    are 32 bits, we can't directly reference the odd numbered ones.  */
2231
2232 #define FUNCTION_ARG_REGNO_P(N)                                 \
2233   ((IN_RANGE((N), GP_ARG_FIRST, GP_ARG_LAST)                    \
2234     || (IN_RANGE((N), FP_ARG_FIRST, FP_ARG_LAST)                \
2235         && ((N) % FP_INC == 0) && mips_abi != ABI_O64))         \
2236    && !fixed_regs[N])
2237
2238 #define RETURN_IN_MEMORY(TYPE) mips_return_in_memory (TYPE)
2239
2240 #define SETUP_INCOMING_VARARGS(CUM,MODE,TYPE,PRETEND_SIZE,NO_RTL)       \
2241         (PRETEND_SIZE) = mips_setup_incoming_varargs (&(CUM), (MODE),   \
2242                                                       (TYPE), (NO_RTL))
2243 \f
2244 #define STRICT_ARGUMENT_NAMING (mips_abi != ABI_32 && mips_abi != ABI_O64)
2245
2246 /* This structure has to cope with two different argument allocation
2247    schemes.  Most MIPS ABIs view the arguments as a struct, of which the
2248    first N words go in registers and the rest go on the stack.  If I < N,
2249    the Ith word might go in Ith integer argument register or the
2250    Ith floating-point one.  For these ABIs, we only need to remember
2251    the number of words passed so far.
2252
2253    The EABI instead allocates the integer and floating-point arguments
2254    separately.  The first N words of FP arguments go in FP registers,
2255    the rest go on the stack.  Likewise, the first N words of the other
2256    arguments go in integer registers, and the rest go on the stack.  We
2257    need to maintain three counts: the number of integer registers used,
2258    the number of floating-point registers used, and the number of words
2259    passed on the stack.
2260
2261    We could keep separate information for the two ABIs (a word count for
2262    the standard ABIs, and three separate counts for the EABI).  But it
2263    seems simpler to view the standard ABIs as forms of EABI that do not
2264    allocate floating-point registers.
2265
2266    So for the standard ABIs, the first N words are allocated to integer
2267    registers, and function_arg decides on an argument-by-argument basis
2268    whether that argument should really go in an integer register, or in
2269    a floating-point one.  */
2270
2271 typedef struct mips_args {
2272   /* Always true for varargs functions.  Otherwise true if at least
2273      one argument has been passed in an integer register.  */
2274   int gp_reg_found;
2275
2276   /* The number of arguments seen so far.  */
2277   unsigned int arg_number;
2278
2279   /* For EABI, the number of integer registers used so far.  For other
2280      ABIs, the number of words passed in registers (whether integer
2281      or floating-point).  */
2282   unsigned int num_gprs;
2283
2284   /* For EABI, the number of floating-point registers used so far.  */
2285   unsigned int num_fprs;
2286
2287   /* The number of words passed on the stack.  */
2288   unsigned int stack_words;
2289
2290   /* On the mips16, we need to keep track of which floating point
2291      arguments were passed in general registers, but would have been
2292      passed in the FP regs if this were a 32 bit function, so that we
2293      can move them to the FP regs if we wind up calling a 32 bit
2294      function.  We record this information in fp_code, encoded in base
2295      four.  A zero digit means no floating point argument, a one digit
2296      means an SFmode argument, and a two digit means a DFmode argument,
2297      and a three digit is not used.  The low order digit is the first
2298      argument.  Thus 6 == 1 * 4 + 2 means a DFmode argument followed by
2299      an SFmode argument.  ??? A more sophisticated approach will be
2300      needed if MIPS_ABI != ABI_32.  */
2301   int fp_code;
2302
2303   /* True if the function has a prototype.  */
2304   int prototype;
2305 } CUMULATIVE_ARGS;
2306
2307 /* Initialize a variable CUM of type CUMULATIVE_ARGS
2308    for a call to a function whose data type is FNTYPE.
2309    For a library call, FNTYPE is 0.
2310
2311 */
2312
2313 #define INIT_CUMULATIVE_ARGS(CUM,FNTYPE,LIBNAME,INDIRECT)               \
2314   init_cumulative_args (&CUM, FNTYPE, LIBNAME)                          \
2315
2316 /* Update the data in CUM to advance over an argument
2317    of mode MODE and data type TYPE.
2318    (TYPE is null for libcalls where that information may not be available.)  */
2319
2320 #define FUNCTION_ARG_ADVANCE(CUM, MODE, TYPE, NAMED)                    \
2321   function_arg_advance (&CUM, MODE, TYPE, NAMED)
2322
2323 /* Determine where to put an argument to a function.
2324    Value is zero to push the argument on the stack,
2325    or a hard register in which to store the argument.
2326
2327    MODE is the argument's machine mode.
2328    TYPE is the data type of the argument (as a tree).
2329     This is null for libcalls where that information may
2330     not be available.
2331    CUM is a variable of type CUMULATIVE_ARGS which gives info about
2332     the preceding args and about the function being called.
2333    NAMED is nonzero if this argument is a named parameter
2334     (otherwise it is an extra parameter matching an ellipsis).  */
2335
2336 #define FUNCTION_ARG(CUM, MODE, TYPE, NAMED) \
2337   function_arg( &CUM, MODE, TYPE, NAMED)
2338
2339 /* For an arg passed partly in registers and partly in memory,
2340    this is the number of registers used.
2341    For args passed entirely in registers or entirely in memory, zero.  */
2342
2343 #define FUNCTION_ARG_PARTIAL_NREGS(CUM, MODE, TYPE, NAMED) \
2344   function_arg_partial_nregs (&CUM, MODE, TYPE, NAMED)
2345
2346 /* If defined, a C expression that gives the alignment boundary, in
2347    bits, of an argument with the specified mode and type.  If it is
2348    not defined,  `PARM_BOUNDARY' is used for all arguments.  */
2349
2350 #define FUNCTION_ARG_BOUNDARY(MODE, TYPE)                               \
2351   (((TYPE) != 0)                                                        \
2352         ? ((TYPE_ALIGN(TYPE) <= PARM_BOUNDARY)                          \
2353                 ? PARM_BOUNDARY                                         \
2354                 : TYPE_ALIGN(TYPE))                                     \
2355         : ((GET_MODE_ALIGNMENT(MODE) <= PARM_BOUNDARY)                  \
2356                 ? PARM_BOUNDARY                                         \
2357                 : GET_MODE_ALIGNMENT(MODE)))
2358
2359 #define FUNCTION_ARG_PASS_BY_REFERENCE(CUM, MODE, TYPE, NAMED)          \
2360   function_arg_pass_by_reference (&CUM, MODE, TYPE, NAMED)
2361
2362 #define FUNCTION_ARG_PADDING(MODE, TYPE)                \
2363   (mips_pad_arg_upward (MODE, TYPE) ? upward : downward)
2364
2365 #define BLOCK_REG_PADDING(MODE, TYPE, FIRST)            \
2366   (mips_pad_reg_upward (MODE, TYPE) ? upward : downward)
2367
2368 #define FUNCTION_ARG_CALLEE_COPIES(CUM, MODE, TYPE, NAMED)              \
2369   (mips_abi == ABI_EABI && (NAMED)                                      \
2370    && FUNCTION_ARG_PASS_BY_REFERENCE (CUM, MODE, TYPE, NAMED))
2371
2372 /* Modified version of the macro in expr.h.  Only return true if
2373    the type has a variable size or if the front end requires it
2374    to be passed by reference.  */
2375 #define MUST_PASS_IN_STACK(MODE,TYPE)                   \
2376   ((TYPE) != 0                                          \
2377    && (TREE_CODE (TYPE_SIZE (TYPE)) != INTEGER_CST      \
2378        || TREE_ADDRESSABLE (TYPE)))
2379
2380 /* True if using EABI and varargs can be passed in floating-point
2381    registers.  Under these conditions, we need a more complex form
2382    of va_list, which tracks GPR, FPR and stack arguments separately.  */
2383 #define EABI_FLOAT_VARARGS_P \
2384         (mips_abi == ABI_EABI && UNITS_PER_FPVALUE >= UNITS_PER_DOUBLE)
2385
2386 \f
2387 /* Say that the epilogue uses the return address register.  Note that
2388    in the case of sibcalls, the values "used by the epilogue" are
2389    considered live at the start of the called function.  */
2390 #define EPILOGUE_USES(REGNO) ((REGNO) == 31)
2391
2392 /* Treat LOC as a byte offset from the stack pointer and round it up
2393    to the next fully-aligned offset.  */
2394 #define MIPS_STACK_ALIGN(LOC)                                           \
2395   ((mips_abi == ABI_32 || mips_abi == ABI_O64 || mips_abi == ABI_EABI)  \
2396    ? ((LOC) + 7) & ~7                                                   \
2397    : ((LOC) + 15) & ~15)
2398
2399 \f
2400 /* Define the `__builtin_va_list' type for the ABI.  */
2401 #define BUILD_VA_LIST_TYPE(VALIST) \
2402   (VALIST) = mips_build_va_list ()
2403
2404 /* Implement `va_start' for varargs and stdarg.  */
2405 #define EXPAND_BUILTIN_VA_START(valist, nextarg) \
2406   mips_va_start (valist, nextarg)
2407
2408 /* Implement `va_arg'.  */
2409 #define EXPAND_BUILTIN_VA_ARG(valist, type) \
2410   mips_va_arg (valist, type)
2411 \f
2412 /* Output assembler code to FILE to increment profiler label # LABELNO
2413    for profiling a function entry.  */
2414
2415 #define FUNCTION_PROFILER(FILE, LABELNO)                                \
2416 {                                                                       \
2417   if (TARGET_MIPS16)                                                    \
2418     sorry ("mips16 function profiling");                                \
2419   fprintf (FILE, "\t.set\tnoat\n");                                     \
2420   fprintf (FILE, "\tmove\t%s,%s\t\t# save current return address\n",    \
2421            reg_names[GP_REG_FIRST + 1], reg_names[GP_REG_FIRST + 31]);  \
2422   if (mips_abi != ABI_N32 && mips_abi != ABI_64)                        \
2423     {                                                                   \
2424       fprintf (FILE,                                                    \
2425                "\t%s\t%s,%s,%d\t\t# _mcount pops 2 words from  stack\n", \
2426                TARGET_64BIT ? "dsubu" : "subu",                         \
2427                reg_names[STACK_POINTER_REGNUM],                         \
2428                reg_names[STACK_POINTER_REGNUM],                         \
2429                Pmode == DImode ? 16 : 8);                               \
2430     }                                                                   \
2431   fprintf (FILE, "\tjal\t_mcount\n");                                   \
2432   fprintf (FILE, "\t.set\tat\n");                                       \
2433 }
2434
2435 /* Define this macro if the code for function profiling should come
2436    before the function prologue.  Normally, the profiling code comes
2437    after.  */
2438
2439 /* #define PROFILE_BEFORE_PROLOGUE */
2440
2441 /* EXIT_IGNORE_STACK should be nonzero if, when returning from a function,
2442    the stack pointer does not matter.  The value is tested only in
2443    functions that have frame pointers.
2444    No definition is equivalent to always zero.  */
2445
2446 #define EXIT_IGNORE_STACK 1
2447
2448 \f
2449 /* A C statement to output, on the stream FILE, assembler code for a
2450    block of data that contains the constant parts of a trampoline.
2451    This code should not include a label--the label is taken care of
2452    automatically.  */
2453
2454 #define TRAMPOLINE_TEMPLATE(STREAM)                                      \
2455 {                                                                        \
2456   fprintf (STREAM, "\t.word\t0x03e00821\t\t# move   $1,$31\n");         \
2457   fprintf (STREAM, "\t.word\t0x04110001\t\t# bgezal $0,.+8\n");         \
2458   fprintf (STREAM, "\t.word\t0x00000000\t\t# nop\n");                   \
2459   if (ptr_mode == DImode)                                               \
2460     {                                                                   \
2461       fprintf (STREAM, "\t.word\t0xdfe30014\t\t# ld     $3,20($31)\n"); \
2462       fprintf (STREAM, "\t.word\t0xdfe2001c\t\t# ld     $2,28($31)\n"); \
2463     }                                                                   \
2464   else                                                                  \
2465     {                                                                   \
2466       fprintf (STREAM, "\t.word\t0x8fe30014\t\t# lw     $3,20($31)\n"); \
2467       fprintf (STREAM, "\t.word\t0x8fe20018\t\t# lw     $2,24($31)\n"); \
2468     }                                                                   \
2469   fprintf (STREAM, "\t.word\t0x0060c821\t\t# move   $25,$3 (abicalls)\n"); \
2470   fprintf (STREAM, "\t.word\t0x00600008\t\t# jr     $3\n");             \
2471   fprintf (STREAM, "\t.word\t0x0020f821\t\t# move   $31,$1\n");         \
2472   if (ptr_mode == DImode)                                               \
2473     {                                                                   \
2474       fprintf (STREAM, "\t.dword\t0x00000000\t\t# <function address>\n"); \
2475       fprintf (STREAM, "\t.dword\t0x00000000\t\t# <static chain value>\n"); \
2476     }                                                                   \
2477   else                                                                  \
2478     {                                                                   \
2479       fprintf (STREAM, "\t.word\t0x00000000\t\t# <function address>\n"); \
2480       fprintf (STREAM, "\t.word\t0x00000000\t\t# <static chain value>\n"); \
2481     }                                                                   \
2482 }
2483
2484 /* A C expression for the size in bytes of the trampoline, as an
2485    integer.  */
2486
2487 #define TRAMPOLINE_SIZE (32 + GET_MODE_SIZE (ptr_mode) * 2)
2488
2489 /* Alignment required for trampolines, in bits.  */
2490
2491 #define TRAMPOLINE_ALIGNMENT GET_MODE_BITSIZE (ptr_mode)
2492
2493 /* INITIALIZE_TRAMPOLINE calls this library function to flush
2494    program and data caches.  */
2495
2496 #ifndef CACHE_FLUSH_FUNC
2497 #define CACHE_FLUSH_FUNC "_flush_cache"
2498 #endif
2499
2500 /* A C statement to initialize the variable parts of a trampoline.
2501    ADDR is an RTX for the address of the trampoline; FNADDR is an
2502    RTX for the address of the nested function; STATIC_CHAIN is an
2503    RTX for the static chain value that should be passed to the
2504    function when it is called.  */
2505
2506 #define INITIALIZE_TRAMPOLINE(ADDR, FUNC, CHAIN)                            \
2507 {                                                                           \
2508   rtx func_addr, chain_addr;                                                \
2509                                                                             \
2510   func_addr = plus_constant (ADDR, 32);                                     \
2511   chain_addr = plus_constant (func_addr, GET_MODE_SIZE (ptr_mode));         \
2512   emit_move_insn (gen_rtx_MEM (ptr_mode, func_addr),                        \
2513                   gen_lowpart (ptr_mode, force_reg (Pmode, FUNC)));         \
2514   emit_move_insn (gen_rtx_MEM (ptr_mode, chain_addr),                       \
2515                   gen_lowpart (ptr_mode, force_reg (Pmode, CHAIN)));        \
2516                                                                             \
2517   /* Flush both caches.  We need to flush the data cache in case            \
2518      the system has a write-back cache.  */                                 \
2519   /* ??? Should check the return value for errors.  */                      \
2520   if (mips_cache_flush_func && mips_cache_flush_func[0])                    \
2521     emit_library_call (gen_rtx_SYMBOL_REF (Pmode, mips_cache_flush_func),   \
2522                        0, VOIDmode, 3, ADDR, Pmode,                         \
2523                        GEN_INT (TRAMPOLINE_SIZE), TYPE_MODE (integer_type_node),\
2524                        GEN_INT (3), TYPE_MODE (integer_type_node));         \
2525 }
2526 \f
2527 /* Addressing modes, and classification of registers for them.  */
2528
2529 /* These assume that REGNO is a hard or pseudo reg number.
2530    They give nonzero only if REGNO is a hard reg of the suitable class
2531    or a pseudo reg currently allocated to a suitable hard reg.
2532    These definitions are NOT overridden anywhere.  */
2533
2534 #define BASE_REG_P(regno, mode)                                 \
2535   (TARGET_MIPS16                                                \
2536    ? (M16_REG_P (regno)                                         \
2537       || (regno) == FRAME_POINTER_REGNUM                        \
2538       || (regno) == ARG_POINTER_REGNUM                          \
2539       || ((regno) == STACK_POINTER_REGNUM                       \
2540           && (GET_MODE_SIZE (mode) == 4                         \
2541               || GET_MODE_SIZE (mode) == 8)))                   \
2542    : GP_REG_P (regno))
2543
2544 #define GP_REG_OR_PSEUDO_STRICT_P(regno, mode)                              \
2545   BASE_REG_P((regno < FIRST_PSEUDO_REGISTER) ? (int) regno : reg_renumber[regno], \
2546              (mode))
2547
2548 #define GP_REG_OR_PSEUDO_NONSTRICT_P(regno, mode) \
2549   (((regno) >= FIRST_PSEUDO_REGISTER) || (BASE_REG_P ((regno), (mode))))
2550
2551 #define REGNO_OK_FOR_INDEX_P(regno)     0
2552 #define REGNO_MODE_OK_FOR_BASE_P(regno, mode) \
2553   GP_REG_OR_PSEUDO_STRICT_P ((regno), (mode))
2554
2555 /* The macros REG_OK_FOR..._P assume that the arg is a REG rtx
2556    and check its validity for a certain class.
2557    We have two alternate definitions for each of them.
2558    The usual definition accepts all pseudo regs; the other rejects them all.
2559    The symbol REG_OK_STRICT causes the latter definition to be used.
2560
2561    Most source files want to accept pseudo regs in the hope that
2562    they will get allocated to the class that the insn wants them to be in.
2563    Some source files that are used after register allocation
2564    need to be strict.  */
2565
2566 #ifndef REG_OK_STRICT
2567 #define REG_MODE_OK_FOR_BASE_P(X, MODE) \
2568   mips_reg_mode_ok_for_base_p (X, MODE, 0)
2569 #else
2570 #define REG_MODE_OK_FOR_BASE_P(X, MODE) \
2571   mips_reg_mode_ok_for_base_p (X, MODE, 1)
2572 #endif
2573
2574 #define REG_OK_FOR_INDEX_P(X) 0
2575
2576 \f
2577 /* Maximum number of registers that can appear in a valid memory address.  */
2578
2579 #define MAX_REGS_PER_ADDRESS 1
2580
2581 /* A C compound statement with a conditional `goto LABEL;' executed
2582    if X (an RTX) is a legitimate memory address on the target
2583    machine for a memory operand of mode MODE.  */
2584
2585 #if 1
2586 #define GO_PRINTF(x)    fprintf(stderr, (x))
2587 #define GO_PRINTF2(x,y) fprintf(stderr, (x), (y))
2588 #define GO_DEBUG_RTX(x) debug_rtx(x)
2589
2590 #else
2591 #define GO_PRINTF(x)
2592 #define GO_PRINTF2(x,y)
2593 #define GO_DEBUG_RTX(x)
2594 #endif
2595
2596 #ifdef REG_OK_STRICT
2597 #define GO_IF_LEGITIMATE_ADDRESS(MODE, X, ADDR) \
2598 {                                               \
2599   if (mips_legitimate_address_p (MODE, X, 1))   \
2600     goto ADDR;                                  \
2601 }
2602 #else
2603 #define GO_IF_LEGITIMATE_ADDRESS(MODE, X, ADDR) \
2604 {                                               \
2605   if (mips_legitimate_address_p (MODE, X, 0))   \
2606     goto ADDR;                                  \
2607 }
2608 #endif
2609
2610 /* Check for constness inline but use mips_legitimate_address_p
2611    to check whether a constant really is an address.  */
2612
2613 #define CONSTANT_ADDRESS_P(X) \
2614   (CONSTANT_P (X) && mips_legitimate_address_p (SImode, X, 0))
2615
2616 #define LEGITIMATE_CONSTANT_P(X) (mips_const_insns (X) > 0)
2617
2618 #define LEGITIMIZE_ADDRESS(X,OLDX,MODE,WIN)                     \
2619   do {                                                          \
2620     if (mips_legitimize_address (&(X), MODE))                   \
2621       goto WIN;                                                 \
2622   } while (0)
2623
2624
2625 /* A C statement or compound statement with a conditional `goto
2626    LABEL;' executed if memory address X (an RTX) can have different
2627    meanings depending on the machine mode of the memory reference it
2628    is used for.
2629
2630    Autoincrement and autodecrement addresses typically have
2631    mode-dependent effects because the amount of the increment or
2632    decrement is the size of the operand being addressed.  Some
2633    machines have other mode-dependent addresses.  Many RISC machines
2634    have no mode-dependent addresses.
2635
2636    You may assume that ADDR is a valid address for the machine.  */
2637
2638 #define GO_IF_MODE_DEPENDENT_ADDRESS(ADDR,LABEL) {}
2639
2640 /* This handles the magic '..CURRENT_FUNCTION' symbol, which means
2641    'the start of the function that this code is output in'.  */
2642
2643 #define ASM_OUTPUT_LABELREF(FILE,NAME)  \
2644   if (strcmp (NAME, "..CURRENT_FUNCTION") == 0)                         \
2645     asm_fprintf ((FILE), "%U%s",                                        \
2646                  XSTR (XEXP (DECL_RTL (current_function_decl), 0), 0)); \
2647   else                                                                  \
2648     asm_fprintf ((FILE), "%U%s", (NAME))
2649
2650 /* The mips16 wants the constant pool to be after the function,
2651    because the PC relative load instructions use unsigned offsets.  */
2652
2653 #define CONSTANT_POOL_BEFORE_FUNCTION (! TARGET_MIPS16)
2654
2655 #define ASM_OUTPUT_POOL_EPILOGUE(FILE, FNNAME, FNDECL, SIZE)    \
2656   mips_string_length = 0;
2657 \f
2658 /* Specify the machine mode that this machine uses
2659    for the index in the tablejump instruction.
2660    ??? Using HImode in mips16 mode can cause overflow. */
2661 #define CASE_VECTOR_MODE \
2662   (TARGET_MIPS16 ? HImode : ptr_mode)
2663
2664 /* Define as C expression which evaluates to nonzero if the tablejump
2665    instruction expects the table to contain offsets from the address of the
2666    table.
2667    Do not define this if the table should contain absolute addresses.  */
2668 #define CASE_VECTOR_PC_RELATIVE (TARGET_MIPS16)
2669
2670 /* Define this as 1 if `char' should by default be signed; else as 0.  */
2671 #ifndef DEFAULT_SIGNED_CHAR
2672 #define DEFAULT_SIGNED_CHAR 1
2673 #endif
2674
2675 /* Max number of bytes we can move from memory to memory
2676    in one reasonably fast instruction.  */
2677 #define MOVE_MAX (TARGET_64BIT ? 8 : 4)
2678 #define MAX_MOVE_MAX 8
2679
2680 /* Define this macro as a C expression which is nonzero if
2681    accessing less than a word of memory (i.e. a `char' or a
2682    `short') is no faster than accessing a word of memory, i.e., if
2683    such access require more than one instruction or if there is no
2684    difference in cost between byte and (aligned) word loads.
2685
2686    On RISC machines, it tends to generate better code to define
2687    this as 1, since it avoids making a QI or HI mode register.  */
2688 #define SLOW_BYTE_ACCESS 1
2689
2690 /* Define this to be nonzero if shift instructions ignore all but the low-order
2691    few bits.  */
2692 #define SHIFT_COUNT_TRUNCATED 1
2693
2694 /* Value is 1 if truncating an integer of INPREC bits to OUTPREC bits
2695    is done just by pretending it is already truncated.  */
2696 #define TRULY_NOOP_TRUNCATION(OUTPREC, INPREC) \
2697   (TARGET_64BIT ? ((INPREC) <= 32 || (OUTPREC) > 32) : 1)
2698
2699
2700 /* Specify the machine mode that pointers have.
2701    After generation of rtl, the compiler makes no further distinction
2702    between pointers and any other objects of this machine mode.  */
2703
2704 #ifndef Pmode
2705 #define Pmode (TARGET_64BIT && TARGET_LONG64 ? DImode : SImode)
2706 #endif
2707
2708 /* Give call MEMs SImode since it is the "most permissive" mode
2709    for both 32-bit and 64-bit targets.  */
2710
2711 #define FUNCTION_MODE SImode
2712
2713 \f
2714 /* The cost of loading values from the constant pool.  It should be
2715    larger than the cost of any constant we want to synthesize in-line.  */
2716
2717 #define CONSTANT_POOL_COST COSTS_N_INSNS (8)
2718
2719 /* A C expression for the cost of moving data from a register in
2720    class FROM to one in class TO.  The classes are expressed using
2721    the enumeration values such as `GENERAL_REGS'.  A value of 2 is
2722    the default; other values are interpreted relative to that.
2723
2724    It is not required that the cost always equal 2 when FROM is the
2725    same as TO; on some machines it is expensive to move between
2726    registers if they are not general registers.
2727
2728    If reload sees an insn consisting of a single `set' between two
2729    hard registers, and if `REGISTER_MOVE_COST' applied to their
2730    classes returns a value of 2, reload does not check to ensure
2731    that the constraints of the insn are met.  Setting a cost of
2732    other than 2 will allow reload to verify that the constraints are
2733    met.  You should do this if the `movM' pattern's constraints do
2734    not allow such copying. */
2735
2736 #define REGISTER_MOVE_COST(MODE, FROM, TO)                              \
2737   mips_register_move_cost (MODE, FROM, TO)
2738
2739 /* ??? Fix this to be right for the R8000.  */
2740 #define MEMORY_MOVE_COST(MODE,CLASS,TO_P) \
2741   (((TUNE_MIPS4000 || TUNE_MIPS6000) ? 6 : 4) \
2742    + memory_move_secondary_cost ((MODE), (CLASS), (TO_P)))
2743
2744 /* Define if copies to/from condition code registers should be avoided.
2745
2746    This is needed for the MIPS because reload_outcc is not complete;
2747    it needs to handle cases where the source is a general or another
2748    condition code register.  */
2749 #define AVOID_CCMODE_COPIES
2750
2751 /* A C expression for the cost of a branch instruction.  A value of
2752    1 is the default; other values are interpreted relative to that.  */
2753
2754 /* ??? Fix this to be right for the R8000.  */
2755 #define BRANCH_COST                                                     \
2756   ((! TARGET_MIPS16                                                     \
2757     && (TUNE_MIPS4000 || TUNE_MIPS6000))        \
2758    ? 2 : 1)
2759
2760 /* If defined, modifies the length assigned to instruction INSN as a
2761    function of the context in which it is used.  LENGTH is an lvalue
2762    that contains the initially computed length of the insn and should
2763    be updated with the correct length of the insn.  */
2764 #define ADJUST_INSN_LENGTH(INSN, LENGTH) \
2765   ((LENGTH) = mips_adjust_insn_length ((INSN), (LENGTH)))
2766
2767 \f
2768 /* Optionally define this if you have added predicates to
2769    `MACHINE.c'.  This macro is called within an initializer of an
2770    array of structures.  The first field in the structure is the
2771    name of a predicate and the second field is an array of rtl
2772    codes.  For each predicate, list all rtl codes that can be in
2773    expressions matched by the predicate.  The list should have a
2774    trailing comma.  Here is an example of two entries in the list
2775    for a typical RISC machine:
2776
2777    #define PREDICATE_CODES \
2778      {"gen_reg_rtx_operand", {SUBREG, REG}},  \
2779      {"reg_or_short_cint_operand", {SUBREG, REG, CONST_INT}},
2780
2781    Defining this macro does not affect the generated code (however,
2782    incorrect definitions that omit an rtl code that may be matched
2783    by the predicate can cause the compiler to malfunction).
2784    Instead, it allows the table built by `genrecog' to be more
2785    compact and efficient, thus speeding up the compiler.  The most
2786    important predicates to include in the list specified by this
2787    macro are thoses used in the most insn patterns.  */
2788
2789 #define PREDICATE_CODES                                                 \
2790   {"uns_arith_operand",         { REG, CONST_INT, SUBREG, ADDRESSOF }}, \
2791   {"symbolic_operand",          { CONST, SYMBOL_REF, LABEL_REF }},      \
2792   {"const_arith_operand",       { CONST, CONST_INT }},                  \
2793   {"arith_operand",             { REG, CONST_INT, CONST, SUBREG, ADDRESSOF }},  \
2794   {"reg_or_0_operand",          { REG, CONST_INT, CONST_DOUBLE, SUBREG, ADDRESSOF }}, \
2795   {"small_int",                 { CONST_INT }},                         \
2796   {"mips_const_double_ok",      { CONST_DOUBLE }},                      \
2797   {"const_float_1_operand",     { CONST_DOUBLE }},                      \
2798   {"reg_or_const_float_1_operand", { CONST_DOUBLE, REG}},               \
2799   {"simple_memory_operand",     { MEM, SUBREG }},                       \
2800   {"equality_op",               { EQ, NE }},                            \
2801   {"cmp_op",                    { EQ, NE, GT, GE, GTU, GEU, LT, LE,     \
2802                                   LTU, LEU }},                          \
2803   {"trap_cmp_op",               { EQ, NE, GE, GEU, LT, LTU }},          \
2804   {"pc_or_label_operand",       { PC, LABEL_REF }},                     \
2805   {"call_insn_operand",         { CONST, SYMBOL_REF, LABEL_REF, REG }}, \
2806   {"move_operand",              { CONST_INT, CONST_DOUBLE, CONST,       \
2807                                   SYMBOL_REF, LABEL_REF, SUBREG,        \
2808                                   REG, MEM}},                           \
2809   {"stack_operand",             { MEM }},                               \
2810   {"consttable_operand",        { LABEL_REF, SYMBOL_REF, CONST_INT,     \
2811                                   CONST_DOUBLE, CONST }},               \
2812   {"fcc_register_operand",      { REG, SUBREG }},                       \
2813   {"hilo_operand",              { REG }},                               \
2814   {"extend_operator",           { ZERO_EXTEND, SIGN_EXTEND }},
2815
2816 /* A list of predicates that do special things with modes, and so
2817    should not elicit warnings for VOIDmode match_operand.  */
2818
2819 #define SPECIAL_MODE_PREDICATES \
2820   "pc_or_label_operand",
2821 \f
2822 /* Control the assembler format that we output.  */
2823
2824 /* Output to assembler file text saying following lines
2825    may contain character constants, extra white space, comments, etc.  */
2826
2827 #ifndef ASM_APP_ON
2828 #define ASM_APP_ON " #APP\n"
2829 #endif
2830
2831 /* Output to assembler file text saying following lines
2832    no longer contain unusual constructs.  */
2833
2834 #ifndef ASM_APP_OFF
2835 #define ASM_APP_OFF " #NO_APP\n"
2836 #endif
2837
2838 /* How to refer to registers in assembler output.
2839    This sequence is indexed by compiler's hard-register-number (see above).
2840
2841    In order to support the two different conventions for register names,
2842    we use the name of a table set up in mips.c, which is overwritten
2843    if -mrnames is used.  */
2844
2845 #define REGISTER_NAMES                                                  \
2846 {                                                                       \
2847   &mips_reg_names[ 0][0],                                               \
2848   &mips_reg_names[ 1][0],                                               \
2849   &mips_reg_names[ 2][0],                                               \
2850   &mips_reg_names[ 3][0],                                               \
2851   &mips_reg_names[ 4][0],                                               \
2852   &mips_reg_names[ 5][0],                                               \
2853   &mips_reg_names[ 6][0],                                               \
2854   &mips_reg_names[ 7][0],                                               \
2855   &mips_reg_names[ 8][0],                                               \
2856   &mips_reg_names[ 9][0],                                               \
2857   &mips_reg_names[10][0],                                               \
2858   &mips_reg_names[11][0],                                               \
2859   &mips_reg_names[12][0],                                               \
2860   &mips_reg_names[13][0],                                               \
2861   &mips_reg_names[14][0],                                               \
2862   &mips_reg_names[15][0],                                               \
2863   &mips_reg_names[16][0],                                               \
2864   &mips_reg_names[17][0],                                               \
2865   &mips_reg_names[18][0],                                               \
2866   &mips_reg_names[19][0],                                               \
2867   &mips_reg_names[20][0],                                               \
2868   &mips_reg_names[21][0],                                               \
2869   &mips_reg_names[22][0],                                               \
2870   &mips_reg_names[23][0],                                               \
2871   &mips_reg_names[24][0],                                               \
2872   &mips_reg_names[25][0],                                               \
2873   &mips_reg_names[26][0],                                               \
2874   &mips_reg_names[27][0],                                               \
2875   &mips_reg_names[28][0],                                               \
2876   &mips_reg_names[29][0],                                               \
2877   &mips_reg_names[30][0],                                               \
2878   &mips_reg_names[31][0],                                               \
2879   &mips_reg_names[32][0],                                               \
2880   &mips_reg_names[33][0],                                               \
2881   &mips_reg_names[34][0],                                               \
2882   &mips_reg_names[35][0],                                               \
2883   &mips_reg_names[36][0],                                               \
2884   &mips_reg_names[37][0],                                               \
2885   &mips_reg_names[38][0],                                               \
2886   &mips_reg_names[39][0],                                               \
2887   &mips_reg_names[40][0],                                               \
2888   &mips_reg_names[41][0],                                               \
2889   &mips_reg_names[42][0],                                               \
2890   &mips_reg_names[43][0],                                               \
2891   &mips_reg_names[44][0],                                               \
2892   &mips_reg_names[45][0],                                               \
2893   &mips_reg_names[46][0],                                               \
2894   &mips_reg_names[47][0],                                               \
2895   &mips_reg_names[48][0],                                               \
2896   &mips_reg_names[49][0],                                               \
2897   &mips_reg_names[50][0],                                               \
2898   &mips_reg_names[51][0],                                               \
2899   &mips_reg_names[52][0],                                               \
2900   &mips_reg_names[53][0],                                               \
2901   &mips_reg_names[54][0],                                               \
2902   &mips_reg_names[55][0],                                               \
2903   &mips_reg_names[56][0],                                               \
2904   &mips_reg_names[57][0],                                               \
2905   &mips_reg_names[58][0],                                               \
2906   &mips_reg_names[59][0],                                               \
2907   &mips_reg_names[60][0],                                               \
2908   &mips_reg_names[61][0],                                               \
2909   &mips_reg_names[62][0],                                               \
2910   &mips_reg_names[63][0],                                               \
2911   &mips_reg_names[64][0],                                               \
2912   &mips_reg_names[65][0],                                               \
2913   &mips_reg_names[66][0],                                               \
2914   &mips_reg_names[67][0],                                               \
2915   &mips_reg_names[68][0],                                               \
2916   &mips_reg_names[69][0],                                               \
2917   &mips_reg_names[70][0],                                               \
2918   &mips_reg_names[71][0],                                               \
2919   &mips_reg_names[72][0],                                               \
2920   &mips_reg_names[73][0],                                               \
2921   &mips_reg_names[74][0],                                               \
2922   &mips_reg_names[75][0],                                               \
2923   &mips_reg_names[76][0],                                               \
2924   &mips_reg_names[77][0],                                               \
2925   &mips_reg_names[78][0],                                               \
2926   &mips_reg_names[79][0],                                               \
2927   &mips_reg_names[80][0],                                               \
2928   &mips_reg_names[81][0],                                               \
2929   &mips_reg_names[82][0],                                               \
2930   &mips_reg_names[83][0],                                               \
2931   &mips_reg_names[84][0],                                               \
2932   &mips_reg_names[85][0],                                               \
2933   &mips_reg_names[86][0],                                               \
2934   &mips_reg_names[87][0],                                               \
2935   &mips_reg_names[88][0],                                               \
2936   &mips_reg_names[89][0],                                               \
2937   &mips_reg_names[90][0],                                               \
2938   &mips_reg_names[91][0],                                               \
2939   &mips_reg_names[92][0],                                               \
2940   &mips_reg_names[93][0],                                               \
2941   &mips_reg_names[94][0],                                               \
2942   &mips_reg_names[95][0],                                               \
2943   &mips_reg_names[96][0],                                               \
2944   &mips_reg_names[97][0],                                               \
2945   &mips_reg_names[98][0],                                               \
2946   &mips_reg_names[99][0],                                               \
2947   &mips_reg_names[100][0],                                              \
2948   &mips_reg_names[101][0],                                              \
2949   &mips_reg_names[102][0],                                              \
2950   &mips_reg_names[103][0],                                              \
2951   &mips_reg_names[104][0],                                              \
2952   &mips_reg_names[105][0],                                              \
2953   &mips_reg_names[106][0],                                              \
2954   &mips_reg_names[107][0],                                              \
2955   &mips_reg_names[108][0],                                              \
2956   &mips_reg_names[109][0],                                              \
2957   &mips_reg_names[110][0],                                              \
2958   &mips_reg_names[111][0],                                              \
2959   &mips_reg_names[112][0],                                              \
2960   &mips_reg_names[113][0],                                              \
2961   &mips_reg_names[114][0],                                              \
2962   &mips_reg_names[115][0],                                              \
2963   &mips_reg_names[116][0],                                              \
2964   &mips_reg_names[117][0],                                              \
2965   &mips_reg_names[118][0],                                              \
2966   &mips_reg_names[119][0],                                              \
2967   &mips_reg_names[120][0],                                              \
2968   &mips_reg_names[121][0],                                              \
2969   &mips_reg_names[122][0],                                              \
2970   &mips_reg_names[123][0],                                              \
2971   &mips_reg_names[124][0],                                              \
2972   &mips_reg_names[125][0],                                              \
2973   &mips_reg_names[126][0],                                              \
2974   &mips_reg_names[127][0],                                              \
2975   &mips_reg_names[128][0],                                              \
2976   &mips_reg_names[129][0],                                              \
2977   &mips_reg_names[130][0],                                              \
2978   &mips_reg_names[131][0],                                              \
2979   &mips_reg_names[132][0],                                              \
2980   &mips_reg_names[133][0],                                              \
2981   &mips_reg_names[134][0],                                              \
2982   &mips_reg_names[135][0],                                              \
2983   &mips_reg_names[136][0],                                              \
2984   &mips_reg_names[137][0],                                              \
2985   &mips_reg_names[138][0],                                              \
2986   &mips_reg_names[139][0],                                              \
2987   &mips_reg_names[140][0],                                              \
2988   &mips_reg_names[141][0],                                              \
2989   &mips_reg_names[142][0],                                              \
2990   &mips_reg_names[143][0],                                              \
2991   &mips_reg_names[144][0],                                              \
2992   &mips_reg_names[145][0],                                              \
2993   &mips_reg_names[146][0],                                              \
2994   &mips_reg_names[147][0],                                              \
2995   &mips_reg_names[148][0],                                              \
2996   &mips_reg_names[149][0],                                              \
2997   &mips_reg_names[150][0],                                              \
2998   &mips_reg_names[151][0],                                              \
2999   &mips_reg_names[152][0],                                              \
3000   &mips_reg_names[153][0],                                              \
3001   &mips_reg_names[154][0],                                              \
3002   &mips_reg_names[155][0],                                              \
3003   &mips_reg_names[156][0],                                              \
3004   &mips_reg_names[157][0],                                              \
3005   &mips_reg_names[158][0],                                              \
3006   &mips_reg_names[159][0],                                              \
3007   &mips_reg_names[160][0],                                              \
3008   &mips_reg_names[161][0],                                              \
3009   &mips_reg_names[162][0],                                              \
3010   &mips_reg_names[163][0],                                              \
3011   &mips_reg_names[164][0],                                              \
3012   &mips_reg_names[165][0],                                              \
3013   &mips_reg_names[166][0],                                              \
3014   &mips_reg_names[167][0],                                              \
3015   &mips_reg_names[168][0],                                              \
3016   &mips_reg_names[169][0],                                              \
3017   &mips_reg_names[170][0],                                              \
3018   &mips_reg_names[171][0],                                              \
3019   &mips_reg_names[172][0],                                              \
3020   &mips_reg_names[173][0],                                              \
3021   &mips_reg_names[174][0],                                              \
3022   &mips_reg_names[175][0]                                               \
3023 }
3024
3025 /* print-rtl.c can't use REGISTER_NAMES, since it depends on mips.c.
3026    So define this for it.  */
3027 #define DEBUG_REGISTER_NAMES                                            \
3028 {                                                                       \
3029   "$0",   "at",   "v0",   "v1",   "a0",   "a1",   "a2",   "a3",         \
3030   "t0",   "t1",   "t2",   "t3",   "t4",   "t5",   "t6",   "t7",         \
3031   "s0",   "s1",   "s2",   "s3",   "s4",   "s5",   "s6",   "s7",         \
3032   "t8",   "t9",   "k0",   "k1",   "gp",   "sp",   "$fp",  "ra",         \
3033   "$f0",  "$f1",  "$f2",  "$f3",  "$f4",  "$f5",  "$f6",  "$f7",        \
3034   "$f8",  "$f9",  "$f10", "$f11", "$f12", "$f13", "$f14", "$f15",       \
3035   "$f16", "$f17", "$f18", "$f19", "$f20", "$f21", "$f22", "$f23",       \
3036   "$f24", "$f25", "$f26", "$f27", "$f28", "$f29", "$f30", "$f31",       \
3037   "hi",   "lo",   "",     "$fcc0","$fcc1","$fcc2","$fcc3","$fcc4",      \
3038   "$fcc5","$fcc6","$fcc7","$rap", "",     "",     "",     "",           \
3039   "$c0r0", "$c0r1", "$c0r2", "$c0r3", "$c0r4", "$c0r5", "$c0r6", "$c0r7",\
3040   "$c0r8", "$c0r9", "$c0r10","$c0r11","$c0r12","$c0r13","$c0r14","$c0r15",\
3041   "$c0r16","$c0r17","$c0r18","$c0r19","$c0r20","$c0r21","$c0r22","$c0r23",\
3042   "$c0r24","$c0r25","$c0r26","$c0r27","$c0r28","$c0r29","$c0r30","$c0r31",\
3043   "$c2r0", "$c2r1", "$c2r2", "$c2r3", "$c2r4", "$c2r5", "$c2r6", "$c2r7",\
3044   "$c2r8", "$c2r9", "$c2r10","$c2r11","$c2r12","$c2r13","$c2r14","$c2r15",\
3045   "$c2r16","$c2r17","$c2r18","$c2r19","$c2r20","$c2r21","$c2r22","$c2r23",\
3046   "$c2r24","$c2r25","$c2r26","$c2r27","$c2r28","$c2r29","$c2r30","$c2r31",\
3047   "$c3r0", "$c3r1", "$c3r2", "$c3r3", "$c3r4", "$c3r5", "$c3r6", "$c3r7",\
3048   "$c3r8", "$c3r9", "$c3r10","$c3r11","$c3r12","$c3r13","$c3r14","$c3r15",\
3049   "$c3r16","$c3r17","$c3r18","$c3r19","$c3r20","$c3r21","$c3r22","$c3r23",\
3050   "$c3r24","$c3r25","$c3r26","$c3r27","$c3r28","$c3r29","$c3r30","$c3r31"\
3051 }
3052
3053 /* If defined, a C initializer for an array of structures
3054    containing a name and a register number.  This macro defines
3055    additional names for hard registers, thus allowing the `asm'
3056    option in declarations to refer to registers using alternate
3057    names.
3058
3059    We define both names for the integer registers here.  */
3060
3061 #define ADDITIONAL_REGISTER_NAMES                                       \
3062 {                                                                       \
3063   { "$0",        0 + GP_REG_FIRST },                                    \
3064   { "$1",        1 + GP_REG_FIRST },                                    \
3065   { "$2",        2 + GP_REG_FIRST },                                    \
3066   { "$3",        3 + GP_REG_FIRST },                                    \
3067   { "$4",        4 + GP_REG_FIRST },                                    \
3068   { "$5",        5 + GP_REG_FIRST },                                    \
3069   { "$6",        6 + GP_REG_FIRST },                                    \
3070   { "$7",        7 + GP_REG_FIRST },                                    \
3071   { "$8",        8 + GP_REG_FIRST },                                    \
3072   { "$9",        9 + GP_REG_FIRST },                                    \
3073   { "$10",      10 + GP_REG_FIRST },                                    \
3074   { "$11",      11 + GP_REG_FIRST },                                    \
3075   { "$12",      12 + GP_REG_FIRST },                                    \
3076   { "$13",      13 + GP_REG_FIRST },                                    \
3077   { "$14",      14 + GP_REG_FIRST },                                    \
3078   { "$15",      15 + GP_REG_FIRST },                                    \
3079   { "$16",      16 + GP_REG_FIRST },                                    \
3080   { "$17",      17 + GP_REG_FIRST },                                    \
3081   { "$18",      18 + GP_REG_FIRST },                                    \
3082   { "$19",      19 + GP_REG_FIRST },                                    \
3083   { "$20",      20 + GP_REG_FIRST },                                    \
3084   { "$21",      21 + GP_REG_FIRST },                                    \
3085   { "$22",      22 + GP_REG_FIRST },                                    \
3086   { "$23",      23 + GP_REG_FIRST },                                    \
3087   { "$24",      24 + GP_REG_FIRST },                                    \
3088   { "$25",      25 + GP_REG_FIRST },                                    \
3089   { "$26",      26 + GP_REG_FIRST },                                    \
3090   { "$27",      27 + GP_REG_FIRST },                                    \
3091   { "$28",      28 + GP_REG_FIRST },                                    \
3092   { "$29",      29 + GP_REG_FIRST },                                    \
3093   { "$30",      30 + GP_REG_FIRST },                                    \
3094   { "$31",      31 + GP_REG_FIRST },                                    \
3095   { "$sp",      29 + GP_REG_FIRST },                                    \
3096   { "$fp",      30 + GP_REG_FIRST },                                    \
3097   { "at",        1 + GP_REG_FIRST },                                    \
3098   { "v0",        2 + GP_REG_FIRST },                                    \
3099   { "v1",        3 + GP_REG_FIRST },                                    \
3100   { "a0",        4 + GP_REG_FIRST },                                    \
3101   { "a1",        5 + GP_REG_FIRST },                                    \
3102   { "a2",        6 + GP_REG_FIRST },                                    \
3103   { "a3",        7 + GP_REG_FIRST },                                    \
3104   { "t0",        8 + GP_REG_FIRST },                                    \
3105   { "t1",        9 + GP_REG_FIRST },                                    \
3106   { "t2",       10 + GP_REG_FIRST },                                    \
3107   { "t3",       11 + GP_REG_FIRST },                                    \
3108   { "t4",       12 + GP_REG_FIRST },                                    \
3109   { "t5",       13 + GP_REG_FIRST },                                    \
3110   { "t6",       14 + GP_REG_FIRST },                                    \
3111   { "t7",       15 + GP_REG_FIRST },                                    \
3112   { "s0",       16 + GP_REG_FIRST },                                    \
3113   { "s1",       17 + GP_REG_FIRST },                                    \
3114   { "s2",       18 + GP_REG_FIRST },                                    \
3115   { "s3",       19 + GP_REG_FIRST },                                    \
3116   { "s4",       20 + GP_REG_FIRST },                                    \
3117   { "s5",       21 + GP_REG_FIRST },                                    \
3118   { "s6",       22 + GP_REG_FIRST },                                    \
3119   { "s7",       23 + GP_REG_FIRST },                                    \
3120   { "t8",       24 + GP_REG_FIRST },                                    \
3121   { "t9",       25 + GP_REG_FIRST },                                    \
3122   { "k0",       26 + GP_REG_FIRST },                                    \
3123   { "k1",       27 + GP_REG_FIRST },                                    \
3124   { "gp",       28 + GP_REG_FIRST },                                    \
3125   { "sp",       29 + GP_REG_FIRST },                                    \
3126   { "fp",       30 + GP_REG_FIRST },                                    \
3127   { "ra",       31 + GP_REG_FIRST },                                    \
3128   { "$sp",      29 + GP_REG_FIRST },                                    \
3129   { "$fp",      30 + GP_REG_FIRST }                                     \
3130   ALL_COP_ADDITIONAL_REGISTER_NAMES                                     \
3131 }
3132
3133 /* This is meant to be redefined in the host dependent files.  It is a
3134    set of alternative names and regnums for mips coprocessors.  */
3135
3136 #define ALL_COP_ADDITIONAL_REGISTER_NAMES
3137
3138 /* A C compound statement to output to stdio stream STREAM the
3139    assembler syntax for an instruction operand X.  X is an RTL
3140    expression.
3141
3142    CODE is a value that can be used to specify one of several ways
3143    of printing the operand.  It is used when identical operands
3144    must be printed differently depending on the context.  CODE
3145    comes from the `%' specification that was used to request
3146    printing of the operand.  If the specification was just `%DIGIT'
3147    then CODE is 0; if the specification was `%LTR DIGIT' then CODE
3148    is the ASCII code for LTR.
3149
3150    If X is a register, this macro should print the register's name.
3151    The names can be found in an array `reg_names' whose type is
3152    `char *[]'.  `reg_names' is initialized from `REGISTER_NAMES'.
3153
3154    When the machine description has a specification `%PUNCT' (a `%'
3155    followed by a punctuation character), this macro is called with
3156    a null pointer for X and the punctuation character for CODE.
3157
3158    See mips.c for the MIPS specific codes.  */
3159
3160 #define PRINT_OPERAND(FILE, X, CODE) print_operand (FILE, X, CODE)
3161
3162 /* A C expression which evaluates to true if CODE is a valid
3163    punctuation character for use in the `PRINT_OPERAND' macro.  If
3164    `PRINT_OPERAND_PUNCT_VALID_P' is not defined, it means that no
3165    punctuation characters (except for the standard one, `%') are
3166    used in this way.  */
3167
3168 #define PRINT_OPERAND_PUNCT_VALID_P(CODE) mips_print_operand_punct[CODE]
3169
3170 /* A C compound statement to output to stdio stream STREAM the
3171    assembler syntax for an instruction operand that is a memory
3172    reference whose address is ADDR.  ADDR is an RTL expression.  */
3173
3174 #define PRINT_OPERAND_ADDRESS(FILE, ADDR) print_operand_address (FILE, ADDR)
3175
3176
3177 /* A C statement, to be executed after all slot-filler instructions
3178    have been output.  If necessary, call `dbr_sequence_length' to
3179    determine the number of slots filled in a sequence (zero if not
3180    currently outputting a sequence), to decide how many no-ops to
3181    output, or whatever.
3182
3183    Don't define this macro if it has nothing to do, but it is
3184    helpful in reading assembly output if the extent of the delay
3185    sequence is made explicit (e.g. with white space).
3186
3187    Note that output routines for instructions with delay slots must
3188    be prepared to deal with not being output as part of a sequence
3189    (i.e.  when the scheduling pass is not run, or when no slot
3190    fillers could be found.)  The variable `final_sequence' is null
3191    when not processing a sequence, otherwise it contains the
3192    `sequence' rtx being output.  */
3193
3194 #define DBR_OUTPUT_SEQEND(STREAM)                                       \
3195 do                                                                      \
3196   {                                                                     \
3197     if (set_nomacro > 0 && --set_nomacro == 0)                          \
3198       fputs ("\t.set\tmacro\n", STREAM);                                \
3199                                                                         \
3200     if (set_noreorder > 0 && --set_noreorder == 0)                      \
3201       fputs ("\t.set\treorder\n", STREAM);                              \
3202                                                                         \
3203     fputs ("\n", STREAM);                                               \
3204   }                                                                     \
3205 while (0)
3206
3207
3208 /* How to tell the debugger about changes of source files.  */
3209
3210 #ifndef SET_FILE_NUMBER
3211 #define SET_FILE_NUMBER() ++num_source_filenames
3212 #endif
3213
3214 #define ASM_OUTPUT_SOURCE_FILENAME(STREAM, NAME)                        \
3215   mips_output_filename (STREAM, NAME)
3216
3217 /* This is defined so that it can be overridden in iris6.h.  */
3218 #define ASM_OUTPUT_FILENAME(STREAM, NUM_SOURCE_FILENAMES, NAME) \
3219 do                                                              \
3220   {                                                             \
3221     fprintf (STREAM, "\t.file\t%d ", NUM_SOURCE_FILENAMES);     \
3222     output_quoted_string (STREAM, NAME);                        \
3223     fputs ("\n", STREAM);                                       \
3224   }                                                             \
3225 while (0)
3226
3227 /* This is how to output a note the debugger telling it the line number
3228    to which the following sequence of instructions corresponds.
3229    Silicon graphics puts a label after each .loc.  */
3230
3231 #ifndef LABEL_AFTER_LOC
3232 #define LABEL_AFTER_LOC(STREAM)
3233 #endif
3234
3235 #ifndef ASM_OUTPUT_SOURCE_LINE
3236 #define ASM_OUTPUT_SOURCE_LINE(STREAM, LINE, COUNTER)           \
3237   mips_output_lineno (STREAM, LINE)
3238 #endif
3239
3240 /* The MIPS implementation uses some labels for its own purpose.  The
3241    following lists what labels are created, and are all formed by the
3242    pattern $L[a-z].*.  The machine independent portion of GCC creates
3243    labels matching:  $L[A-Z][0-9]+ and $L[0-9]+.
3244
3245         LM[0-9]+        Silicon Graphics/ECOFF stabs label before each stmt.
3246         $Lb[0-9]+       Begin blocks for MIPS debug support
3247         $Lc[0-9]+       Label for use in s<xx> operation.
3248         $Le[0-9]+       End blocks for MIPS debug support  */
3249
3250 #undef ASM_DECLARE_OBJECT_NAME
3251 #define ASM_DECLARE_OBJECT_NAME(STREAM, NAME, DECL) \
3252   mips_declare_object (STREAM, NAME, "", ":\n", 0)
3253
3254 /* Globalizing directive for a label.  */
3255 #define GLOBAL_ASM_OP "\t.globl\t"
3256
3257 /* This says how to define a global common symbol.  */
3258
3259 #define ASM_OUTPUT_ALIGNED_DECL_COMMON(STREAM, DECL, NAME, SIZE, ALIGN) \
3260   do {                                                                  \
3261     /* If the target wants uninitialized const declarations in          \
3262        .rdata then don't put them in .comm */                           \
3263     if (TARGET_EMBEDDED_DATA && TARGET_UNINIT_CONST_IN_RODATA           \
3264         && TREE_CODE (DECL) == VAR_DECL && TREE_READONLY (DECL)         \
3265         && (DECL_INITIAL (DECL) == 0                                    \
3266             || DECL_INITIAL (DECL) == error_mark_node))                 \
3267       {                                                                 \
3268         if (TREE_PUBLIC (DECL) && DECL_NAME (DECL))                     \
3269           (*targetm.asm_out.globalize_label) (STREAM, NAME);            \
3270                                                                         \
3271         readonly_data_section ();                                       \
3272         ASM_OUTPUT_ALIGN (STREAM, floor_log2 (ALIGN / BITS_PER_UNIT));  \
3273         mips_declare_object (STREAM, NAME, "", ":\n\t.space\t%u\n",     \
3274             (SIZE));                                                    \
3275       }                                                                 \
3276     else                                                                \
3277         mips_declare_object (STREAM, NAME, "\n\t.comm\t", ",%u\n",      \
3278           (SIZE));                                                      \
3279   } while (0)
3280
3281
3282 /* This says how to define a local common symbol (ie, not visible to
3283    linker).  */
3284
3285 #define ASM_OUTPUT_LOCAL(STREAM, NAME, SIZE, ROUNDED)                   \
3286   mips_declare_object (STREAM, NAME, "\n\t.lcomm\t", ",%u\n", (int)(SIZE))
3287
3288
3289 /* This says how to output an external.  It would be possible not to
3290    output anything and let undefined symbol become external. However
3291    the assembler uses length information on externals to allocate in
3292    data/sdata bss/sbss, thereby saving exec time.  */
3293
3294 #define ASM_OUTPUT_EXTERNAL(STREAM,DECL,NAME) \
3295   mips_output_external(STREAM,DECL,NAME)
3296
3297
3298 /* This is how to declare a function name.  The actual work of
3299    emitting the label is moved to function_prologue, so that we can
3300    get the line number correctly emitted before the .ent directive,
3301    and after any .file directives.  Define as empty so that the function
3302    is not declared before the .ent directive elsewhere.  */
3303
3304 #undef ASM_DECLARE_FUNCTION_NAME
3305 #define ASM_DECLARE_FUNCTION_NAME(STREAM,NAME,DECL)
3306
3307 /* This is how to store into the string LABEL
3308    the symbol_ref name of an internal numbered label where
3309    PREFIX is the class of label and NUM is the number within the class.
3310    This is suitable for output with `assemble_name'.  */
3311
3312 #undef ASM_GENERATE_INTERNAL_LABEL
3313 #define ASM_GENERATE_INTERNAL_LABEL(LABEL,PREFIX,NUM)                   \
3314   sprintf ((LABEL), "*%s%s%ld", (LOCAL_LABEL_PREFIX), (PREFIX), (long)(NUM))
3315
3316 /* This is how to output an element of a case-vector that is absolute.  */
3317
3318 #define ASM_OUTPUT_ADDR_VEC_ELT(STREAM, VALUE)                          \
3319   fprintf (STREAM, "\t%s\t%sL%d\n",                                     \
3320            ptr_mode == DImode ? ".dword" : ".word",                     \
3321            LOCAL_LABEL_PREFIX,                                          \
3322            VALUE)
3323
3324 /* This is how to output an element of a case-vector that is relative.
3325    This is used for pc-relative code (e.g. when TARGET_ABICALLS or
3326    TARGET_EMBEDDED_PIC).  */
3327
3328 #define ASM_OUTPUT_ADDR_DIFF_ELT(STREAM, BODY, VALUE, REL)              \
3329 do {                                                                    \
3330   if (TARGET_MIPS16)                                                    \
3331     fprintf (STREAM, "\t.half\t%sL%d-%sL%d\n",                          \
3332              LOCAL_LABEL_PREFIX, VALUE, LOCAL_LABEL_PREFIX, REL);       \
3333   else if (TARGET_EMBEDDED_PIC)                                         \
3334     fprintf (STREAM, "\t%s\t%sL%d-%sLS%d\n",                            \
3335              ptr_mode == DImode ? ".dword" : ".word",                   \
3336              LOCAL_LABEL_PREFIX, VALUE, LOCAL_LABEL_PREFIX, REL);       \
3337   else if (TARGET_GPWORD)                                               \
3338     fprintf (STREAM, "\t%s\t%sL%d\n",                                   \
3339              ptr_mode == DImode ? ".gpdword" : ".gpword",               \
3340              LOCAL_LABEL_PREFIX, VALUE);                                \
3341   else                                                                  \
3342     fprintf (STREAM, "\t%s\t%sL%d\n",                                   \
3343              ptr_mode == DImode ? ".dword" : ".word",                   \
3344              LOCAL_LABEL_PREFIX, VALUE);                                \
3345 } while (0)
3346
3347 /* When generating embedded PIC or mips16 code we want to put the jump
3348    table in the .text section.  In all other cases, we want to put the
3349    jump table in the .rdata section.  Unfortunately, we can't use
3350    JUMP_TABLES_IN_TEXT_SECTION, because it is not conditional.
3351    Instead, we use ASM_OUTPUT_CASE_LABEL to switch back to the .text
3352    section if appropriate.  */
3353 #undef ASM_OUTPUT_CASE_LABEL
3354 #define ASM_OUTPUT_CASE_LABEL(FILE, PREFIX, NUM, INSN)                  \
3355 do {                                                                    \
3356   if (TARGET_EMBEDDED_PIC || TARGET_MIPS16)                             \
3357     function_section (current_function_decl);                           \
3358   (*targetm.asm_out.internal_label) (FILE, PREFIX, NUM);                \
3359 } while (0)
3360
3361 /* This is how to output an assembler line
3362    that says to advance the location counter
3363    to a multiple of 2**LOG bytes.  */
3364
3365 #define ASM_OUTPUT_ALIGN(STREAM,LOG)                                    \
3366   fprintf (STREAM, "\t.align\t%d\n", (LOG))
3367
3368 /* This is how to output an assembler line to advance the location
3369    counter by SIZE bytes.  */
3370
3371 #undef ASM_OUTPUT_SKIP
3372 #define ASM_OUTPUT_SKIP(STREAM,SIZE)                                    \
3373   fprintf (STREAM, "\t.space\t"HOST_WIDE_INT_PRINT_UNSIGNED"\n", (SIZE))
3374
3375 /* This is how to output a string.  */
3376 #undef ASM_OUTPUT_ASCII
3377 #define ASM_OUTPUT_ASCII(STREAM, STRING, LEN)                           \
3378   mips_output_ascii (STREAM, STRING, LEN)
3379
3380 /* Output #ident as a in the read-only data section.  */
3381 #undef  ASM_OUTPUT_IDENT
3382 #define ASM_OUTPUT_IDENT(FILE, STRING)                                  \
3383 {                                                                       \
3384   const char *p = STRING;                                               \
3385   int size = strlen (p) + 1;                                            \
3386   readonly_data_section ();                                             \
3387   assemble_string (p, size);                                            \
3388 }
3389 \f
3390 /* Default to -G 8 */
3391 #ifndef MIPS_DEFAULT_GVALUE
3392 #define MIPS_DEFAULT_GVALUE 8
3393 #endif
3394
3395 /* Define the strings to put out for each section in the object file.  */
3396 #define TEXT_SECTION_ASM_OP     "\t.text"       /* instructions */
3397 #define DATA_SECTION_ASM_OP     "\t.data"       /* large data */
3398 #define SDATA_SECTION_ASM_OP    "\t.sdata"      /* small data */
3399
3400 #undef READONLY_DATA_SECTION_ASM_OP
3401 #define READONLY_DATA_SECTION_ASM_OP    "\t.rdata"      /* read-only data */
3402
3403 /* Given a decl node or constant node, choose the section to output it in
3404    and select that section.  */
3405
3406 #undef  TARGET_ASM_SELECT_SECTION
3407 #define TARGET_ASM_SELECT_SECTION  mips_select_section
3408 \f
3409 #define ASM_OUTPUT_REG_PUSH(STREAM,REGNO)                               \
3410 do                                                                      \
3411   {                                                                     \
3412     fprintf (STREAM, "\t%s\t%s,%s,8\n\t%s\t%s,0(%s)\n",                 \
3413              TARGET_64BIT ? "dsubu" : "subu",                           \
3414              reg_names[STACK_POINTER_REGNUM],                           \
3415              reg_names[STACK_POINTER_REGNUM],                           \
3416              TARGET_64BIT ? "sd" : "sw",                                \
3417              reg_names[REGNO],                                          \
3418              reg_names[STACK_POINTER_REGNUM]);                          \
3419   }                                                                     \
3420 while (0)
3421
3422 #define ASM_OUTPUT_REG_POP(STREAM,REGNO)                                \
3423 do                                                                      \
3424   {                                                                     \
3425     if (! set_noreorder)                                                \
3426       fprintf (STREAM, "\t.set\tnoreorder\n");                          \
3427                                                                         \
3428     fprintf (STREAM, "\t%s\t%s,0(%s)\n\t%s\t%s,%s,8\n",                 \
3429              TARGET_64BIT ? "ld" : "lw",                                \
3430              reg_names[REGNO],                                          \
3431              reg_names[STACK_POINTER_REGNUM],                           \
3432              TARGET_64BIT ? "daddu" : "addu",                           \
3433              reg_names[STACK_POINTER_REGNUM],                           \
3434              reg_names[STACK_POINTER_REGNUM]);                          \
3435                                                                         \
3436     if (! set_noreorder)                                                \
3437       fprintf (STREAM, "\t.set\treorder\n");                            \
3438   }                                                                     \
3439 while (0)
3440
3441 /* How to start an assembler comment.
3442    The leading space is important (the mips native assembler requires it).  */
3443 #ifndef ASM_COMMENT_START
3444 #define ASM_COMMENT_START " #"
3445 #endif
3446 \f
3447 /* Default definitions for size_t and ptrdiff_t.  We must override the
3448    definitions from ../svr4.h on mips-*-linux-gnu.  */
3449
3450 #undef SIZE_TYPE
3451 #define SIZE_TYPE (POINTER_SIZE == 64 ? "long unsigned int" : "unsigned int")
3452
3453 #undef PTRDIFF_TYPE
3454 #define PTRDIFF_TYPE (POINTER_SIZE == 64 ? "long int" : "int")
3455
3456 /* See mips_expand_prologue's use of loadgp for when this should be
3457    true.  */
3458
3459 #define DONT_ACCESS_GBLS_AFTER_EPILOGUE (TARGET_ABICALLS                \
3460                                          && mips_abi != ABI_32          \
3461                                          && mips_abi != ABI_O64)
3462 \f
3463
3464 #define DFMODE_NAN \
3465         unsigned short DFbignan[4] = {0x7ff7, 0xffff, 0xffff, 0xffff}; \
3466         unsigned short DFlittlenan[4] = {0xffff, 0xffff, 0xffff, 0xfff7}
3467 #define SFMODE_NAN \
3468         unsigned short SFbignan[2] = {0x7fbf, 0xffff}; \
3469         unsigned short SFlittlenan[2] = {0xffff, 0xffbf}
3470
3471 /* Generate calls to memcpy, etc., not bcopy, etc.  */
3472 #define TARGET_MEM_FUNCTIONS
3473
3474 #ifndef __mips16
3475 /* Since the bits of the _init and _fini function is spread across
3476    many object files, each potentially with its own GP, we must assume
3477    we need to load our GP.  We don't preserve $gp or $ra, since each
3478    init/fini chunk is supposed to initialize $gp, and crti/crtn
3479    already take care of preserving $ra and, when appropriate, $gp.  */
3480 #if _MIPS_SIM == _MIPS_SIM_ABI32
3481 #define CRT_CALL_STATIC_FUNCTION(SECTION_OP, FUNC)      \
3482    asm (SECTION_OP "\n\
3483         .set noreorder\n\
3484         bal 1f\n\
3485         nop\n\
3486 1:      .cpload $31\n\
3487         .set reorder\n\
3488         jal " USER_LABEL_PREFIX #FUNC "\n\
3489         " TEXT_SECTION_ASM_OP);
3490 #endif /* Switch to #elif when we're no longer limited by K&R C.  */
3491 #if (defined _ABIN32 && _MIPS_SIM == _ABIN32) \
3492    || (defined _ABI64 && _MIPS_SIM == _ABI64)
3493 #define CRT_CALL_STATIC_FUNCTION(SECTION_OP, FUNC)      \
3494    asm (SECTION_OP "\n\
3495         .set noreorder\n\
3496         bal 1f\n\
3497         nop\n\
3498 1:      .set reorder\n\
3499         .cpsetup $31, $2, 1b\n\
3500         jal " USER_LABEL_PREFIX #FUNC "\n\
3501         " TEXT_SECTION_ASM_OP);
3502 #endif
3503 #endif