OSDN Git Service

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