]> git.ipfire.org Git - thirdparty/gcc.git/blob - gcc/config/cris/cris.h
cris.c (cris_output_addr_const_extra): Make static.
[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, 1}
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 /* We need a separate register class to handle register allocation for
492 ACR, since it can't be used for post-increment.
493
494 It's not obvious, but having subunions of all movable-between
495 register classes does really help register allocation (pre-IRA
496 comment). */
497 enum reg_class
498 {
499 NO_REGS,
500 ACR_REGS, MOF_REGS, SRP_REGS, CC0_REGS,
501 MOF_SRP_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", "SRP_REGS", "CC0_REGS", \
513 "MOF_SRP_REGS", "SPECIAL_REGS", \
514 "SPEC_ACR_REGS", "GENNONACR_REGS", "SPEC_GENNONACR_REGS", \
515 "GENERAL_REGS", "ALL_REGS"}
516
517 #define CRIS_SPECIAL_REGS_CONTENTS \
518 ((1 << CRIS_SRP_REGNUM) | (1 << CRIS_MOF_REGNUM) | (1 << CRIS_CC0_REGNUM))
519
520 /* Count in the faked argument register in GENERAL_REGS. Keep out SRP. */
521 #define REG_CLASS_CONTENTS \
522 { \
523 {0}, \
524 {1 << CRIS_ACR_REGNUM}, \
525 {1 << CRIS_MOF_REGNUM}, \
526 {1 << CRIS_SRP_REGNUM}, \
527 {1 << CRIS_CC0_REGNUM}, \
528 {(1 << CRIS_MOF_REGNUM) \
529 | (1 << CRIS_SRP_REGNUM)}, \
530 {CRIS_SPECIAL_REGS_CONTENTS}, \
531 {CRIS_SPECIAL_REGS_CONTENTS \
532 | (1 << CRIS_ACR_REGNUM)}, \
533 {(0xffff | (1 << CRIS_AP_REGNUM)) \
534 & ~(1 << CRIS_ACR_REGNUM)}, \
535 {(0xffff | (1 << CRIS_AP_REGNUM) \
536 | CRIS_SPECIAL_REGS_CONTENTS) \
537 & ~(1 << CRIS_ACR_REGNUM)}, \
538 {0xffff | (1 << CRIS_AP_REGNUM)}, \
539 {0xffff | (1 << CRIS_AP_REGNUM) \
540 | CRIS_SPECIAL_REGS_CONTENTS} \
541 }
542
543 #define REGNO_REG_CLASS(REGNO) \
544 ((REGNO) == CRIS_ACR_REGNUM ? ACR_REGS : \
545 (REGNO) == CRIS_MOF_REGNUM ? MOF_REGS : \
546 (REGNO) == CRIS_SRP_REGNUM ? SRP_REGS : \
547 (REGNO) == CRIS_CC0_REGNUM ? CC0_REGS : \
548 GENERAL_REGS)
549
550 #define BASE_REG_CLASS GENERAL_REGS
551
552 #define MODE_CODE_BASE_REG_CLASS(MODE, OCODE, ICODE) \
553 ((OCODE) != POST_INC ? BASE_REG_CLASS : GENNONACR_REGS)
554
555 #define INDEX_REG_CLASS GENERAL_REGS
556
557 #define REG_CLASS_FROM_LETTER(C) \
558 ( \
559 (C) == 'a' ? ACR_REGS : \
560 (C) == 'b' ? GENNONACR_REGS : \
561 (C) == 'h' ? MOF_REGS : \
562 (C) == 'x' ? SPECIAL_REGS : \
563 (C) == 'c' ? CC0_REGS : \
564 NO_REGS \
565 )
566
567 /* Since it uses reg_renumber, it is safe only once reg_renumber
568 has been allocated, which happens in local-alloc.c. */
569 #define REGNO_OK_FOR_BASE_P(REGNO) \
570 ((REGNO) <= CRIS_LAST_GENERAL_REGISTER \
571 || (REGNO) == ARG_POINTER_REGNUM \
572 || (unsigned) reg_renumber[REGNO] <= CRIS_LAST_GENERAL_REGISTER \
573 || (unsigned) reg_renumber[REGNO] == ARG_POINTER_REGNUM)
574
575 /* REGNO_OK_FOR_BASE_P seems to be obsolete wrt. this one, but not yet
576 documented as such. */
577 #define REGNO_MODE_CODE_OK_FOR_BASE_P(REGNO, MODE, OCODE, ICODE) \
578 (REGNO_OK_FOR_BASE_P (REGNO) \
579 && ((OCODE) != POST_INC \
580 || !((REGNO) == CRIS_ACR_REGNUM \
581 || (unsigned) reg_renumber[REGNO] == CRIS_ACR_REGNUM)))
582
583 /* See REGNO_OK_FOR_BASE_P. */
584 #define REGNO_OK_FOR_INDEX_P(REGNO) REGNO_OK_FOR_BASE_P(REGNO)
585
586 /* It seems like gcc (2.7.2 and 2.9x of 2000-03-22) may send "NO_REGS" as
587 the class for a constant (testcase: __Mul in arit.c). To avoid forcing
588 out a constant into the constant pool, we will trap this case and
589 return something a bit more sane. FIXME: Check if this is a bug.
590 Beware that we must not "override" classes that can be specified as
591 constraint letters, or else asm operands using them will fail when
592 they need to be reloaded. FIXME: Investigate whether that constitutes
593 a bug. */
594 #define PREFERRED_RELOAD_CLASS(X, CLASS) \
595 ((CLASS) != ACR_REGS \
596 && (CLASS) != MOF_REGS \
597 && (CLASS) != SRP_REGS \
598 && (CLASS) != CC0_REGS \
599 && (CLASS) != SPECIAL_REGS \
600 ? GENERAL_REGS : (CLASS))
601
602 /* We can't move special registers to and from memory in smaller than
603 word_mode. We also can't move between special registers. Luckily,
604 -1, as returned by true_regnum for non-sub/registers, is valid as a
605 parameter to our REGNO_REG_CLASS, returning GENERAL_REGS, so we get
606 the effect that any X that isn't a special-register is treated as
607 a non-empty intersection with GENERAL_REGS. */
608 #define SECONDARY_RELOAD_CLASS(CLASS, MODE, X) \
609 ((reg_class_subset_p (CLASS, SPECIAL_REGS) \
610 && ((GET_MODE_SIZE (MODE) < 4 && MEM_P (X)) \
611 || !reg_classes_intersect_p (REGNO_REG_CLASS (true_regnum (X)), \
612 GENERAL_REGS))) \
613 ? GENERAL_REGS : NO_REGS)
614
615 /* FIXME: Fix regrename.c; it should check validity of replacements,
616 not just with a silly pass-specific macro. We may miss some
617 opportunities, but we must stop regrename from creating acr++. */
618 #define HARD_REGNO_RENAME_OK(FROM, TO) ((TO) != CRIS_ACR_REGNUM)
619
620 /* For CRIS, this is always the size of MODE in words,
621 since all registers are the same size. To use omitted modes in
622 patterns with reload constraints, you must say the widest size
623 which is allowed for VOIDmode.
624 FIXME: Does that still apply for gcc-2.9x? Keep poisoned until such
625 patterns are added back. News: 2001-03-16: Happens as early as the
626 underscore-test. */
627 #define CLASS_MAX_NREGS(CLASS, MODE) \
628 ((MODE) == VOIDmode \
629 ? 1 /* + cris_fatal ("CLASS_MAX_NREGS with VOIDmode") */ \
630 : ((GET_MODE_SIZE (MODE) + UNITS_PER_WORD - 1) / UNITS_PER_WORD))
631
632 /* We are now out of letters; we could use ten more. This forces us to
633 use C-code in the 'md' file. FIXME: Use some EXTRA_CONSTRAINTS. */
634 #define CRIS_CONST_OK_FOR_LETTER_P(VALUE, C) \
635 ( \
636 /* MOVEQ, CMPQ, ANDQ, ORQ. */ \
637 (C) == 'I' ? (VALUE) >= -32 && (VALUE) <= 31 : \
638 /* ADDQ, SUBQ. */ \
639 (C) == 'J' ? (VALUE) >= 0 && (VALUE) <= 63 : \
640 /* ASRQ, BTSTQ, LSRQ, LSLQ. */ \
641 (C) == 'K' ? (VALUE) >= 0 && (VALUE) <= 31 : \
642 /* A 16-bit signed number. */ \
643 (C) == 'L' ? (VALUE) >= -32768 && (VALUE) <= 32767 : \
644 /* The constant 0 for CLEAR. */ \
645 (C) == 'M' ? (VALUE) == 0 : \
646 /* A negative ADDQ or SUBQ. */ \
647 (C) == 'N' ? (VALUE) >= -63 && (VALUE) < 0 : \
648 /* Quickened ints, QI and HI. */ \
649 (C) == 'O' ? (VALUE) >= 0 && (VALUE) <= 65535 \
650 && ((VALUE) >= (65535-31) \
651 || ((VALUE) >= (255-31) \
652 && (VALUE) <= 255 )) : \
653 /* A 16-bit number signed *or* unsigned. */ \
654 (C) == 'P' ? (VALUE) >= -32768 && (VALUE) <= 65535 : \
655 0)
656
657 #define CONST_OK_FOR_CONSTRAINT_P(VALUE, C, S) \
658 ( \
659 ((C) != 'K' || (S)[1] == 'c') \
660 ? CRIS_CONST_OK_FOR_LETTER_P (VALUE, C) : \
661 ((C) == 'K' && (S)[1] == 'p') \
662 ? exact_log2 (VALUE) >= 0 : \
663 0)
664
665 #define CONSTRAINT_LEN(C, S) ((C) == 'K' ? 2 : DEFAULT_CONSTRAINT_LEN (C, S))
666
667 /* It is really simple to make up a 0.0; it is the same as int-0 in
668 IEEE754. */
669 #define CONST_DOUBLE_OK_FOR_LETTER_P(VALUE, C) \
670 ((C) == 'G' && ((VALUE) == CONST0_RTX (DFmode) \
671 || (VALUE) == CONST0_RTX (SFmode)))
672
673 /* We need this on cris to distinguish delay-slottable addressing modes. */
674 #define EXTRA_CONSTRAINT(X, C) \
675 ( \
676 /* Slottable address mode? */ \
677 (C) == 'Q' ? EXTRA_CONSTRAINT_Q (X) : \
678 /* Operand to BDAP or BIAP? */ \
679 (C) == 'R' ? EXTRA_CONSTRAINT_R (X) : \
680 /* A local PIC symbol? */ \
681 (C) == 'S' ? EXTRA_CONSTRAINT_S (X) : \
682 /* A three-address addressing-mode? */ \
683 (C) == 'T' ? EXTRA_CONSTRAINT_T (X) : \
684 /* A PLT symbol? */ \
685 (C) == 'U' ? EXTRA_CONSTRAINT_U (X) : \
686 0)
687
688 #define EXTRA_MEMORY_CONSTRAINT(X, STR) ((X) == 'Q')
689
690 #define EXTRA_CONSTRAINT_Q(X) \
691 ( \
692 /* Just an indirect register (happens to also be \
693 "all" slottable memory addressing modes not \
694 covered by other constraints, i.e. '>'). */ \
695 MEM_P (X) && BASE_P (XEXP (X, 0)) \
696 )
697
698 #define EXTRA_CONSTRAINT_R(X) \
699 ( \
700 /* An operand to BDAP or BIAP: \
701 A BIAP; r.S? */ \
702 BIAP_INDEX_P (X) \
703 /* A [reg] or (int) [reg], maybe with post-increment. */ \
704 || BDAP_INDEX_P (X) \
705 || CONSTANT_INDEX_P (X) \
706 )
707
708 #define EXTRA_CONSTRAINT_T(X) \
709 ( \
710 /* Memory three-address operand. All are indirect-memory: */ \
711 MEM_P (X) \
712 && ((MEM_P (XEXP (X, 0)) \
713 /* Double indirect: [[reg]] or [[reg+]]? */ \
714 && (BASE_OR_AUTOINCR_P (XEXP (XEXP (X, 0), 0)))) \
715 /* Just an explicit indirect reference: [const]? */ \
716 || CONSTANT_P (XEXP (X, 0)) \
717 /* Something that is indexed; [...+...]? */ \
718 || (GET_CODE (XEXP (X, 0)) == PLUS \
719 /* A BDAP constant: [reg+(8|16|32)bit offset]? */ \
720 && ((BASE_P (XEXP (XEXP (X, 0), 0)) \
721 && CONSTANT_INDEX_P (XEXP (XEXP (X, 0), 1))) \
722 /* A BDAP register: [reg+[reg(+)].S]? */ \
723 || (BASE_P (XEXP (XEXP (X, 0), 0)) \
724 && BDAP_INDEX_P(XEXP(XEXP(X, 0), 1))) \
725 /* Same, but with swapped arguments (no canonical \
726 ordering between e.g. REG and MEM as of LAST_UPDATED \
727 "Thu May 12 03:59:11 UTC 2005"). */ \
728 || (BASE_P (XEXP (XEXP (X, 0), 1)) \
729 && BDAP_INDEX_P (XEXP (XEXP (X, 0), 0))) \
730 /* A BIAP: [reg+reg.S] (MULT comes first). */ \
731 || (BASE_P (XEXP (XEXP (X, 0), 1)) \
732 && BIAP_INDEX_P (XEXP (XEXP (X, 0), 0)))))) \
733 )
734
735 /* PIC-constructs for symbols. */
736 #define EXTRA_CONSTRAINT_S(X) \
737 (flag_pic && GET_CODE (X) == CONST && cris_valid_pic_const (X, false))
738
739 #define EXTRA_CONSTRAINT_U(X) \
740 (flag_pic \
741 && CONSTANT_P (X) \
742 && cris_nonmemory_operand_or_callable_symbol (X, VOIDmode))
743
744
745 /* Node: Frame Layout */
746
747 #define STACK_GROWS_DOWNWARD
748 #define FRAME_GROWS_DOWNWARD 1
749
750 /* It seems to be indicated in the code (at least 2.1) that this is
751 better a constant, and best 0. */
752 #define STARTING_FRAME_OFFSET 0
753
754 #define FIRST_PARM_OFFSET(FNDECL) 0
755
756 #define RETURN_ADDR_RTX(COUNT, FRAMEADDR) \
757 cris_return_addr_rtx (COUNT, FRAMEADDR)
758
759 #define INCOMING_RETURN_ADDR_RTX gen_rtx_REG (Pmode, CRIS_SRP_REGNUM)
760
761 /* FIXME: Any __builtin_eh_return callers must not return anything and
762 there must not be collisions with incoming parameters. Luckily the
763 number of __builtin_eh_return callers is limited. For now return
764 parameter registers in reverse order and hope for the best. */
765 #define EH_RETURN_DATA_REGNO(N) \
766 (IN_RANGE ((N), 0, 3) ? (CRIS_FIRST_ARG_REG + 3 - (N)) : INVALID_REGNUM)
767
768 /* Store the stack adjustment in the structure-return-address register. */
769 #define CRIS_STACKADJ_REG CRIS_STRUCT_VALUE_REGNUM
770 #define EH_RETURN_STACKADJ_RTX gen_rtx_REG (SImode, CRIS_STACKADJ_REG)
771
772 #define EH_RETURN_HANDLER_RTX \
773 cris_return_addr_rtx (0, NULL)
774
775 #define INIT_EXPANDERS cris_init_expanders ()
776
777 /* FIXME: Move this to right node (it's not documented properly yet). */
778 #define DWARF_FRAME_RETURN_COLUMN DWARF_FRAME_REGNUM (CRIS_SRP_REGNUM)
779
780 /* FIXME: Move this to right node (it's not documented properly yet).
781 FIXME: Check what alignment we can assume regarding
782 TARGET_STACK_ALIGN and TARGET_ALIGN_BY_32. */
783 #define DWARF_CIE_DATA_ALIGNMENT -1
784
785 /* If we would ever need an exact mapping between canonical register
786 number and dwarf frame register, we would either need to include all
787 registers in the gcc description (with some marked fixed of course), or
788 an inverse mapping from dwarf register to gcc register. There is one
789 need in dwarf2out.c:expand_builtin_init_dwarf_reg_sizes. Right now, I
790 don't see that we need exact correspondence between DWARF *frame*
791 registers and DBX_REGISTER_NUMBER, so map them onto GCC registers. */
792 #define DWARF_FRAME_REGNUM(REG) (REG)
793
794 /* Node: Stack Checking */
795 /* (no definitions) FIXME: Check. */
796
797 /* Node: Frame Registers */
798
799 #define STACK_POINTER_REGNUM CRIS_SP_REGNUM
800
801 /* Register used for frame pointer. This is also the last of the saved
802 registers, when a frame pointer is not used. */
803 #define FRAME_POINTER_REGNUM CRIS_FP_REGNUM
804
805 /* Faked register, is always eliminated. We need it to eliminate
806 allocating stack slots for the return address and the frame pointer. */
807 #define ARG_POINTER_REGNUM CRIS_AP_REGNUM
808
809 #define STATIC_CHAIN_REGNUM CRIS_STATIC_CHAIN_REGNUM
810
811
812 /* Node: Elimination */
813
814 #define ELIMINABLE_REGS \
815 {{ARG_POINTER_REGNUM, STACK_POINTER_REGNUM}, \
816 {ARG_POINTER_REGNUM, FRAME_POINTER_REGNUM}, \
817 {FRAME_POINTER_REGNUM, STACK_POINTER_REGNUM}}
818
819 #define INITIAL_ELIMINATION_OFFSET(FROM, TO, OFFSET) \
820 (OFFSET) = cris_initial_elimination_offset (FROM, TO)
821
822
823 /* Node: Stack Arguments */
824
825 /* Since many parameters take up one register each in any case,
826 defining TARGET_PROMOTE_PROTOTYPES that always returns true would
827 seem like a good idea, but measurements indicate that a combination
828 using PROMOTE_MODE is better. */
829
830 #define ACCUMULATE_OUTGOING_ARGS 1
831
832
833 /* Node: Register Arguments */
834
835 /* Contrary to what you'd believe, defining FUNCTION_ARG_CALLEE_COPIES
836 seems like a (small total) loss, at least for gcc-2.7.2 compiling and
837 running gcc-2.1 (small win in size, small loss running -- 100.1%),
838 and similarly for size for products (.1 .. .3% bloat, sometimes win).
839 Due to the empirical likeliness of making slower code, it is not
840 defined. */
841
842 /* This no longer *needs* to be a structure; but keeping it as such should
843 not hurt (and hacking the ABI is simpler). */
844 #define CUMULATIVE_ARGS struct cum_args
845 struct cum_args {int regs;};
846
847 /* The regs member is an integer, the number of arguments got into
848 registers so far. */
849 #define INIT_CUMULATIVE_ARGS(CUM, FNTYPE, LIBNAME, FNDECL, N_NAMED_ARGS) \
850 ((CUM).regs = 0)
851
852 #define FUNCTION_ARG_REGNO_P(REGNO) \
853 ((REGNO) >= CRIS_FIRST_ARG_REG \
854 && (REGNO) < CRIS_FIRST_ARG_REG + (CRIS_MAX_ARGS_IN_REGS))
855
856
857 /* Node: Scalar Return */
858
859 #define FUNCTION_VALUE_REGNO_P(N) cris_function_value_regno_p (N)
860
861
862
863 /* Node: Aggregate Return */
864
865 #define CRIS_STRUCT_VALUE_REGNUM ((CRIS_FIRST_ARG_REG) - 1)
866
867
868 /* Node: Caller Saves */
869 /* (no definitions) */
870
871 /* Node: Function entry */
872
873 /* See cris.c for TARGET_ASM_FUNCTION_PROLOGUE and
874 TARGET_ASM_FUNCTION_EPILOGUE. */
875
876 /* Node: Profiling */
877
878 #define FUNCTION_PROFILER(FILE, LABELNO) \
879 error ("no FUNCTION_PROFILER for CRIS")
880
881 /* FIXME: Some of the undefined macros might be mandatory. If so, fix
882 documentation. */
883
884
885 /* Node: Trampolines */
886
887 #define TRAMPOLINE_SIZE (TARGET_V32 ? 58 : 32)
888
889 /* CRIS wants instructions on word-boundary. */
890 #define TRAMPOLINE_ALIGNMENT 16
891
892 /* Node: Library Calls */
893
894 /* If you change this, you have to check whatever libraries and systems
895 that use it. */
896 #define TARGET_EDOM 33
897
898
899 /* Node: Addressing Modes */
900
901 #define HAVE_POST_INCREMENT 1
902
903 /* Must be a compile-time constant, so we go with the highest value
904 among all CRIS variants. */
905 #define MAX_REGS_PER_ADDRESS 2
906
907 /* There are helper macros defined here which are used only in
908 GO_IF_LEGITIMATE_ADDRESS.
909
910 Note that you *have to* reject invalid addressing modes for mode
911 MODE, even if it is legal for normal addressing modes. You cannot
912 rely on the constraints to do this work. They can only be used to
913 doublecheck your intentions. One example is that you HAVE TO reject
914 (mem:DI (plus:SI (reg:SI x) (reg:SI y))) because for some reason
915 this cannot be reloaded. (Which of course you can argue that gcc
916 should have done.) FIXME: Strange. Check. */
917
918 /* No symbol can be used as an index (or more correct, as a base) together
919 with a register with PIC; the PIC register must be there. */
920 #define CONSTANT_INDEX_P(X) \
921 (CONSTANT_P (X) && (!flag_pic || cris_valid_pic_const (X, true)))
922
923 /* True if X is a valid base register. */
924 #define BASE_P(X) \
925 (REG_P (X) && REG_OK_FOR_BASE_P (X))
926
927 /* True if X is a valid base register with or without autoincrement. */
928 #define BASE_OR_AUTOINCR_P(X) \
929 (BASE_P (X) \
930 || (GET_CODE (X) == POST_INC \
931 && BASE_P (XEXP (X, 0)) \
932 && REGNO (XEXP (X, 0)) != CRIS_ACR_REGNUM))
933
934 /* True if X is a valid (register) index for BDAP, i.e. [Rs].S or [Rs+].S. */
935 #define BDAP_INDEX_P(X) \
936 ((MEM_P (X) && GET_MODE (X) == SImode \
937 && BASE_OR_AUTOINCR_P (XEXP (X, 0))) \
938 || (GET_CODE (X) == SIGN_EXTEND \
939 && MEM_P (XEXP (X, 0)) \
940 && (GET_MODE (XEXP (X, 0)) == HImode \
941 || GET_MODE (XEXP (X, 0)) == QImode) \
942 && BASE_OR_AUTOINCR_P (XEXP (XEXP (X, 0), 0))))
943
944 /* True if X is a valid (register) index for BIAP, i.e. Rd.m. */
945 #define BIAP_INDEX_P(X) \
946 ((BASE_P (X) && REG_OK_FOR_INDEX_P (X)) \
947 || (GET_CODE (X) == MULT \
948 && BASE_P (XEXP (X, 0)) \
949 && REG_OK_FOR_INDEX_P (XEXP (X, 0)) \
950 && CONST_INT_P (XEXP (X, 1)) \
951 && (INTVAL (XEXP (X, 1)) == 2 \
952 || INTVAL (XEXP (X, 1)) == 4)))
953
954 /* A PIC operand looks like a normal symbol here. At output we dress it
955 in "[rPIC+symbol:GOT]" (global symbol) or "rPIC+symbol:GOTOFF" (local
956 symbol) so we exclude all addressing modes where we can't replace a
957 plain "symbol" with that. A global PIC symbol does not fit anywhere
958 here (but is thankfully a general_operand in itself). A local PIC
959 symbol is valid for the plain "symbol + offset" case. */
960 #define GO_IF_LEGITIMATE_ADDRESS(MODE, X, ADDR) \
961 { \
962 rtx x1, x2; \
963 if (BASE_OR_AUTOINCR_P (X)) \
964 goto ADDR; \
965 else if (TARGET_V32) \
966 /* Nothing else is valid then. */ \
967 ; \
968 else if (CONSTANT_INDEX_P (X)) \
969 goto ADDR; \
970 /* Indexed? */ \
971 else if (GET_CODE (X) == PLUS) \
972 { \
973 x1 = XEXP (X, 0); \
974 x2 = XEXP (X, 1); \
975 /* BDAP o, Rd. */ \
976 if ((BASE_P (x1) && CONSTANT_INDEX_P (x2)) \
977 || (BASE_P (x2) && CONSTANT_INDEX_P (x1)) \
978 /* BDAP Rs[+], Rd. */ \
979 || (GET_MODE_SIZE (MODE) <= UNITS_PER_WORD \
980 && ((BASE_P (x1) && BDAP_INDEX_P (x2)) \
981 || (BASE_P (x2) && BDAP_INDEX_P (x1)) \
982 /* BIAP.m Rs, Rd */ \
983 || (BASE_P (x1) && BIAP_INDEX_P (x2)) \
984 || (BASE_P (x2) && BIAP_INDEX_P (x1))))) \
985 goto ADDR; \
986 } \
987 else if (MEM_P (X)) \
988 { \
989 /* DIP (Rs). Reject [[reg+]] and [[reg]] for \
990 DImode (long long). */ \
991 if (GET_MODE_SIZE (MODE) <= UNITS_PER_WORD \
992 && (BASE_P (XEXP (X, 0)) \
993 || BASE_OR_AUTOINCR_P (XEXP (X, 0)))) \
994 goto ADDR; \
995 } \
996 }
997
998 #ifndef REG_OK_STRICT
999 /* Nonzero if X is a hard reg that can be used as a base reg
1000 or if it is a pseudo reg. */
1001 # define REG_OK_FOR_BASE_P(X) \
1002 (REGNO (X) <= CRIS_LAST_GENERAL_REGISTER \
1003 || REGNO (X) == ARG_POINTER_REGNUM \
1004 || REGNO (X) >= FIRST_PSEUDO_REGISTER)
1005 #else
1006 /* Nonzero if X is a hard reg that can be used as a base reg. */
1007 # define REG_OK_FOR_BASE_P(X) REGNO_OK_FOR_BASE_P (REGNO (X))
1008 #endif
1009
1010 #ifndef REG_OK_STRICT
1011 /* Nonzero if X is a hard reg that can be used as an index
1012 or if it is a pseudo reg. */
1013 # define REG_OK_FOR_INDEX_P(X) REG_OK_FOR_BASE_P (X)
1014 #else
1015 /* Nonzero if X is a hard reg that can be used as an index. */
1016 # define REG_OK_FOR_INDEX_P(X) REGNO_OK_FOR_INDEX_P (REGNO (X))
1017 #endif
1018
1019 /* Fix reloads known to cause suboptimal spilling. */
1020 #define LEGITIMIZE_RELOAD_ADDRESS(X, MODE, OPNUM, TYPE, INDL, WIN) \
1021 do \
1022 { \
1023 if (cris_reload_address_legitimized (X, MODE, OPNUM, TYPE, INDL)) \
1024 goto WIN; \
1025 } \
1026 while (0)
1027
1028
1029 /* Node: Condition Code */
1030
1031 #define NOTICE_UPDATE_CC(EXP, INSN) cris_notice_update_cc (EXP, INSN)
1032
1033 /* FIXME: Maybe define CANONICALIZE_COMPARISON later, when playing with
1034 optimizations. It is needed; currently we do this with instruction
1035 patterns and NOTICE_UPDATE_CC. */
1036
1037
1038 /* Node: Costs */
1039
1040 /* Regardless of the presence of delay slots, the default value of 1 for
1041 BRANCH_COST is the best in the range (1, 2, 3), tested with gcc-2.7.2
1042 with testcases ipps and gcc, giving smallest and fastest code. */
1043
1044 #define SLOW_BYTE_ACCESS 0
1045
1046 /* This is the threshold *below* which inline move sequences of
1047 word-length sizes will be emitted. The "9" will translate to
1048 (9 - 1) * 4 = 32 bytes maximum moved, but using 16 instructions
1049 (8 instruction sequences) or less. */
1050 #define MOVE_RATIO(speed) 9
1051
1052
1053 /* Node: Sections */
1054
1055 #define TEXT_SECTION_ASM_OP "\t.text"
1056
1057 #define DATA_SECTION_ASM_OP "\t.data"
1058
1059 #define FORCE_EH_FRAME_INFO_IN_DATA_SECTION (! TARGET_ELF)
1060
1061 /* The jump table is immediately connected to the preceding insn. */
1062 #define JUMP_TABLES_IN_TEXT_SECTION 1
1063
1064
1065 /* Node: PIC */
1066
1067 /* Helper type. */
1068
1069 enum cris_pic_symbol_type
1070 {
1071 cris_no_symbol = 0,
1072 cris_got_symbol = 1,
1073 cris_rel_symbol = 2,
1074 cris_got_symbol_needing_fixup = 3,
1075 cris_invalid_pic_symbol = 4
1076 };
1077
1078 #define PIC_OFFSET_TABLE_REGNUM (flag_pic ? CRIS_GOT_REGNUM : INVALID_REGNUM)
1079
1080 #define LEGITIMATE_PIC_OPERAND_P(X) cris_legitimate_pic_operand (X)
1081
1082
1083 /* Node: File Framework */
1084
1085 /* We don't want an .ident for gcc. To avoid that but still support
1086 #ident, we override ASM_OUTPUT_IDENT and, since the gcc .ident is its
1087 only use besides ASM_OUTPUT_IDENT, undef IDENT_ASM_OP from elfos.h. */
1088 #undef IDENT_ASM_OP
1089 #undef ASM_OUTPUT_IDENT
1090 #define ASM_OUTPUT_IDENT(FILE, NAME) \
1091 fprintf (FILE, "%s\"%s\"\n", "\t.ident\t", NAME);
1092
1093 #define ASM_APP_ON "#APP\n"
1094
1095 #define ASM_APP_OFF "#NO_APP\n"
1096
1097
1098 /* Node: Data Output */
1099
1100 #define IS_ASM_LOGICAL_LINE_SEPARATOR(C, STR) (C) == '@'
1101
1102 /* Node: Uninitialized Data */
1103
1104 /* Remember to round off odd values if we want data alignment,
1105 since we cannot do that with an .align directive.
1106
1107 Using .comm causes the space not to be reserved in .bss, but by
1108 tricks with the symbol type. Not good if other tools than binutils
1109 are used on the object files. Since ".global ... .lcomm ..." works, we
1110 use that. Use .._ALIGNED_COMMON, since gcc whines when we only have
1111 ..._COMMON, and we prefer to whine ourselves; BIGGEST_ALIGNMENT is not
1112 the one to check. This done for a.out only. */
1113 /* FIXME: I suspect a bug in gcc with alignment. Do not warn until
1114 investigated; it mucks up the testsuite results. */
1115 #define CRIS_ASM_OUTPUT_ALIGNED_DECL_COMMON(FILE, DECL, NAME, SIZE, ALIGN, LOCAL) \
1116 do \
1117 { \
1118 int align_ = (ALIGN) / BITS_PER_UNIT; \
1119 if (TARGET_DATA_ALIGN && TARGET_ALIGN_BY_32 && align_ < 4) \
1120 align_ = 4; \
1121 else if (TARGET_DATA_ALIGN && align_ < 2) \
1122 align_ = 2; \
1123 /* FIXME: Do we need this? */ \
1124 else if (align_ < 1) \
1125 align_ = 1; \
1126 \
1127 if (TARGET_ELF) \
1128 { \
1129 if (LOCAL) \
1130 { \
1131 fprintf ((FILE), "%s", LOCAL_ASM_OP); \
1132 assemble_name ((FILE), (NAME)); \
1133 fprintf ((FILE), "\n"); \
1134 } \
1135 fprintf ((FILE), "%s", COMMON_ASM_OP); \
1136 assemble_name ((FILE), (NAME)); \
1137 fprintf ((FILE), ",%u,%u\n", (int)(SIZE), align_); \
1138 } \
1139 else \
1140 { \
1141 /* We can't tell a one-only or weak COMM from a "global \
1142 COMM" so just make all non-locals weak. */ \
1143 if (! (LOCAL)) \
1144 ASM_WEAKEN_LABEL (FILE, NAME); \
1145 fputs ("\t.lcomm ", (FILE)); \
1146 assemble_name ((FILE), (NAME)); \
1147 fprintf ((FILE), ",%u\n", \
1148 ((int)(SIZE) + (align_ - 1)) & ~(align_ - 1)); \
1149 } \
1150 } \
1151 while (0)
1152
1153 #define ASM_OUTPUT_ALIGNED_DECL_COMMON(FILE, DECL, NAME, SIZE, ALIGN) \
1154 CRIS_ASM_OUTPUT_ALIGNED_DECL_COMMON(FILE, DECL, NAME, SIZE, ALIGN, 0)
1155
1156 #undef ASM_OUTPUT_ALIGNED_DECL_LOCAL
1157 #define ASM_OUTPUT_ALIGNED_DECL_LOCAL(FILE, DECL, NAME, SIZE, ALIGN) \
1158 CRIS_ASM_OUTPUT_ALIGNED_DECL_COMMON(FILE, DECL, NAME, SIZE, ALIGN, 1)
1159
1160 /* Node: Label Output */
1161
1162 /* Globalizing directive for a label. */
1163 #define GLOBAL_ASM_OP "\t.global "
1164
1165 #define SUPPORTS_WEAK 1
1166
1167 #define ASM_OUTPUT_SYMBOL_REF(STREAM, SYM) \
1168 cris_asm_output_symbol_ref (STREAM, SYM)
1169
1170 #define ASM_OUTPUT_LABEL_REF(STREAM, BUF) \
1171 cris_asm_output_label_ref (STREAM, BUF)
1172
1173 /* Remove any previous definition (elfos.h). */
1174 #undef ASM_GENERATE_INTERNAL_LABEL
1175 #define ASM_GENERATE_INTERNAL_LABEL(LABEL, PREFIX, NUM) \
1176 sprintf (LABEL, "*%s%s%ld", LOCAL_LABEL_PREFIX, PREFIX, (long) NUM)
1177
1178 /* Node: Initialization */
1179 /* (no definitions) */
1180
1181 /* Node: Macros for Initialization */
1182 /* (no definitions) */
1183
1184 /* Node: Instruction Output */
1185
1186 #define REGISTER_NAMES \
1187 {"r0", "r1", "r2", "r3", "r4", "r5", "r6", "r7", "r8", \
1188 "r9", "r10", "r11", "r12", "r13", "sp", "acr", "srp", "mof", "faked_ap", "dccr"}
1189
1190 #define ADDITIONAL_REGISTER_NAMES \
1191 {{"r14", 14}, {"r15", 15}, {"pc", 15}}
1192
1193 /* Output an empty line to illustrate the presence of the delay slot. */
1194 #define DBR_OUTPUT_SEQEND(FILE) \
1195 fprintf (FILE, "\n")
1196
1197 #define LOCAL_LABEL_PREFIX (TARGET_ELF ? "." : "")
1198
1199 /* cppinit.c initializes a const array from this, so it must be constant,
1200 can't have it different based on options. Luckily, the prefix is
1201 always allowed, so let's have it on all GCC-generated code. Note that
1202 we have this verbatim everywhere in the back-end, not using %R or %s or
1203 such. */
1204 #define REGISTER_PREFIX "$"
1205
1206 /* Remove any previous definition (elfos.h). */
1207 /* We use -fno-leading-underscore to remove it, when necessary. */
1208 #undef USER_LABEL_PREFIX
1209 #define USER_LABEL_PREFIX "_"
1210
1211 #define ASM_OUTPUT_REG_PUSH(FILE, REGNO) \
1212 fprintf (FILE, \
1213 TARGET_V32 \
1214 ? "\tsubq 4,$sp\n\tmove $%s,[$sp]\n" : "\tpush $%s\n", \
1215 reg_names[REGNO])
1216
1217 #define ASM_OUTPUT_REG_POP(FILE, REGNO) \
1218 fprintf (FILE, "\tmove [$sp+],$%s\n", reg_names[REGNO])
1219
1220
1221 /* Node: Dispatch Tables */
1222
1223 #define ASM_OUTPUT_ADDR_DIFF_ELT(FILE, BODY, VALUE, REL) \
1224 do \
1225 { \
1226 if (TARGET_V32) \
1227 asm_fprintf (FILE, "\t.word %LL%d-.\n", VALUE); \
1228 else \
1229 asm_fprintf (FILE, "\t.word %LL%d-%LL%d\n", VALUE, REL); \
1230 } \
1231 while (0)
1232
1233 #define ASM_OUTPUT_ADDR_VEC_ELT(FILE, VALUE) \
1234 asm_fprintf (FILE, "\t.dword %LL%d\n", VALUE)
1235
1236 /* Defined to also emit an .align in elfos.h. We don't want that. */
1237 #undef ASM_OUTPUT_CASE_LABEL
1238
1239 /* Since the "bound" insn loads the comparison value if the compared<
1240 value (register) is out of bounds (0..comparison value-1), we need
1241 to output another case to catch it.
1242 The way to find it is to look for the label_ref at the else-arm inside
1243 the expanded casesi core-insn.
1244 FIXME: Check this construct when changing to new version of gcc. */
1245 #define ASM_OUTPUT_CASE_END(STREAM, NUM, TABLE) \
1246 cris_asm_output_case_end (STREAM, NUM, TABLE)
1247
1248
1249 /* Node: Exception Region Output */
1250 /* (no definitions) */
1251 /* FIXME: Fill in with our own optimized layout. */
1252
1253 /* Node: Alignment Output */
1254
1255 #define ASM_OUTPUT_ALIGN(FILE, LOG) \
1256 fprintf (FILE, "\t.align %d\n", (LOG))
1257
1258
1259 /* Node: All Debuggers */
1260
1261 #define DBX_REGISTER_NUMBER(REGNO) \
1262 ((REGNO) == CRIS_SRP_REGNUM ? CRIS_CANONICAL_SRP_REGNUM : \
1263 (REGNO) == CRIS_MOF_REGNUM ? CRIS_CANONICAL_MOF_REGNUM : \
1264 (REGNO) == CRIS_CC0_REGNUM ? CRIS_CANONICAL_CC0_REGNUM : \
1265 (REGNO))
1266
1267 /* FIXME: Investigate DEBUGGER_AUTO_OFFSET, DEBUGGER_ARG_OFFSET. */
1268
1269
1270 /* Node: DBX Options */
1271
1272 /* Is this correct? Check later. */
1273 #define DBX_NO_XREFS
1274
1275 #define DBX_CONTIN_LENGTH 0
1276
1277 /* FIXME: Is this needed when we have 0 DBX_CONTIN_LENGTH? */
1278 #define DBX_CONTIN_CHAR '?'
1279
1280
1281 /* Node: DBX Hooks */
1282 /* (no definitions) */
1283
1284 /* Node: File names and DBX */
1285 /* (no definitions) */
1286
1287
1288 /* Node: SDB and DWARF */
1289 /* (no definitions) */
1290
1291 /* Node: Misc */
1292
1293 /* A combination of the bound (umin) insn together with a
1294 sign-extended add via the table to PC seems optimal.
1295 If the table overflows, the assembler will take care of it.
1296 Theoretically, in extreme cases (uncertain if they occur), an error
1297 will be emitted, so FIXME: Check how large case-tables are emitted,
1298 possible add an option to emit SImode case-tables. */
1299 #define CASE_VECTOR_MODE HImode
1300
1301 #define CASE_VECTOR_PC_RELATIVE 1
1302
1303 /* FIXME: Investigate CASE_VECTOR_SHORTEN_MODE to make sure HImode is not
1304 used when broken-.word could possibly fail (plus testcase). */
1305
1306 #define FIXUNS_TRUNC_LIKE_FIX_TRUNC
1307
1308 /* This is the number of bytes that can be moved in one
1309 reasonably fast instruction sequence. For CRIS, this is two
1310 instructions: mem => reg, reg => mem. */
1311 #define MOVE_MAX 4
1312
1313 /* Maybe SHIFT_COUNT_TRUNCATED is safe to define? FIXME: Check later. */
1314
1315 #define TRULY_NOOP_TRUNCATION(OUTPREC, INPREC) 1
1316
1317 #define CLZ_DEFINED_VALUE_AT_ZERO(MODE, VALUE) ((VALUE) = 32, 1)
1318 #define CTZ_DEFINED_VALUE_AT_ZERO(MODE, VALUE) ((VALUE) = 32, 1)
1319
1320 #define Pmode SImode
1321
1322 #define FUNCTION_MODE QImode
1323
1324 #define NO_IMPLICIT_EXTERN_C
1325
1326 /*
1327 * Local variables:
1328 * eval: (c-set-style "gnu")
1329 * indent-tabs-mode: t
1330 * End:
1331 */