OSDN Git Service

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