]> git.ipfire.org Git - thirdparty/gcc.git/blob - gcc/config/cris/cris.h
re PR bootstrap/48307 (Bootstrap failure)
[thirdparty/gcc.git] / gcc / config / cris / cris.h
1 /* Definitions for GCC. Part of the machine description for CRIS.
2 Copyright (C) 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2007, 2008,
3 2009, 2010, 2011 Free Software Foundation, Inc.
4 Contributed by Axis Communications. Written by Hans-Peter Nilsson.
5
6 This file is part of GCC.
7
8 GCC is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 3, or (at your option)
11 any later version.
12
13 GCC is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
17
18 You should have received a copy of the GNU General Public License
19 along with GCC; see the file COPYING3. If not see
20 <http://www.gnu.org/licenses/>. */
21
22 /* After the first "Node:" comment comes all preprocessor directives and
23 attached declarations described in the info files, the "Using and
24 Porting GCC" manual (uapgcc), in the same order as found in the "Target
25 macros" section in the gcc-2.9x CVS edition of 2000-03-17. FIXME: Not
26 really, but needs an update anyway.
27
28 There is no generic copy-of-uapgcc comment, you'll have to see uapgcc
29 for that. If applicable, there is a CRIS-specific comment. The order
30 of macro definitions follow the order in the manual. Every section in
31 the manual (node in the info pages) has an introductory `Node:
32 <subchapter>' comment. If no macros are defined for a section, only
33 the section-comment is present. */
34
35 /* Note that other header files (e.g. config/elfos.h, config/linux.h,
36 config/cris/linux.h and config/cris/aout.h) are responsible for lots of
37 settings not repeated below. This file contains general CRIS
38 definitions and definitions for the cris-*-elf subtarget. */
39
40 /* We don't want to use gcc_assert for everything, as that can be
41 compiled out. */
42 #define CRIS_ASSERT(x) \
43 do { if (!(x)) internal_error ("CRIS-port assertion failed: " #x); } while (0)
44
45 /* Replacement for REG_P since it does not match SUBREGs. Happens for
46 testcase Axis-20000320 with gcc-2.9x. */
47 #define REG_S_P(x) \
48 (REG_P (x) || (GET_CODE (x) == SUBREG && REG_P (XEXP (x, 0))))
49
50 /* Last register in main register bank r0..r15. */
51 #define CRIS_LAST_GENERAL_REGISTER 15
52
53 /* Descriptions of registers used for arguments. */
54 #define CRIS_FIRST_ARG_REG 10
55 #define CRIS_MAX_ARGS_IN_REGS 4
56
57 /* See also *_REGNUM constants in cris.md. */
58
59 /* Most of the time, we need the index into the register-names array.
60 When passing debug-info, we need the real hardware register number. */
61 #define CRIS_CANONICAL_SRP_REGNUM (16 + 11)
62 #define CRIS_CANONICAL_MOF_REGNUM (16 + 7)
63 /* We have CCR in all models including v10, but that's 16 bits, so let's
64 prefer the DCCR number, which is a DMA pointer in pre-v8, so we'll
65 never clash with it for GCC purposes. */
66 #define CRIS_CANONICAL_CC0_REGNUM (16 + 13)
67
68 /* When generating PIC, these suffixes are added to the names of non-local
69 functions when being output. Contrary to other ports, we have offsets
70 relative to the GOT, not the PC. We might implement PC-relative PLT
71 semantics later for the general case; they are used in some cases right
72 now, such as MI thunks. */
73 #define CRIS_GOTPLT_SUFFIX ":GOTPLT"
74 #define CRIS_PLT_GOTOFFSET_SUFFIX ":PLTG"
75 #define CRIS_PLT_PCOFFSET_SUFFIX ":PLT"
76
77 #define CRIS_FUNCTION_ARG_SIZE(MODE, TYPE) \
78 ((MODE) != BLKmode ? GET_MODE_SIZE (MODE) \
79 : (unsigned) int_size_in_bytes (TYPE))
80
81 /* Which CPU version this is. The parsed and adjusted cris_cpu_str. */
82 extern int cris_cpu_version;
83
84 /* Changing the order used to be necessary to put the fourth __make_dp
85 argument (a DImode parameter) in registers, to fit with the libfunc
86 parameter passing scheme used for intrinsic functions. FIXME: Check
87 performance and maybe remove definition from TARGET_LIBGCC2_CFLAGS now
88 that it isn't strictly necessary. We used to do this through
89 TARGET_LIBGCC2_CFLAGS, but that became increasingly difficult as the
90 parenthesis (that needed quoting) travels through several layers of
91 make and shell invocations. */
92 #ifdef IN_LIBGCC2
93 #define __make_dp(a,b,c,d) __cris_make_dp(d,a,b,c)
94 #endif
95
96
97 /* Node: Driver */
98
99 /* Also provide canonical vN definitions when user specifies an alias.
100 Note that -melf overrides -maout. */
101
102 #define CPP_SPEC \
103 "%{mtune=*:-D__tune_%* %{mtune=v*:-D__CRIS_arch_tune=%*}\
104 %{mtune=etrax4:-D__tune_v3 -D__CRIS_arch_tune=3}\
105 %{mtune=etrax100:-D__tune_v8 -D__CRIS_arch_tune=8}\
106 %{mtune=svinto:-D__tune_v8 -D__CRIS_arch_tune=8}\
107 %{mtune=etrax100lx:-D__tune_v10 -D__CRIS_arch_tune=10}\
108 %{mtune=ng:-D__tune_v10 -D__CRIS_arch_tune=10}}\
109 %{mcpu=*:-D__arch_%* %{mcpu=v*:-D__CRIS_arch_version=%*}\
110 %{mcpu=etrax4:-D__arch_v3 -D__CRIS_arch_version=3}\
111 %{mcpu=etrax100:-D__arch_v8 -D__CRIS_arch_version=8}\
112 %{mcpu=svinto:-D__arch_v8 -D__CRIS_arch_version=8}\
113 %{mcpu=etrax100lx:-D__arch_v10 -D__CRIS_arch_version=10}\
114 %{mcpu=ng:-D__arch_v10 -D__CRIS_arch_version=10}}\
115 %{march=*:-D__arch_%* %{march=v*:-D__CRIS_arch_version=%*}\
116 %{march=etrax4:-D__arch_v3 -D__CRIS_arch_version=3}\
117 %{march=etrax100:-D__arch_v8 -D__CRIS_arch_version=8}\
118 %{march=svinto:-D__arch_v8 -D__CRIS_arch_version=8}\
119 %{march=etrax100lx:-D__arch_v10 -D__CRIS_arch_version=10}\
120 %{march=ng:-D__arch_v10 -D__CRIS_arch_version=10}}\
121 %{metrax100:-D__arch__v8 -D__CRIS_arch_version=8}\
122 %{metrax4:-D__arch__v3 -D__CRIS_arch_version=3}\
123 %(cpp_subtarget)"
124
125 /* For the cris-*-elf subtarget. */
126
127 #define CRIS_DEFAULT_TUNE "10"
128 #define CRIS_ARCH_CPP_DEFAULT
129 #define CRIS_DEFAULT_ASM_ARCH_OPTION ""
130
131 #ifdef TARGET_CPU_DEFAULT
132 #if TARGET_CPU_DEFAULT != 32 && TARGET_CPU_DEFAULT != 10
133 #error "Due to '()'; e.g. '#define TARGET_CPU_DEFAULT (10)', stringize TARGET_CPU_DEFAULT isn't useful: update manually."
134 #endif
135
136 #if TARGET_CPU_DEFAULT == 32
137 #undef CRIS_DEFAULT_TUNE
138 #define CRIS_DEFAULT_TUNE "32"
139 /* To enable use of "generic" cris-axis-elf binutils, always pass the
140 architecture option to GAS. (We don't do this for non-v32.) */
141 #undef CRIS_DEFAULT_ASM_ARCH_OPTION
142 #define CRIS_DEFAULT_ASM_ARCH_OPTION "--march=v32"
143 #endif
144
145 #undef CRIS_ARCH_CPP_DEFAULT
146 #define CRIS_ARCH_CPP_DEFAULT \
147 "%{!march=*:\
148 %{!metrax*:\
149 %{!mcpu=*:\
150 %{!mtune=*:-D__tune_v" CRIS_DEFAULT_TUNE "}\
151 -D__arch_v"CRIS_DEFAULT_TUNE\
152 " -D__CRIS_arch_version=" CRIS_DEFAULT_TUNE "}}}"
153 #endif
154
155 #define CRIS_CPP_SUBTARGET_SPEC \
156 "%{mbest-lib-options:\
157 %{!moverride-best-lib-options:\
158 %{!march=*:%{!metrax*:%{!mcpu=*:\
159 -D__tune_v" CRIS_DEFAULT_TUNE \
160 " -D__CRIS_arch_tune=" CRIS_DEFAULT_TUNE "}}}}}"\
161 CRIS_ARCH_CPP_DEFAULT
162
163 /* Override previous definitions (linux.h). */
164 #undef CC1_SPEC
165 #define CC1_SPEC \
166 "%{metrax4:-march=v3}\
167 %{metrax100:-march=v8}\
168 %(cc1_subtarget)"
169
170 /* For the cris-*-elf subtarget. */
171 #define CRIS_CC1_SUBTARGET_SPEC \
172 "-melf\
173 %{mbest-lib-options:\
174 %{!moverride-best-lib-options:\
175 %{!march=*:%{!mcpu=*:-mtune=v" CRIS_DEFAULT_TUNE\
176 " -D__CRIS_arch_tune=" CRIS_DEFAULT_TUNE "}}\
177 %{!finhibit-size-directive:\
178 %{!fno-function-sections: -ffunction-sections}\
179 %{!fno-data-sections: -fdata-sections}}}}"
180
181 /* This adds to CC1_SPEC. */
182 #define CC1PLUS_SPEC ""
183
184 #ifdef HAVE_AS_NO_MUL_BUG_ABORT_OPTION
185 #define MAYBE_AS_NO_MUL_BUG_ABORT \
186 "%{mno-mul-bug-workaround:-no-mul-bug-abort} "
187 #else
188 #define MAYBE_AS_NO_MUL_BUG_ABORT
189 #endif
190
191 /* Override previous definitions (linux.h). */
192 #undef ASM_SPEC
193 #define ASM_SPEC \
194 MAYBE_AS_NO_MUL_BUG_ABORT \
195 "%(asm_subtarget)\
196 %{march=*:%{mcpu=*:%edo not specify both -march=... and -mcpu=...}}\
197 %{march=v32:--march=v32} %{mcpu=v32:--march=v32}"
198
199 /* For the cris-*-elf subtarget. */
200 #define CRIS_ASM_SUBTARGET_SPEC \
201 "--em=criself %{!march=*:%{!mcpu=*:" CRIS_DEFAULT_ASM_ARCH_OPTION "}}"
202
203 /* FIXME: We should propagate the -melf option to make the criself
204 "emulation" unless a linker script is provided (-T*), but I don't know
205 how to do that if either of -Ttext, -Tdata or -Tbss is given but no
206 linker script, as is usually the case. Leave it to the user for the
207 time being.
208
209 Note that -melf overrides -maout except that a.out-compiled libraries
210 are linked in (multilibbing). We'd need some %s-variant that
211 checked for existence of some specific file. */
212 #undef LINK_SPEC
213 #define LINK_SPEC \
214 "%{v:--verbose}\
215 %(link_subtarget)"
216
217 /* For the cris-*-elf subtarget. */
218 #define CRIS_LINK_SUBTARGET_SPEC \
219 "-mcriself\
220 %{sim2:%{!T*:-Tdata 0x4000000 -Tbss 0x8000000}}\
221 %{!r:%{O2|O3: --gc-sections}}"
222
223 /* Which library to get. The simulator uses a different library for
224 the low-level syscalls (implementing the Linux syscall ABI instead
225 of direct-iron accesses). Default everything with the stub "nosys"
226 library. */
227 /* Override previous definitions (linux.h). */
228 #undef LIB_SPEC
229 #define LIB_SPEC \
230 "%{sim*:--start-group -lc -lsyslinux --end-group}\
231 %{!sim*:%{g*:-lg}\
232 %{!p:%{!pg:-lc}}%{p:-lc_p}%{pg:-lc_p} -lbsp}\
233 -lnosys"
234
235 /* Linker startfile options; crt0 flavors.
236 We need to remove any previous definition (elfos.h). */
237 #undef STARTFILE_SPEC
238 #define STARTFILE_SPEC \
239 "%{sim*:crt1.o%s}%{!sim*:crt0.o%s}\
240 crti.o%s crtbegin.o%s"
241
242 #undef ENDFILE_SPEC
243 #define ENDFILE_SPEC "crtend.o%s crtn.o%s"
244
245 #define EXTRA_SPECS \
246 {"cpp_subtarget", CRIS_CPP_SUBTARGET_SPEC}, \
247 {"cc1_subtarget", CRIS_CC1_SUBTARGET_SPEC}, \
248 {"asm_subtarget", CRIS_ASM_SUBTARGET_SPEC}, \
249 {"link_subtarget", CRIS_LINK_SUBTARGET_SPEC}, \
250 CRIS_SUBTARGET_EXTRA_SPECS
251
252 #define CRIS_SUBTARGET_EXTRA_SPECS
253
254
255 /* Node: Run-time Target */
256
257 #define TARGET_CPU_CPP_BUILTINS() \
258 do \
259 { \
260 builtin_define_std ("cris"); \
261 builtin_define_std ("CRIS"); \
262 builtin_define_std ("GNU_CRIS"); \
263 builtin_define ("__CRIS_ABI_version=2"); \
264 builtin_assert ("cpu=cris"); \
265 builtin_assert ("machine=cris"); \
266 } \
267 while (0)
268
269 /* Previously controlled by target_flags. */
270 #define TARGET_ELF 1
271
272 /* Previously controlled by target_flags. Note that this is *not* set
273 for -melinux. */
274 #define TARGET_LINUX 0
275
276 /* For the cris-*-elf subtarget. */
277 #define CRIS_SUBTARGET_DEFAULT 0
278
279 #define CRIS_CPU_BASE 0
280 #define CRIS_CPU_ETRAX4 3 /* Just lz added. */
281 #define CRIS_CPU_SVINTO 8 /* Added swap, jsrc & Co., 32-bit accesses. */
282 #define CRIS_CPU_NG 10 /* Added mul[su]. */
283 #define CRIS_CPU_V32 32 /* Major changes. */
284
285 #ifndef TARGET_CPU_DEFAULT
286 #define TARGET_CPU_DEFAULT CRIS_CPU_BASE
287 #endif
288
289 /* Default target_flags if no switches specified. */
290 #ifndef TARGET_DEFAULT
291 # if TARGET_CPU_DEFAULT == 32
292 # define TARGET_DEFAULT \
293 (MASK_STACK_ALIGN \
294 + MASK_CONST_ALIGN + MASK_DATA_ALIGN \
295 + MASK_PROLOGUE_EPILOGUE)
296 # else /* 10 */
297 # define TARGET_DEFAULT \
298 (MASK_SIDE_EFFECT_PREFIXES + MASK_STACK_ALIGN \
299 + MASK_CONST_ALIGN + MASK_DATA_ALIGN \
300 + MASK_PROLOGUE_EPILOGUE + MASK_MUL_BUG)
301 # endif
302 #endif
303
304 /* Local, providing a default for cris_cpu_version. */
305 #define CRIS_DEFAULT_CPU_VERSION TARGET_CPU_DEFAULT
306
307 #define TARGET_HAS_MUL_INSNS (cris_cpu_version >= CRIS_CPU_NG)
308 #define TARGET_HAS_LZ (cris_cpu_version >= CRIS_CPU_ETRAX4)
309 #define TARGET_HAS_SWAP (cris_cpu_version >= CRIS_CPU_SVINTO)
310 #define TARGET_V32 (cris_cpu_version >= CRIS_CPU_V32)
311
312 /* Node: Storage Layout */
313
314 #define BITS_BIG_ENDIAN 0
315
316 #define BYTES_BIG_ENDIAN 0
317
318 /* WORDS_BIG_ENDIAN is not defined in the hardware, but for consistency,
319 we use little-endianness, and we may also be able to use
320 post-increment on DImode indirect. */
321 #define WORDS_BIG_ENDIAN 0
322
323 #define UNITS_PER_WORD 4
324
325 #define CRIS_PROMOTED_MODE(MODE, UNSIGNEDP, TYPE) \
326 (GET_MODE_CLASS (MODE) == MODE_INT && GET_MODE_SIZE (MODE) < 4) \
327 ? SImode : MODE
328
329 /* We will be using prototype promotion, so they will be 32 bit. */
330 #define PARM_BOUNDARY 32
331
332 /* Stack boundary is guided by -mstack-align, -mno-stack-align,
333 -malign.
334 Old comment: (2.1: still valid in 2.7.2?)
335 Note that to make this macro affect the alignment of stack
336 locals, a fix was required, and special precautions when handling
337 the stack pointer in various other macros (TARGET_ASM_FUNCTION_PROLOGUE
338 et al) were required. See file "function.c". If you would just define
339 this macro, it would only affect the builtin alloca and variable
340 local data (non-ANSI, non-K&R, Gnu C extension). */
341 #define STACK_BOUNDARY \
342 (TARGET_STACK_ALIGN ? (TARGET_ALIGN_BY_32 ? 32 : 16) : 8)
343
344 #define FUNCTION_BOUNDARY 16
345
346 /* Do not change BIGGEST_ALIGNMENT (when optimizing), as it will affect
347 strange places, at least in 2.1. */
348 #define BIGGEST_ALIGNMENT 8
349
350 /* If -m16bit, -m16-bit, -malign or -mdata-align,
351 align everything to 16 bit. */
352 #define DATA_ALIGNMENT(TYPE, BASIC_ALIGN) \
353 (TARGET_DATA_ALIGN \
354 ? (TARGET_ALIGN_BY_32 \
355 ? (BASIC_ALIGN < 32 ? 32 : BASIC_ALIGN) \
356 : (BASIC_ALIGN < 16 ? 16 : BASIC_ALIGN)) : BASIC_ALIGN)
357
358 /* Note that CONSTANT_ALIGNMENT has the effect of making gcc believe that
359 ALL references to constant stuff (in code segment, like strings) has
360 this alignment. That is a rather rushed assumption. Luckily we do not
361 care about the "alignment" operand to builtin memcpy (only place where
362 it counts), so it doesn't affect any bad spots. */
363 #define CONSTANT_ALIGNMENT(CONSTANT, BASIC_ALIGN) \
364 (TARGET_CONST_ALIGN \
365 ? (TARGET_ALIGN_BY_32 \
366 ? (BASIC_ALIGN < 32 ? 32 : BASIC_ALIGN) \
367 : (BASIC_ALIGN < 16 ? 16 : BASIC_ALIGN)) : BASIC_ALIGN)
368
369 /* FIXME: Define LOCAL_ALIGNMENT for word and dword or arrays and
370 structures (if -mstack-align=), and check that it is good. */
371
372 #define EMPTY_FIELD_BOUNDARY 8
373
374 #define STRUCTURE_SIZE_BOUNDARY 8
375
376 #define STRICT_ALIGNMENT 0
377
378 /* Remove any previous definition (elfos.h).
379 ??? If it wasn't for all the other stuff that affects layout of
380 structures and bit-fields, this could presumably cause incompatibility
381 with other GNU/Linux ports (i.e. elfos.h users). */
382 #undef PCC_BITFIELD_TYPE_MATTERS
383
384 /* This is only used for non-scalars. Strange stuff happens to structs
385 (FIXME: What?) if we use anything larger than largest actually used
386 datum size, so lets make it 32. The type "long long" will still work
387 as usual. We can still have DImode insns, but they will only be used
388 for scalar data (i.e. long long). */
389 #define MAX_FIXED_MODE_SIZE 32
390
391
392 /* Node: Type Layout */
393
394 /* Note that DOUBLE_TYPE_SIZE is not defined anymore, since the default
395 value gives a 64-bit double, which is what we now use. */
396
397 /* For compatibility and historical reasons, a char should be signed. */
398 #define DEFAULT_SIGNED_CHAR 1
399
400 /* Note that WCHAR_TYPE_SIZE is used in cexp.y,
401 where TARGET_SHORT is not available. */
402 #undef WCHAR_TYPE
403 #define WCHAR_TYPE "long int"
404
405 #undef WCHAR_TYPE_SIZE
406 #define WCHAR_TYPE_SIZE 32
407
408
409 /* Node: Register Basics */
410
411 /* We count all 16 non-special registers, SRP, a faked argument
412 pointer register, MOF and CCR/DCCR. */
413 #define FIRST_PSEUDO_REGISTER (16 + 1 + 1 + 1 + 1)
414
415 /* For CRIS, these are r15 (pc) and r14 (sp). Register r8 is used as a
416 frame-pointer, but is not fixed. SRP is not included in general
417 registers and will not be used automatically. All other special
418 registers are fixed at the moment. The faked argument pointer register
419 is fixed too. */
420 #define FIXED_REGISTERS \
421 {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 1, 1, 0}
422
423 /* Register r9 is used for structure-address, r10-r13 for parameters,
424 r10- for return values. */
425 #define CALL_USED_REGISTERS \
426 {0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1}
427
428 /* Node: Allocation Order */
429
430 /* We need this on CRIS, because call-used regs should be used first,
431 (so we don't need to push). Else start using registers from r0 and up.
432 This preference is mainly because if we put call-used-regs from r0
433 and up, then we can't use movem to push the rest, (which have to be
434 saved if we use them, and movem has to start with r0).
435 Change here if you change which registers to use as call registers.
436
437 The actual need to explicitly prefer call-used registers improved the
438 situation a lot for 2.1, but might not actually be needed anymore.
439 Still, this order reflects what GCC should find out by itself, so it
440 probably does not hurt.
441
442 Order of preference: Call-used-regs first, then r0 and up, last fp &
443 sp & pc as fillers.
444 Call-used regs in opposite order, so they will cause less conflict if
445 a function has few args (<= 3) and it wants a scratch reg.
446 Use struct-return address first, since very few functions use
447 structure return values so it is likely to be available. */
448 #define REG_ALLOC_ORDER \
449 {9, 13, 12, 11, 10, 0, 1, 2, 3, 4, 5, 6, 7, 8, 14, 15, 17, 16, 18, 19}
450
451 /* Use MOF and ACR. Prefer ACR before any other register. Prefer MOF
452 then SRP after saved registers. The *after* is because they're only
453 useful for storage, not for things being computed, which is
454 apparently more common. */
455 #define REG_ALLOC_ORDER_V32 \
456 {15, 9, 13, 12, 11, 10, 0, 1, 2, 3, 4, 5, 6, 7, 8, 17, 16, 14, 18, 19}
457
458
459 /* Node: Values in Registers */
460
461 /* The VOIDmode test is so we can omit mode on anonymous insns. FIXME:
462 Still needed in 2.9x, at least for Axis-20000319. */
463 #define HARD_REGNO_NREGS(REGNO, MODE) \
464 (MODE == VOIDmode \
465 ? 1 : ((GET_MODE_SIZE (MODE) + UNITS_PER_WORD - 1) / UNITS_PER_WORD))
466
467 /* CRIS permits all registers to hold all modes. Well, except for the
468 condition-code register. And we can't hold larger-than-register size
469 modes in the last special register that can hold a full 32 bits. */
470 #define HARD_REGNO_MODE_OK(REGNO, MODE) \
471 (((MODE) == CCmode \
472 || (REGNO) != CRIS_CC0_REGNUM) \
473 && (GET_MODE_SIZE (MODE) <= UNITS_PER_WORD \
474 || ((REGNO) != CRIS_MOF_REGNUM && (REGNO) != CRIS_ACR_REGNUM)))
475
476 /* Because CCmode isn't covered by the "narrower mode" statement in
477 tm.texi, we can still say all modes are tieable despite not having an
478 always 1 HARD_REGNO_MODE_OK. */
479 #define MODES_TIEABLE_P(MODE1, MODE2) 1
480
481
482 /* Node: Leaf Functions */
483 /* (no definitions) */
484
485 /* Node: Stack Registers */
486 /* (no definitions) */
487
488
489 /* Node: Register Classes */
490
491 /* FIXME: A separate class for the return register would make sense.
492
493 We need a separate register class to handle register allocation for
494 ACR, since it can't be used for post-increment.
495
496 It's not obvious, but having subunions of all movable-between
497 register classes does really help register allocation. */
498 enum reg_class
499 {
500 NO_REGS,
501 ACR_REGS, MOF_REGS, CC0_REGS, SPECIAL_REGS,
502 SPEC_ACR_REGS, GENNONACR_REGS,
503 SPEC_GENNONACR_REGS, GENERAL_REGS,
504 ALL_REGS,
505 LIM_REG_CLASSES
506 };
507
508 #define N_REG_CLASSES (int) LIM_REG_CLASSES
509
510 #define REG_CLASS_NAMES \
511 {"NO_REGS", \
512 "ACR_REGS", "MOF_REGS", "CC0_REGS", "SPECIAL_REGS", \
513 "SPEC_ACR_REGS", "GENNONACR_REGS", "SPEC_GENNONACR_REGS", \
514 "GENERAL_REGS", "ALL_REGS"}
515
516 #define CRIS_SPECIAL_REGS_CONTENTS \
517 ((1 << CRIS_SRP_REGNUM) | (1 << CRIS_MOF_REGNUM) | (1 << CRIS_CC0_REGNUM))
518
519 /* Count in the faked argument register in GENERAL_REGS. Keep out SRP. */
520 #define REG_CLASS_CONTENTS \
521 { \
522 {0}, \
523 {1 << CRIS_ACR_REGNUM}, \
524 {1 << CRIS_MOF_REGNUM}, \
525 {1 << CRIS_CC0_REGNUM}, \
526 {CRIS_SPECIAL_REGS_CONTENTS}, \
527 {CRIS_SPECIAL_REGS_CONTENTS \
528 | (1 << CRIS_ACR_REGNUM)}, \
529 {(0xffff | (1 << CRIS_AP_REGNUM)) \
530 & ~(1 << CRIS_ACR_REGNUM)}, \
531 {(0xffff | (1 << CRIS_AP_REGNUM) \
532 | CRIS_SPECIAL_REGS_CONTENTS) \
533 & ~(1 << CRIS_ACR_REGNUM)}, \
534 {0xffff | (1 << CRIS_AP_REGNUM)}, \
535 {0xffff | (1 << CRIS_AP_REGNUM) \
536 | CRIS_SPECIAL_REGS_CONTENTS} \
537 }
538
539 #define REGNO_REG_CLASS(REGNO) \
540 ((REGNO) == CRIS_ACR_REGNUM ? ACR_REGS : \
541 (REGNO) == CRIS_MOF_REGNUM ? MOF_REGS : \
542 (REGNO) == CRIS_CC0_REGNUM ? CC0_REGS : \
543 (REGNO) == CRIS_SRP_REGNUM ? SPECIAL_REGS : \
544 GENERAL_REGS)
545
546 #define BASE_REG_CLASS GENERAL_REGS
547
548 #define MODE_CODE_BASE_REG_CLASS(MODE, OCODE, ICODE) \
549 ((OCODE) != POST_INC ? BASE_REG_CLASS : GENNONACR_REGS)
550
551 #define INDEX_REG_CLASS GENERAL_REGS
552
553 #define IRA_COVER_CLASSES { GENERAL_REGS, SPECIAL_REGS, LIM_REG_CLASSES }
554
555 #define REG_CLASS_FROM_LETTER(C) \
556 ( \
557 (C) == 'a' ? ACR_REGS : \
558 (C) == 'b' ? GENNONACR_REGS : \
559 (C) == 'h' ? MOF_REGS : \
560 (C) == 'x' ? SPECIAL_REGS : \
561 (C) == 'c' ? CC0_REGS : \
562 NO_REGS \
563 )
564
565 /* Since it uses reg_renumber, it is safe only once reg_renumber
566 has been allocated, which happens in local-alloc.c. */
567 #define REGNO_OK_FOR_BASE_P(REGNO) \
568 ((REGNO) <= CRIS_LAST_GENERAL_REGISTER \
569 || (REGNO) == ARG_POINTER_REGNUM \
570 || (unsigned) reg_renumber[REGNO] <= CRIS_LAST_GENERAL_REGISTER \
571 || (unsigned) reg_renumber[REGNO] == ARG_POINTER_REGNUM)
572
573 /* REGNO_OK_FOR_BASE_P seems to be obsolete wrt. this one, but not yet
574 documented as such. */
575 #define REGNO_MODE_CODE_OK_FOR_BASE_P(REGNO, MODE, OCODE, ICODE) \
576 (REGNO_OK_FOR_BASE_P (REGNO) \
577 && ((OCODE) != POST_INC \
578 || !((REGNO) == CRIS_ACR_REGNUM \
579 || (unsigned) reg_renumber[REGNO] == CRIS_ACR_REGNUM)))
580
581 /* See REGNO_OK_FOR_BASE_P. */
582 #define REGNO_OK_FOR_INDEX_P(REGNO) REGNO_OK_FOR_BASE_P(REGNO)
583
584 /* It seems like gcc (2.7.2 and 2.9x of 2000-03-22) may send "NO_REGS" as
585 the class for a constant (testcase: __Mul in arit.c). To avoid forcing
586 out a constant into the constant pool, we will trap this case and
587 return something a bit more sane. FIXME: Check if this is a bug.
588 Beware that we must not "override" classes that can be specified as
589 constraint letters, or else asm operands using them will fail when
590 they need to be reloaded. FIXME: Investigate whether that constitutes
591 a bug. */
592 #define PREFERRED_RELOAD_CLASS(X, CLASS) \
593 ((CLASS) != ACR_REGS \
594 && (CLASS) != MOF_REGS \
595 && (CLASS) != CC0_REGS \
596 && (CLASS) != SPECIAL_REGS \
597 ? GENERAL_REGS : (CLASS))
598
599 /* We can't move special registers to and from memory in smaller than
600 word_mode. We also can't move between special registers. Luckily,
601 -1, as returned by true_regnum for non-sub/registers, is valid as a
602 parameter to our REGNO_REG_CLASS, returning GENERAL_REGS, so we get
603 the effect that any X that isn't a special-register is treated as
604 a non-empty intersection with GENERAL_REGS. */
605 #define SECONDARY_RELOAD_CLASS(CLASS, MODE, X) \
606 ((((CLASS) == SPECIAL_REGS || (CLASS) == MOF_REGS) \
607 && ((GET_MODE_SIZE (MODE) < 4 && MEM_P (X)) \
608 || !reg_classes_intersect_p (REGNO_REG_CLASS (true_regnum (X)), \
609 GENERAL_REGS))) \
610 ? GENERAL_REGS : NO_REGS)
611
612 /* FIXME: Fix regrename.c; it should check validity of replacements,
613 not just with a silly pass-specific macro. We may miss some
614 opportunities, but we must stop regrename from creating acr++. */
615 #define HARD_REGNO_RENAME_OK(FROM, TO) ((TO) != CRIS_ACR_REGNUM)
616
617 /* For CRIS, this is always the size of MODE in words,
618 since all registers are the same size. To use omitted modes in
619 patterns with reload constraints, you must say the widest size
620 which is allowed for VOIDmode.
621 FIXME: Does that still apply for gcc-2.9x? Keep poisoned until such
622 patterns are added back. News: 2001-03-16: Happens as early as the
623 underscore-test. */
624 #define CLASS_MAX_NREGS(CLASS, MODE) \
625 ((MODE) == VOIDmode \
626 ? 1 /* + cris_fatal ("CLASS_MAX_NREGS with VOIDmode") */ \
627 : ((GET_MODE_SIZE (MODE) + UNITS_PER_WORD - 1) / UNITS_PER_WORD))
628
629 /* We are now out of letters; we could use ten more. This forces us to
630 use C-code in the 'md' file. FIXME: Use some EXTRA_CONSTRAINTS. */
631 #define CRIS_CONST_OK_FOR_LETTER_P(VALUE, C) \
632 ( \
633 /* MOVEQ, CMPQ, ANDQ, ORQ. */ \
634 (C) == 'I' ? (VALUE) >= -32 && (VALUE) <= 31 : \
635 /* ADDQ, SUBQ. */ \
636 (C) == 'J' ? (VALUE) >= 0 && (VALUE) <= 63 : \
637 /* ASRQ, BTSTQ, LSRQ, LSLQ. */ \
638 (C) == 'K' ? (VALUE) >= 0 && (VALUE) <= 31 : \
639 /* A 16-bit signed number. */ \
640 (C) == 'L' ? (VALUE) >= -32768 && (VALUE) <= 32767 : \
641 /* The constant 0 for CLEAR. */ \
642 (C) == 'M' ? (VALUE) == 0 : \
643 /* A negative ADDQ or SUBQ. */ \
644 (C) == 'N' ? (VALUE) >= -63 && (VALUE) < 0 : \
645 /* Quickened ints, QI and HI. */ \
646 (C) == 'O' ? (VALUE) >= 0 && (VALUE) <= 65535 \
647 && ((VALUE) >= (65535-31) \
648 || ((VALUE) >= (255-31) \
649 && (VALUE) <= 255 )) : \
650 /* A 16-bit number signed *or* unsigned. */ \
651 (C) == 'P' ? (VALUE) >= -32768 && (VALUE) <= 65535 : \
652 0)
653
654 #define CONST_OK_FOR_CONSTRAINT_P(VALUE, C, S) \
655 ( \
656 ((C) != 'K' || (S)[1] == 'c') \
657 ? CRIS_CONST_OK_FOR_LETTER_P (VALUE, C) : \
658 ((C) == 'K' && (S)[1] == 'p') \
659 ? exact_log2 (VALUE) >= 0 : \
660 0)
661
662 #define CONSTRAINT_LEN(C, S) ((C) == 'K' ? 2 : DEFAULT_CONSTRAINT_LEN (C, S))
663
664 /* It is really simple to make up a 0.0; it is the same as int-0 in
665 IEEE754. */
666 #define CONST_DOUBLE_OK_FOR_LETTER_P(VALUE, C) \
667 ((C) == 'G' && ((VALUE) == CONST0_RTX (DFmode) \
668 || (VALUE) == CONST0_RTX (SFmode)))
669
670 /* We need this on cris to distinguish delay-slottable addressing modes. */
671 #define EXTRA_CONSTRAINT(X, C) \
672 ( \
673 /* Slottable address mode? */ \
674 (C) == 'Q' ? EXTRA_CONSTRAINT_Q (X) : \
675 /* Operand to BDAP or BIAP? */ \
676 (C) == 'R' ? EXTRA_CONSTRAINT_R (X) : \
677 /* A local PIC symbol? */ \
678 (C) == 'S' ? EXTRA_CONSTRAINT_S (X) : \
679 /* A three-address addressing-mode? */ \
680 (C) == 'T' ? EXTRA_CONSTRAINT_T (X) : \
681 /* A PLT symbol? */ \
682 (C) == 'U' ? EXTRA_CONSTRAINT_U (X) : \
683 0)
684
685 #define EXTRA_MEMORY_CONSTRAINT(X, STR) ((X) == 'Q')
686
687 #define EXTRA_CONSTRAINT_Q(X) \
688 ( \
689 /* Just an indirect register (happens to also be \
690 "all" slottable memory addressing modes not \
691 covered by other constraints, i.e. '>'). */ \
692 MEM_P (X) && BASE_P (XEXP (X, 0)) \
693 )
694
695 #define EXTRA_CONSTRAINT_R(X) \
696 ( \
697 /* An operand to BDAP or BIAP: \
698 A BIAP; r.S? */ \
699 BIAP_INDEX_P (X) \
700 /* A [reg] or (int) [reg], maybe with post-increment. */ \
701 || BDAP_INDEX_P (X) \
702 || CONSTANT_INDEX_P (X) \
703 )
704
705 #define EXTRA_CONSTRAINT_T(X) \
706 ( \
707 /* Memory three-address operand. All are indirect-memory: */ \
708 MEM_P (X) \
709 && ((MEM_P (XEXP (X, 0)) \
710 /* Double indirect: [[reg]] or [[reg+]]? */ \
711 && (BASE_OR_AUTOINCR_P (XEXP (XEXP (X, 0), 0)))) \
712 /* Just an explicit indirect reference: [const]? */ \
713 || CONSTANT_P (XEXP (X, 0)) \
714 /* Something that is indexed; [...+...]? */ \
715 || (GET_CODE (XEXP (X, 0)) == PLUS \
716 /* A BDAP constant: [reg+(8|16|32)bit offset]? */ \
717 && ((BASE_P (XEXP (XEXP (X, 0), 0)) \
718 && CONSTANT_INDEX_P (XEXP (XEXP (X, 0), 1))) \
719 /* A BDAP register: [reg+[reg(+)].S]? */ \
720 || (BASE_P (XEXP (XEXP (X, 0), 0)) \
721 && BDAP_INDEX_P(XEXP(XEXP(X, 0), 1))) \
722 /* Same, but with swapped arguments (no canonical \
723 ordering between e.g. REG and MEM as of LAST_UPDATED \
724 "Thu May 12 03:59:11 UTC 2005"). */ \
725 || (BASE_P (XEXP (XEXP (X, 0), 1)) \
726 && BDAP_INDEX_P (XEXP (XEXP (X, 0), 0))) \
727 /* A BIAP: [reg+reg.S] (MULT comes first). */ \
728 || (BASE_P (XEXP (XEXP (X, 0), 1)) \
729 && BIAP_INDEX_P (XEXP (XEXP (X, 0), 0)))))) \
730 )
731
732 /* PIC-constructs for symbols. */
733 #define EXTRA_CONSTRAINT_S(X) \
734 (flag_pic && GET_CODE (X) == CONST && cris_valid_pic_const (X, false))
735
736 #define EXTRA_CONSTRAINT_U(X) \
737 (flag_pic \
738 && CONSTANT_P (X) \
739 && cris_nonmemory_operand_or_callable_symbol (X, VOIDmode))
740
741
742 /* Node: Frame Layout */
743
744 #define STACK_GROWS_DOWNWARD
745 #define FRAME_GROWS_DOWNWARD 1
746
747 /* It seems to be indicated in the code (at least 2.1) that this is
748 better a constant, and best 0. */
749 #define STARTING_FRAME_OFFSET 0
750
751 #define FIRST_PARM_OFFSET(FNDECL) 0
752
753 #define RETURN_ADDR_RTX(COUNT, FRAMEADDR) \
754 cris_return_addr_rtx (COUNT, FRAMEADDR)
755
756 #define INCOMING_RETURN_ADDR_RTX gen_rtx_REG (Pmode, CRIS_SRP_REGNUM)
757
758 /* FIXME: Any __builtin_eh_return callers must not return anything and
759 there must not be collisions with incoming parameters. Luckily the
760 number of __builtin_eh_return callers is limited. For now return
761 parameter registers in reverse order and hope for the best. */
762 #define EH_RETURN_DATA_REGNO(N) \
763 (IN_RANGE ((N), 0, 3) ? (CRIS_FIRST_ARG_REG + 3 - (N)) : INVALID_REGNUM)
764
765 /* Store the stack adjustment in the structure-return-address register. */
766 #define CRIS_STACKADJ_REG CRIS_STRUCT_VALUE_REGNUM
767 #define EH_RETURN_STACKADJ_RTX gen_rtx_REG (SImode, CRIS_STACKADJ_REG)
768
769 #define EH_RETURN_HANDLER_RTX \
770 cris_return_addr_rtx (0, NULL)
771
772 #define INIT_EXPANDERS cris_init_expanders ()
773
774 /* FIXME: Move this to right node (it's not documented properly yet). */
775 #define DWARF_FRAME_RETURN_COLUMN DWARF_FRAME_REGNUM (CRIS_SRP_REGNUM)
776
777 /* FIXME: Move this to right node (it's not documented properly yet).
778 FIXME: Check what alignment we can assume regarding
779 TARGET_STACK_ALIGN and TARGET_ALIGN_BY_32. */
780 #define DWARF_CIE_DATA_ALIGNMENT -1
781
782 /* If we would ever need an exact mapping between canonical register
783 number and dwarf frame register, we would either need to include all
784 registers in the gcc description (with some marked fixed of course), or
785 an inverse mapping from dwarf register to gcc register. There is one
786 need in dwarf2out.c:expand_builtin_init_dwarf_reg_sizes. Right now, I
787 don't see that we need exact correspondence between DWARF *frame*
788 registers and DBX_REGISTER_NUMBER, so map them onto GCC registers. */
789 #define DWARF_FRAME_REGNUM(REG) (REG)
790
791 /* Node: Stack Checking */
792 /* (no definitions) FIXME: Check. */
793
794 /* Node: Frame Registers */
795
796 #define STACK_POINTER_REGNUM CRIS_SP_REGNUM
797
798 /* Register used for frame pointer. This is also the last of the saved
799 registers, when a frame pointer is not used. */
800 #define FRAME_POINTER_REGNUM CRIS_FP_REGNUM
801
802 /* Faked register, is always eliminated. We need it to eliminate
803 allocating stack slots for the return address and the frame pointer. */
804 #define ARG_POINTER_REGNUM CRIS_AP_REGNUM
805
806 #define STATIC_CHAIN_REGNUM CRIS_STATIC_CHAIN_REGNUM
807
808
809 /* Node: Elimination */
810
811 #define ELIMINABLE_REGS \
812 {{ARG_POINTER_REGNUM, STACK_POINTER_REGNUM}, \
813 {ARG_POINTER_REGNUM, FRAME_POINTER_REGNUM}, \
814 {FRAME_POINTER_REGNUM, STACK_POINTER_REGNUM}}
815
816 #define INITIAL_ELIMINATION_OFFSET(FROM, TO, OFFSET) \
817 (OFFSET) = cris_initial_elimination_offset (FROM, TO)
818
819
820 /* Node: Stack Arguments */
821
822 /* Since many parameters take up one register each in any case,
823 defining TARGET_PROMOTE_PROTOTYPES that always returns true would
824 seem like a good idea, but measurements indicate that a combination
825 using PROMOTE_MODE is better. */
826
827 #define ACCUMULATE_OUTGOING_ARGS 1
828
829
830 /* Node: Register Arguments */
831
832 /* Contrary to what you'd believe, defining FUNCTION_ARG_CALLEE_COPIES
833 seems like a (small total) loss, at least for gcc-2.7.2 compiling and
834 running gcc-2.1 (small win in size, small loss running -- 100.1%),
835 and similarly for size for products (.1 .. .3% bloat, sometimes win).
836 Due to the empirical likeliness of making slower code, it is not
837 defined. */
838
839 /* This no longer *needs* to be a structure; but keeping it as such should
840 not hurt (and hacking the ABI is simpler). */
841 #define CUMULATIVE_ARGS struct cum_args
842 struct cum_args {int regs;};
843
844 /* The regs member is an integer, the number of arguments got into
845 registers so far. */
846 #define INIT_CUMULATIVE_ARGS(CUM, FNTYPE, LIBNAME, FNDECL, N_NAMED_ARGS) \
847 ((CUM).regs = 0)
848
849 #define FUNCTION_ARG_REGNO_P(REGNO) \
850 ((REGNO) >= CRIS_FIRST_ARG_REG \
851 && (REGNO) < CRIS_FIRST_ARG_REG + (CRIS_MAX_ARGS_IN_REGS))
852
853
854 /* Node: Scalar Return */
855
856 #define FUNCTION_VALUE_REGNO_P(N) cris_function_value_regno_p (N)
857
858
859
860 /* Node: Aggregate Return */
861
862 #define CRIS_STRUCT_VALUE_REGNUM ((CRIS_FIRST_ARG_REG) - 1)
863
864
865 /* Node: Caller Saves */
866 /* (no definitions) */
867
868 /* Node: Function entry */
869
870 /* See cris.c for TARGET_ASM_FUNCTION_PROLOGUE and
871 TARGET_ASM_FUNCTION_EPILOGUE. */
872
873 /* Node: Profiling */
874
875 #define FUNCTION_PROFILER(FILE, LABELNO) \
876 error ("no FUNCTION_PROFILER for CRIS")
877
878 /* FIXME: Some of the undefined macros might be mandatory. If so, fix
879 documentation. */
880
881
882 /* Node: Trampolines */
883
884 #define TRAMPOLINE_SIZE (TARGET_V32 ? 58 : 32)
885
886 /* CRIS wants instructions on word-boundary. */
887 #define TRAMPOLINE_ALIGNMENT 16
888
889 /* Node: Library Calls */
890
891 /* If you change this, you have to check whatever libraries and systems
892 that use it. */
893 #define TARGET_EDOM 33
894
895
896 /* Node: Addressing Modes */
897
898 #define HAVE_POST_INCREMENT 1
899
900 /* Must be a compile-time constant, so we go with the highest value
901 among all CRIS variants. */
902 #define MAX_REGS_PER_ADDRESS 2
903
904 /* There are helper macros defined here which are used only in
905 GO_IF_LEGITIMATE_ADDRESS.
906
907 Note that you *have to* reject invalid addressing modes for mode
908 MODE, even if it is legal for normal addressing modes. You cannot
909 rely on the constraints to do this work. They can only be used to
910 doublecheck your intentions. One example is that you HAVE TO reject
911 (mem:DI (plus:SI (reg:SI x) (reg:SI y))) because for some reason
912 this cannot be reloaded. (Which of course you can argue that gcc
913 should have done.) FIXME: Strange. Check. */
914
915 /* No symbol can be used as an index (or more correct, as a base) together
916 with a register with PIC; the PIC register must be there. */
917 #define CONSTANT_INDEX_P(X) \
918 (CONSTANT_P (X) && (!flag_pic || cris_valid_pic_const (X, true)))
919
920 /* True if X is a valid base register. */
921 #define BASE_P(X) \
922 (REG_P (X) && REG_OK_FOR_BASE_P (X))
923
924 /* True if X is a valid base register with or without autoincrement. */
925 #define BASE_OR_AUTOINCR_P(X) \
926 (BASE_P (X) \
927 || (GET_CODE (X) == POST_INC \
928 && BASE_P (XEXP (X, 0)) \
929 && REGNO (XEXP (X, 0)) != CRIS_ACR_REGNUM))
930
931 /* True if X is a valid (register) index for BDAP, i.e. [Rs].S or [Rs+].S. */
932 #define BDAP_INDEX_P(X) \
933 ((MEM_P (X) && GET_MODE (X) == SImode \
934 && BASE_OR_AUTOINCR_P (XEXP (X, 0))) \
935 || (GET_CODE (X) == SIGN_EXTEND \
936 && MEM_P (XEXP (X, 0)) \
937 && (GET_MODE (XEXP (X, 0)) == HImode \
938 || GET_MODE (XEXP (X, 0)) == QImode) \
939 && BASE_OR_AUTOINCR_P (XEXP (XEXP (X, 0), 0))))
940
941 /* True if X is a valid (register) index for BIAP, i.e. Rd.m. */
942 #define BIAP_INDEX_P(X) \
943 ((BASE_P (X) && REG_OK_FOR_INDEX_P (X)) \
944 || (GET_CODE (X) == MULT \
945 && BASE_P (XEXP (X, 0)) \
946 && REG_OK_FOR_INDEX_P (XEXP (X, 0)) \
947 && CONST_INT_P (XEXP (X, 1)) \
948 && (INTVAL (XEXP (X, 1)) == 2 \
949 || INTVAL (XEXP (X, 1)) == 4)))
950
951 /* A PIC operand looks like a normal symbol here. At output we dress it
952 in "[rPIC+symbol:GOT]" (global symbol) or "rPIC+symbol:GOTOFF" (local
953 symbol) so we exclude all addressing modes where we can't replace a
954 plain "symbol" with that. A global PIC symbol does not fit anywhere
955 here (but is thankfully a general_operand in itself). A local PIC
956 symbol is valid for the plain "symbol + offset" case. */
957 #define GO_IF_LEGITIMATE_ADDRESS(MODE, X, ADDR) \
958 { \
959 rtx x1, x2; \
960 if (BASE_OR_AUTOINCR_P (X)) \
961 goto ADDR; \
962 else if (TARGET_V32) \
963 /* Nothing else is valid then. */ \
964 ; \
965 else if (CONSTANT_INDEX_P (X)) \
966 goto ADDR; \
967 /* Indexed? */ \
968 else if (GET_CODE (X) == PLUS) \
969 { \
970 x1 = XEXP (X, 0); \
971 x2 = XEXP (X, 1); \
972 /* BDAP o, Rd. */ \
973 if ((BASE_P (x1) && CONSTANT_INDEX_P (x2)) \
974 || (BASE_P (x2) && CONSTANT_INDEX_P (x1)) \
975 /* BDAP Rs[+], Rd. */ \
976 || (GET_MODE_SIZE (MODE) <= UNITS_PER_WORD \
977 && ((BASE_P (x1) && BDAP_INDEX_P (x2)) \
978 || (BASE_P (x2) && BDAP_INDEX_P (x1)) \
979 /* BIAP.m Rs, Rd */ \
980 || (BASE_P (x1) && BIAP_INDEX_P (x2)) \
981 || (BASE_P (x2) && BIAP_INDEX_P (x1))))) \
982 goto ADDR; \
983 } \
984 else if (MEM_P (X)) \
985 { \
986 /* DIP (Rs). Reject [[reg+]] and [[reg]] for \
987 DImode (long long). */ \
988 if (GET_MODE_SIZE (MODE) <= UNITS_PER_WORD \
989 && (BASE_P (XEXP (X, 0)) \
990 || BASE_OR_AUTOINCR_P (XEXP (X, 0)))) \
991 goto ADDR; \
992 } \
993 }
994
995 #ifndef REG_OK_STRICT
996 /* Nonzero if X is a hard reg that can be used as a base reg
997 or if it is a pseudo reg. */
998 # define REG_OK_FOR_BASE_P(X) \
999 (REGNO (X) <= CRIS_LAST_GENERAL_REGISTER \
1000 || REGNO (X) == ARG_POINTER_REGNUM \
1001 || REGNO (X) >= FIRST_PSEUDO_REGISTER)
1002 #else
1003 /* Nonzero if X is a hard reg that can be used as a base reg. */
1004 # define REG_OK_FOR_BASE_P(X) REGNO_OK_FOR_BASE_P (REGNO (X))
1005 #endif
1006
1007 #ifndef REG_OK_STRICT
1008 /* Nonzero if X is a hard reg that can be used as an index
1009 or if it is a pseudo reg. */
1010 # define REG_OK_FOR_INDEX_P(X) REG_OK_FOR_BASE_P (X)
1011 #else
1012 /* Nonzero if X is a hard reg that can be used as an index. */
1013 # define REG_OK_FOR_INDEX_P(X) REGNO_OK_FOR_INDEX_P (REGNO (X))
1014 #endif
1015
1016 /* Fix reloads known to cause suboptimal spilling. */
1017 #define LEGITIMIZE_RELOAD_ADDRESS(X, MODE, OPNUM, TYPE, INDL, WIN) \
1018 do \
1019 { \
1020 if (cris_reload_address_legitimized (X, MODE, OPNUM, TYPE, INDL)) \
1021 goto WIN; \
1022 } \
1023 while (0)
1024
1025 #define LEGITIMATE_CONSTANT_P(X) 1
1026
1027
1028 /* Node: Condition Code */
1029
1030 #define NOTICE_UPDATE_CC(EXP, INSN) cris_notice_update_cc (EXP, INSN)
1031
1032 /* FIXME: Maybe define CANONICALIZE_COMPARISON later, when playing with
1033 optimizations. It is needed; currently we do this with instruction
1034 patterns and NOTICE_UPDATE_CC. */
1035
1036
1037 /* Node: Costs */
1038
1039 /* Regardless of the presence of delay slots, the default value of 1 for
1040 BRANCH_COST is the best in the range (1, 2, 3), tested with gcc-2.7.2
1041 with testcases ipps and gcc, giving smallest and fastest code. */
1042
1043 #define SLOW_BYTE_ACCESS 0
1044
1045 /* This is the threshold *below* which inline move sequences of
1046 word-length sizes will be emitted. The "9" will translate to
1047 (9 - 1) * 4 = 32 bytes maximum moved, but using 16 instructions
1048 (8 instruction sequences) or less. */
1049 #define MOVE_RATIO(speed) 9
1050
1051
1052 /* Node: Sections */
1053
1054 #define TEXT_SECTION_ASM_OP "\t.text"
1055
1056 #define DATA_SECTION_ASM_OP "\t.data"
1057
1058 #define FORCE_EH_FRAME_INFO_IN_DATA_SECTION (! TARGET_ELF)
1059
1060 /* The jump table is immediately connected to the preceding insn. */
1061 #define JUMP_TABLES_IN_TEXT_SECTION 1
1062
1063
1064 /* Node: PIC */
1065
1066 /* Helper type. */
1067
1068 enum cris_pic_symbol_type
1069 {
1070 cris_no_symbol = 0,
1071 cris_got_symbol = 1,
1072 cris_rel_symbol = 2,
1073 cris_got_symbol_needing_fixup = 3,
1074 cris_invalid_pic_symbol = 4
1075 };
1076
1077 #define PIC_OFFSET_TABLE_REGNUM (flag_pic ? CRIS_GOT_REGNUM : INVALID_REGNUM)
1078
1079 #define LEGITIMATE_PIC_OPERAND_P(X) cris_legitimate_pic_operand (X)
1080
1081
1082 /* Node: File Framework */
1083
1084 /* We don't want an .ident for gcc. To avoid that but still support
1085 #ident, we override ASM_OUTPUT_IDENT and, since the gcc .ident is its
1086 only use besides ASM_OUTPUT_IDENT, undef IDENT_ASM_OP from elfos.h. */
1087 #undef IDENT_ASM_OP
1088 #undef ASM_OUTPUT_IDENT
1089 #define ASM_OUTPUT_IDENT(FILE, NAME) \
1090 fprintf (FILE, "%s\"%s\"\n", "\t.ident\t", NAME);
1091
1092 #define ASM_APP_ON "#APP\n"
1093
1094 #define ASM_APP_OFF "#NO_APP\n"
1095
1096
1097 /* Node: Data Output */
1098
1099 #define OUTPUT_ADDR_CONST_EXTRA(STREAM, X, FAIL) \
1100 do { if (!cris_output_addr_const_extra (STREAM, X)) goto FAIL; } while (0)
1101
1102 #define IS_ASM_LOGICAL_LINE_SEPARATOR(C, STR) (C) == '@'
1103
1104 /* Node: Uninitialized Data */
1105
1106 /* Remember to round off odd values if we want data alignment,
1107 since we cannot do that with an .align directive.
1108
1109 Using .comm causes the space not to be reserved in .bss, but by
1110 tricks with the symbol type. Not good if other tools than binutils
1111 are used on the object files. Since ".global ... .lcomm ..." works, we
1112 use that. Use .._ALIGNED_COMMON, since gcc whines when we only have
1113 ..._COMMON, and we prefer to whine ourselves; BIGGEST_ALIGNMENT is not
1114 the one to check. This done for a.out only. */
1115 /* FIXME: I suspect a bug in gcc with alignment. Do not warn until
1116 investigated; it mucks up the testsuite results. */
1117 #define CRIS_ASM_OUTPUT_ALIGNED_DECL_COMMON(FILE, DECL, NAME, SIZE, ALIGN, LOCAL) \
1118 do \
1119 { \
1120 int align_ = (ALIGN) / BITS_PER_UNIT; \
1121 if (TARGET_DATA_ALIGN && TARGET_ALIGN_BY_32 && align_ < 4) \
1122 align_ = 4; \
1123 else if (TARGET_DATA_ALIGN && align_ < 2) \
1124 align_ = 2; \
1125 /* FIXME: Do we need this? */ \
1126 else if (align_ < 1) \
1127 align_ = 1; \
1128 \
1129 if (TARGET_ELF) \
1130 { \
1131 if (LOCAL) \
1132 { \
1133 fprintf ((FILE), "%s", LOCAL_ASM_OP); \
1134 assemble_name ((FILE), (NAME)); \
1135 fprintf ((FILE), "\n"); \
1136 } \
1137 fprintf ((FILE), "%s", COMMON_ASM_OP); \
1138 assemble_name ((FILE), (NAME)); \
1139 fprintf ((FILE), ",%u,%u\n", (int)(SIZE), align_); \
1140 } \
1141 else \
1142 { \
1143 /* We can't tell a one-only or weak COMM from a "global \
1144 COMM" so just make all non-locals weak. */ \
1145 if (! (LOCAL)) \
1146 ASM_WEAKEN_LABEL (FILE, NAME); \
1147 fputs ("\t.lcomm ", (FILE)); \
1148 assemble_name ((FILE), (NAME)); \
1149 fprintf ((FILE), ",%u\n", \
1150 ((int)(SIZE) + (align_ - 1)) & ~(align_ - 1)); \
1151 } \
1152 } \
1153 while (0)
1154
1155 #define ASM_OUTPUT_ALIGNED_DECL_COMMON(FILE, DECL, NAME, SIZE, ALIGN) \
1156 CRIS_ASM_OUTPUT_ALIGNED_DECL_COMMON(FILE, DECL, NAME, SIZE, ALIGN, 0)
1157
1158 #undef ASM_OUTPUT_ALIGNED_DECL_LOCAL
1159 #define ASM_OUTPUT_ALIGNED_DECL_LOCAL(FILE, DECL, NAME, SIZE, ALIGN) \
1160 CRIS_ASM_OUTPUT_ALIGNED_DECL_COMMON(FILE, DECL, NAME, SIZE, ALIGN, 1)
1161
1162 /* Node: Label Output */
1163
1164 /* Globalizing directive for a label. */
1165 #define GLOBAL_ASM_OP "\t.global "
1166
1167 #define SUPPORTS_WEAK 1
1168
1169 #define ASM_OUTPUT_SYMBOL_REF(STREAM, SYM) \
1170 cris_asm_output_symbol_ref (STREAM, SYM)
1171
1172 #define ASM_OUTPUT_LABEL_REF(STREAM, BUF) \
1173 cris_asm_output_label_ref (STREAM, BUF)
1174
1175 /* Remove any previous definition (elfos.h). */
1176 #undef ASM_GENERATE_INTERNAL_LABEL
1177 #define ASM_GENERATE_INTERNAL_LABEL(LABEL, PREFIX, NUM) \
1178 sprintf (LABEL, "*%s%s%ld", LOCAL_LABEL_PREFIX, PREFIX, (long) NUM)
1179
1180 /* Node: Initialization */
1181 /* (no definitions) */
1182
1183 /* Node: Macros for Initialization */
1184 /* (no definitions) */
1185
1186 /* Node: Instruction Output */
1187
1188 #define REGISTER_NAMES \
1189 {"r0", "r1", "r2", "r3", "r4", "r5", "r6", "r7", "r8", \
1190 "r9", "r10", "r11", "r12", "r13", "sp", "acr", "srp", "mof", "faked_ap", "dccr"}
1191
1192 #define ADDITIONAL_REGISTER_NAMES \
1193 {{"r14", 14}, {"r15", 15}, {"pc", 15}}
1194
1195 /* Output an empty line to illustrate the presence of the delay slot. */
1196 #define DBR_OUTPUT_SEQEND(FILE) \
1197 fprintf (FILE, "\n")
1198
1199 #define LOCAL_LABEL_PREFIX (TARGET_ELF ? "." : "")
1200
1201 /* cppinit.c initializes a const array from this, so it must be constant,
1202 can't have it different based on options. Luckily, the prefix is
1203 always allowed, so let's have it on all GCC-generated code. Note that
1204 we have this verbatim everywhere in the back-end, not using %R or %s or
1205 such. */
1206 #define REGISTER_PREFIX "$"
1207
1208 /* Remove any previous definition (elfos.h). */
1209 /* We use -fno-leading-underscore to remove it, when necessary. */
1210 #undef USER_LABEL_PREFIX
1211 #define USER_LABEL_PREFIX "_"
1212
1213 #define ASM_OUTPUT_REG_PUSH(FILE, REGNO) \
1214 fprintf (FILE, \
1215 TARGET_V32 \
1216 ? "\tsubq 4,$sp\n\tmove $%s,[$sp]\n" : "\tpush $%s\n", \
1217 reg_names[REGNO])
1218
1219 #define ASM_OUTPUT_REG_POP(FILE, REGNO) \
1220 fprintf (FILE, "\tmove [$sp+],$%s\n", reg_names[REGNO])
1221
1222
1223 /* Node: Dispatch Tables */
1224
1225 #define ASM_OUTPUT_ADDR_DIFF_ELT(FILE, BODY, VALUE, REL) \
1226 do \
1227 { \
1228 if (TARGET_V32) \
1229 asm_fprintf (FILE, "\t.word %LL%d-.\n", VALUE); \
1230 else \
1231 asm_fprintf (FILE, "\t.word %LL%d-%LL%d\n", VALUE, REL); \
1232 } \
1233 while (0)
1234
1235 #define ASM_OUTPUT_ADDR_VEC_ELT(FILE, VALUE) \
1236 asm_fprintf (FILE, "\t.dword %LL%d\n", VALUE)
1237
1238 /* Defined to also emit an .align in elfos.h. We don't want that. */
1239 #undef ASM_OUTPUT_CASE_LABEL
1240
1241 /* Since the "bound" insn loads the comparison value if the compared<
1242 value (register) is out of bounds (0..comparison value-1), we need
1243 to output another case to catch it.
1244 The way to find it is to look for the label_ref at the else-arm inside
1245 the expanded casesi core-insn.
1246 FIXME: Check this construct when changing to new version of gcc. */
1247 #define ASM_OUTPUT_CASE_END(STREAM, NUM, TABLE) \
1248 cris_asm_output_case_end (STREAM, NUM, TABLE)
1249
1250
1251 /* Node: Exception Region Output */
1252 /* (no definitions) */
1253 /* FIXME: Fill in with our own optimized layout. */
1254
1255 /* Node: Alignment Output */
1256
1257 #define ASM_OUTPUT_ALIGN(FILE, LOG) \
1258 fprintf (FILE, "\t.align %d\n", (LOG))
1259
1260
1261 /* Node: All Debuggers */
1262
1263 #define DBX_REGISTER_NUMBER(REGNO) \
1264 ((REGNO) == CRIS_SRP_REGNUM ? CRIS_CANONICAL_SRP_REGNUM : \
1265 (REGNO) == CRIS_MOF_REGNUM ? CRIS_CANONICAL_MOF_REGNUM : \
1266 (REGNO) == CRIS_CC0_REGNUM ? CRIS_CANONICAL_CC0_REGNUM : \
1267 (REGNO))
1268
1269 /* FIXME: Investigate DEBUGGER_AUTO_OFFSET, DEBUGGER_ARG_OFFSET. */
1270
1271
1272 /* Node: DBX Options */
1273
1274 /* Is this correct? Check later. */
1275 #define DBX_NO_XREFS
1276
1277 #define DBX_CONTIN_LENGTH 0
1278
1279 /* FIXME: Is this needed when we have 0 DBX_CONTIN_LENGTH? */
1280 #define DBX_CONTIN_CHAR '?'
1281
1282
1283 /* Node: DBX Hooks */
1284 /* (no definitions) */
1285
1286 /* Node: File names and DBX */
1287 /* (no definitions) */
1288
1289
1290 /* Node: SDB and DWARF */
1291 /* (no definitions) */
1292
1293 /* Node: Misc */
1294
1295 /* A combination of the bound (umin) insn together with a
1296 sign-extended add via the table to PC seems optimal.
1297 If the table overflows, the assembler will take care of it.
1298 Theoretically, in extreme cases (uncertain if they occur), an error
1299 will be emitted, so FIXME: Check how large case-tables are emitted,
1300 possible add an option to emit SImode case-tables. */
1301 #define CASE_VECTOR_MODE HImode
1302
1303 #define CASE_VECTOR_PC_RELATIVE 1
1304
1305 /* FIXME: Investigate CASE_VECTOR_SHORTEN_MODE to make sure HImode is not
1306 used when broken-.word could possibly fail (plus testcase). */
1307
1308 #define FIXUNS_TRUNC_LIKE_FIX_TRUNC
1309
1310 /* This is the number of bytes that can be moved in one
1311 reasonably fast instruction sequence. For CRIS, this is two
1312 instructions: mem => reg, reg => mem. */
1313 #define MOVE_MAX 4
1314
1315 /* Maybe SHIFT_COUNT_TRUNCATED is safe to define? FIXME: Check later. */
1316
1317 #define TRULY_NOOP_TRUNCATION(OUTPREC, INPREC) 1
1318
1319 #define CLZ_DEFINED_VALUE_AT_ZERO(MODE, VALUE) ((VALUE) = 32, 1)
1320 #define CTZ_DEFINED_VALUE_AT_ZERO(MODE, VALUE) ((VALUE) = 32, 1)
1321
1322 #define Pmode SImode
1323
1324 #define FUNCTION_MODE QImode
1325
1326 #define NO_IMPLICIT_EXTERN_C
1327
1328 /*
1329 * Local variables:
1330 * eval: (c-set-style "gnu")
1331 * indent-tabs-mode: t
1332 * End:
1333 */