OSDN Git Service

f2f7e891201063a3d55affc652d2a48f73454069
[pf3gnuchains/gcc-fork.git] / gcc / config / m32r / m32r.h
1 /* Definitions of target machine for GNU compiler, Renesas M32R cpu.
2    Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004,
3    2005, 2006, 2007, 2008  Free Software Foundation, Inc.
4
5    This file is part of GCC.
6
7    GCC is free software; you can redistribute it and/or modify it
8    under the terms of the GNU General Public License as published
9    by the Free Software Foundation; either version 3, or (at your
10    option) any later version.
11
12    GCC is distributed in the hope that it will be useful, but WITHOUT
13    ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
14    or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
15    License for more details.
16
17    You should have received a copy of the GNU General Public License
18    along with GCC; see the file COPYING3.  If not see
19    <http://www.gnu.org/licenses/>.  */
20
21 /* Things to do:
22 - longlong.h?
23 */
24
25 #undef SWITCH_TAKES_ARG
26 #undef WORD_SWITCH_TAKES_ARG
27 #undef HANDLE_SYSV_PRAGMA
28 #undef SIZE_TYPE
29 #undef PTRDIFF_TYPE
30 #undef WCHAR_TYPE
31 #undef WCHAR_TYPE_SIZE
32 #undef TARGET_VERSION
33 #undef CPP_SPEC
34 #undef ASM_SPEC
35 #undef LINK_SPEC
36 #undef STARTFILE_SPEC
37 #undef ENDFILE_SPEC
38
39 #undef ASM_APP_ON
40 #undef ASM_APP_OFF
41 \f
42
43 /* M32R/X overrides.  */
44 /* Print subsidiary information on the compiler version in use.  */
45 #define TARGET_VERSION fprintf (stderr, " (m32r/x/2)");
46
47 /* Additional flags for the preprocessor.  */
48 #define CPP_CPU_SPEC "%{m32rx:-D__M32RX__ -D__m32rx__ -U__M32R2__ -U__m32r2__} \
49 %{m32r2:-D__M32R2__ -D__m32r2__ -U__M32RX__ -U__m32rx__} \
50 %{m32r:-U__M32RX__  -U__m32rx__ -U__M32R2__ -U__m32r2__} \
51  "
52
53 /* Assembler switches.  */
54 #define ASM_CPU_SPEC \
55 "%{m32r} %{m32rx} %{m32r2} %{!O0: %{O*: -O}} --no-warn-explicit-parallel-conflicts"
56
57 /* Use m32rx specific crt0/crtinit/crtfini files.  */
58 #define STARTFILE_CPU_SPEC "%{!shared:crt0.o%s} %{m32rx:m32rx/crtinit.o%s} %{!m32rx:crtinit.o%s}"
59 #define ENDFILE_CPU_SPEC "-lgloss %{m32rx:m32rx/crtfini.o%s} %{!m32rx:crtfini.o%s}"
60
61 /* Define this macro as a C expression for the initializer of an array of
62    strings to tell the driver program which options are defaults for this
63    target and thus do not need to be handled specially when using
64    `MULTILIB_OPTIONS'.  */
65 #define SUBTARGET_MULTILIB_DEFAULTS , "m32r"
66
67 /* Number of additional registers the subtarget defines.  */
68 #define SUBTARGET_NUM_REGISTERS 1
69
70 /* 1 for registers that cannot be allocated.  */
71 #define SUBTARGET_FIXED_REGISTERS , 1
72
73 /* 1 for registers that are not available across function calls.  */
74 #define SUBTARGET_CALL_USED_REGISTERS , 1
75
76 /* Order to allocate model specific registers.  */
77 #define SUBTARGET_REG_ALLOC_ORDER , 19
78
79 /* Registers which are accumulators.  */
80 #define SUBTARGET_REG_CLASS_ACCUM 0x80000
81
82 /* All registers added.  */
83 #define SUBTARGET_REG_CLASS_ALL SUBTARGET_REG_CLASS_ACCUM
84
85 /* Additional accumulator registers.  */
86 #define SUBTARGET_ACCUM_P(REGNO) ((REGNO) == 19)
87
88 /* Define additional register names.  */
89 #define SUBTARGET_REGISTER_NAMES , "a1"
90 /* end M32R/X overrides.  */
91
92 /* Print subsidiary information on the compiler version in use.  */
93 #ifndef TARGET_VERSION
94 #define TARGET_VERSION fprintf (stderr, " (m32r)")
95 #endif
96
97 /* Switch  Recognition by gcc.c.  Add -G xx support.  */
98
99 #undef  SWITCH_TAKES_ARG
100 #define SWITCH_TAKES_ARG(CHAR) \
101 (DEFAULT_SWITCH_TAKES_ARG (CHAR) || (CHAR) == 'G')
102
103 /* Names to predefine in the preprocessor for this target machine.  */
104 /* __M32R__ is defined by the existing compiler so we use that.  */
105 #define TARGET_CPU_CPP_BUILTINS()               \
106   do                                            \
107     {                                           \
108       builtin_define ("__M32R__");              \
109       builtin_define ("__m32r__");              \
110       builtin_assert ("cpu=m32r");              \
111       builtin_assert ("machine=m32r");          \
112       builtin_define (TARGET_BIG_ENDIAN         \
113                       ? "__BIG_ENDIAN__" : "__LITTLE_ENDIAN__"); \
114     }                                           \
115   while (0)
116
117 /* This macro defines names of additional specifications to put in the specs
118    that can be used in various specifications like CC1_SPEC.  Its definition
119    is an initializer with a subgrouping for each command option.
120
121    Each subgrouping contains a string constant, that defines the
122    specification name, and a string constant that used by the GCC driver
123    program.
124
125    Do not define this macro if it does not need to do anything.  */
126
127 #ifndef SUBTARGET_EXTRA_SPECS
128 #define SUBTARGET_EXTRA_SPECS
129 #endif
130
131 #ifndef ASM_CPU_SPEC
132 #define ASM_CPU_SPEC ""
133 #endif
134
135 #ifndef CPP_CPU_SPEC
136 #define CPP_CPU_SPEC ""
137 #endif
138
139 #ifndef CC1_CPU_SPEC
140 #define CC1_CPU_SPEC ""
141 #endif
142
143 #ifndef LINK_CPU_SPEC
144 #define LINK_CPU_SPEC ""
145 #endif
146
147 #ifndef STARTFILE_CPU_SPEC
148 #define STARTFILE_CPU_SPEC "%{!shared:crt0.o%s} crtinit.o%s"
149 #endif
150
151 #ifndef ENDFILE_CPU_SPEC
152 #define ENDFILE_CPU_SPEC "-lgloss crtfini.o%s"
153 #endif
154
155 #ifndef RELAX_SPEC
156 #if 0 /* Not supported yet.  */
157 #define RELAX_SPEC "%{mrelax:-relax}"
158 #else
159 #define RELAX_SPEC ""
160 #endif
161 #endif
162
163 #define EXTRA_SPECS                                                     \
164   { "asm_cpu",                  ASM_CPU_SPEC },                         \
165   { "cpp_cpu",                  CPP_CPU_SPEC },                         \
166   { "cc1_cpu",                  CC1_CPU_SPEC },                         \
167   { "link_cpu",                 LINK_CPU_SPEC },                        \
168   { "startfile_cpu",            STARTFILE_CPU_SPEC },                   \
169   { "endfile_cpu",              ENDFILE_CPU_SPEC },                     \
170   { "relax",                    RELAX_SPEC },                           \
171   SUBTARGET_EXTRA_SPECS
172
173 #define CPP_SPEC "%(cpp_cpu)"
174
175 #undef  CC1_SPEC
176 #define CC1_SPEC "%{G*} %(cc1_cpu)"
177
178 /* Options to pass on to the assembler.  */
179 #undef  ASM_SPEC
180 #define ASM_SPEC "%{v} %(asm_cpu) %(relax) %{fpic|fpie:-K PIC} %{fPIC|fPIE:-K PIC}"
181
182 #define LINK_SPEC "%{v} %(link_cpu) %(relax)"
183
184 #undef  STARTFILE_SPEC
185 #define STARTFILE_SPEC "%(startfile_cpu)"
186
187 #undef  ENDFILE_SPEC
188 #define ENDFILE_SPEC "%(endfile_cpu)"
189
190 #undef LIB_SPEC
191 \f
192 /* Run-time compilation parameters selecting different hardware subsets.  */
193
194 #define TARGET_M32R             (! TARGET_M32RX && ! TARGET_M32R2)
195
196 #ifndef TARGET_LITTLE_ENDIAN
197 #define TARGET_LITTLE_ENDIAN    0
198 #endif
199 #define TARGET_BIG_ENDIAN       (! TARGET_LITTLE_ENDIAN)
200
201 /* This defaults us to m32r.  */
202 #ifndef TARGET_CPU_DEFAULT
203 #define TARGET_CPU_DEFAULT 0
204 #endif
205
206 /* Code Models
207
208    Code models are used to select between two choices of two separate
209    possibilities (address space size, call insn to use):
210
211    small: addresses use 24 bits, use bl to make calls
212    medium: addresses use 32 bits, use bl to make calls (*1)
213    large: addresses use 32 bits, use seth/add3/jl to make calls (*2)
214
215    The fourth is "addresses use 24 bits, use seth/add3/jl to make calls" but
216    using this one doesn't make much sense.
217
218    (*1) The linker may eventually be able to relax seth/add3 -> ld24.
219    (*2) The linker may eventually be able to relax seth/add3/jl -> bl.
220
221    Internally these are recorded as TARGET_ADDR{24,32} and
222    TARGET_CALL{26,32}.
223
224    The __model__ attribute can be used to select the code model to use when
225    accessing particular objects.  */
226
227 enum m32r_model { M32R_MODEL_SMALL, M32R_MODEL_MEDIUM, M32R_MODEL_LARGE };
228
229 extern enum m32r_model m32r_model;
230 #define TARGET_MODEL_SMALL  (m32r_model == M32R_MODEL_SMALL)
231 #define TARGET_MODEL_MEDIUM (m32r_model == M32R_MODEL_MEDIUM)
232 #define TARGET_MODEL_LARGE  (m32r_model == M32R_MODEL_LARGE)
233 #define TARGET_ADDR24       (m32r_model == M32R_MODEL_SMALL)
234 #define TARGET_ADDR32       (! TARGET_ADDR24)
235 #define TARGET_CALL26       (! TARGET_CALL32)
236 #define TARGET_CALL32       (m32r_model == M32R_MODEL_LARGE)
237
238 /* The default is the small model.  */
239 #ifndef M32R_MODEL_DEFAULT
240 #define M32R_MODEL_DEFAULT M32R_MODEL_SMALL
241 #endif
242
243 /* Small Data Area
244
245    The SDA consists of sections .sdata, .sbss, and .scommon.
246    .scommon isn't a real section, symbols in it have their section index
247    set to SHN_M32R_SCOMMON, though support for it exists in the linker script.
248
249    Two switches control the SDA:
250
251    -G NNN        - specifies the maximum size of variable to go in the SDA
252
253    -msdata=foo   - specifies how such variables are handled
254
255         -msdata=none  - small data area is disabled
256
257         -msdata=sdata - small data goes in the SDA, special code isn't
258                         generated to use it, and special relocs aren't
259                         generated
260
261         -msdata=use   - small data goes in the SDA, special code is generated
262                         to use the SDA and special relocs are generated
263
264    The SDA is not multilib'd, it isn't necessary.
265    MULTILIB_EXTRA_OPTS is set in tmake_file to -msdata=sdata so multilib'd
266    libraries have small data in .sdata/SHN_M32R_SCOMMON so programs that use
267    -msdata=use will successfully link with them (references in header files
268    will cause the compiler to emit code that refers to library objects in
269    .data).  ??? There can be a problem if the user passes a -G value greater
270    than the default and a library object in a header file is that size.
271    The default is 8 so this should be rare - if it occurs the user
272    is required to rebuild the libraries or use a smaller value for -G.  */
273
274 /* Maximum size of variables that go in .sdata/.sbss.
275    The -msdata=foo switch also controls how small variables are handled.  */
276 #ifndef SDATA_DEFAULT_SIZE
277 #define SDATA_DEFAULT_SIZE 8
278 #endif
279
280 enum m32r_sdata { M32R_SDATA_NONE, M32R_SDATA_SDATA, M32R_SDATA_USE };
281
282 extern enum m32r_sdata m32r_sdata;
283 #define TARGET_SDATA_NONE  (m32r_sdata == M32R_SDATA_NONE)
284 #define TARGET_SDATA_SDATA (m32r_sdata == M32R_SDATA_SDATA)
285 #define TARGET_SDATA_USE   (m32r_sdata == M32R_SDATA_USE)
286
287 /* Default is to disable the SDA
288    [for upward compatibility with previous toolchains].  */
289 #ifndef M32R_SDATA_DEFAULT
290 #define M32R_SDATA_DEFAULT M32R_SDATA_NONE
291 #endif
292
293 /* Define this macro as a C expression for the initializer of an array of
294    strings to tell the driver program which options are defaults for this
295    target and thus do not need to be handled specially when using
296    `MULTILIB_OPTIONS'.  */
297 #ifndef SUBTARGET_MULTILIB_DEFAULTS
298 #define SUBTARGET_MULTILIB_DEFAULTS
299 #endif
300
301 #ifndef MULTILIB_DEFAULTS
302 #define MULTILIB_DEFAULTS { "mmodel=small" SUBTARGET_MULTILIB_DEFAULTS }
303 #endif
304
305 /* Sometimes certain combinations of command options do not make
306    sense on a particular target machine.  You can define a macro
307    `OVERRIDE_OPTIONS' to take account of this.  This macro, if
308    defined, is executed once just after all the command options have
309    been parsed.
310
311    Don't use this macro to turn on various extra optimizations for
312    `-O'.  That is what `OPTIMIZATION_OPTIONS' is for.  */
313
314 #ifndef SUBTARGET_OVERRIDE_OPTIONS
315 #define SUBTARGET_OVERRIDE_OPTIONS
316 #endif
317
318 #define OVERRIDE_OPTIONS                        \
319   do                                            \
320     {                                           \
321       /* These need to be done at start up.     \
322          It's convenient to do them here.  */   \
323       m32r_init ();                             \
324       SUBTARGET_OVERRIDE_OPTIONS                \
325     }                                           \
326   while (0)
327
328 #ifndef SUBTARGET_OPTIMIZATION_OPTIONS
329 #define SUBTARGET_OPTIMIZATION_OPTIONS
330 #endif
331
332 #define OPTIMIZATION_OPTIONS(LEVEL, SIZE)       \
333   do                                            \
334     {                                           \
335       if (LEVEL == 1)                           \
336         flag_regmove = TRUE;                    \
337                                                 \
338       if (SIZE)                                 \
339         {                                       \
340           flag_omit_frame_pointer = TRUE;       \
341         }                                       \
342                                                 \
343       SUBTARGET_OPTIMIZATION_OPTIONS            \
344     }                                           \
345   while (0)
346
347 /* Define this macro if debugging can be performed even without a
348    frame pointer.  If this macro is defined, GCC will turn on the
349    `-fomit-frame-pointer' option whenever `-O' is specified.  */
350 #define CAN_DEBUG_WITHOUT_FP
351 \f
352 /* Target machine storage layout.  */
353
354 /* Define this if most significant bit is lowest numbered
355    in instructions that operate on numbered bit-fields.  */
356 #define BITS_BIG_ENDIAN 1
357
358 /* Define this if most significant byte of a word is the lowest numbered.  */
359 #define BYTES_BIG_ENDIAN (TARGET_LITTLE_ENDIAN == 0)
360
361 /* Define this if most significant word of a multiword number is the lowest
362    numbered.  */
363 #define WORDS_BIG_ENDIAN (TARGET_LITTLE_ENDIAN == 0)
364
365 /* Define this macro if WORDS_BIG_ENDIAN is not constant.  This must
366    be a constant value with the same meaning as WORDS_BIG_ENDIAN,
367    which will be used only when compiling libgcc2.c.  Typically the
368    value will be set based on preprocessor defines.  */
369 /*#define LIBGCC2_WORDS_BIG_ENDIAN 1*/
370
371 /* Width of a word, in units (bytes).  */
372 #define UNITS_PER_WORD 4
373
374 /* Define this macro if it is advisable to hold scalars in registers
375    in a wider mode than that declared by the program.  In such cases, 
376    the value is constrained to be within the bounds of the declared
377    type, but kept valid in the wider mode.  The signedness of the
378    extension may differ from that of the type.  */
379 #define PROMOTE_MODE(MODE, UNSIGNEDP, TYPE)     \
380   if (GET_MODE_CLASS (MODE) == MODE_INT         \
381       && GET_MODE_SIZE (MODE) < UNITS_PER_WORD) \
382     {                                           \
383       (MODE) = SImode;                          \
384     }
385
386 /* Allocation boundary (in *bits*) for storing arguments in argument list.  */
387 #define PARM_BOUNDARY 32
388
389 /* Boundary (in *bits*) on which stack pointer should be aligned.  */
390 #define STACK_BOUNDARY 32
391
392 /* ALIGN FRAMES on word boundaries */
393 #define M32R_STACK_ALIGN(LOC) (((LOC) + 3) & ~ 3)
394
395 /* Allocation boundary (in *bits*) for the code of a function.  */
396 #define FUNCTION_BOUNDARY 32
397
398 /* Alignment of field after `int : 0' in a structure.  */
399 #define EMPTY_FIELD_BOUNDARY 32
400
401 /* Every structure's size must be a multiple of this.  */
402 #define STRUCTURE_SIZE_BOUNDARY 8
403
404 /* A bit-field declared as `int' forces `int' alignment for the struct.  */
405 #define PCC_BITFIELD_TYPE_MATTERS 1
406
407 /* No data type wants to be aligned rounder than this.  */
408 #define BIGGEST_ALIGNMENT 32
409
410 /* The best alignment to use in cases where we have a choice.  */
411 #define FASTEST_ALIGNMENT 32
412
413 /* Make strings word-aligned so strcpy from constants will be faster.  */
414 #define CONSTANT_ALIGNMENT(EXP, ALIGN)  \
415   ((TREE_CODE (EXP) == STRING_CST       \
416     && (ALIGN) < FASTEST_ALIGNMENT)     \
417    ? FASTEST_ALIGNMENT : (ALIGN))
418
419 /* Make arrays of chars word-aligned for the same reasons.  */
420 #define DATA_ALIGNMENT(TYPE, ALIGN)                                     \
421   (TREE_CODE (TYPE) == ARRAY_TYPE                                       \
422    && TYPE_MODE (TREE_TYPE (TYPE)) == QImode                            \
423    && (ALIGN) < FASTEST_ALIGNMENT ? FASTEST_ALIGNMENT : (ALIGN))
424
425 /* Set this nonzero if move instructions will actually fail to work
426    when given unaligned data.  */
427 #define STRICT_ALIGNMENT 1
428
429 /* Define LAVEL_ALIGN to calculate code length of PNOP at labels.  */
430 #define LABEL_ALIGN(insn) 2
431 \f
432 /* Layout of source language data types.  */
433
434 #define SHORT_TYPE_SIZE         16
435 #define INT_TYPE_SIZE           32
436 #define LONG_TYPE_SIZE          32
437 #define LONG_LONG_TYPE_SIZE     64
438 #define FLOAT_TYPE_SIZE         32
439 #define DOUBLE_TYPE_SIZE        64
440 #define LONG_DOUBLE_TYPE_SIZE   64
441
442 /* Define this as 1 if `char' should by default be signed; else as 0.  */
443 #define DEFAULT_SIGNED_CHAR 1
444
445 #define SIZE_TYPE "long unsigned int"
446 #define PTRDIFF_TYPE "long int"
447 #define WCHAR_TYPE "short unsigned int"
448 #define WCHAR_TYPE_SIZE 16
449 \f
450 /* Standard register usage.  */
451
452 /* Number of actual hardware registers.
453    The hardware registers are assigned numbers for the compiler
454    from 0 to just below FIRST_PSEUDO_REGISTER.
455    All registers that the compiler knows about must be given numbers,
456    even those that are not normally considered general registers.  */
457
458 #define M32R_NUM_REGISTERS      19
459
460 #ifndef SUBTARGET_NUM_REGISTERS
461 #define SUBTARGET_NUM_REGISTERS 0
462 #endif
463
464 #define FIRST_PSEUDO_REGISTER (M32R_NUM_REGISTERS + SUBTARGET_NUM_REGISTERS)
465         
466 /* 1 for registers that have pervasive standard uses
467    and are not available for the register allocator.
468
469    0-3   - arguments/results
470    4-5   - call used [4 is used as a tmp during prologue/epilogue generation]
471    6     - call used, gptmp
472    7     - call used, static chain pointer
473    8-11  - call saved
474    12    - call saved [reserved for global pointer]
475    13    - frame pointer
476    14    - subroutine link register
477    15    - stack pointer
478    16    - arg pointer
479    17    - carry flag
480    18    - accumulator
481    19    - accumulator 1 in the m32r/x
482    By default, the extension registers are not available.  */
483
484 #ifndef SUBTARGET_FIXED_REGISTERS
485 #define SUBTARGET_FIXED_REGISTERS
486 #endif
487
488 #define FIXED_REGISTERS         \
489 {                               \
490   0, 0, 0, 0, 0, 0, 0, 0,       \
491   0, 0, 0, 0, 0, 0, 0, 1,       \
492   1, 1, 1                       \
493   SUBTARGET_FIXED_REGISTERS     \
494 }
495
496 /* 1 for registers not available across function calls.
497    These must include the FIXED_REGISTERS and also any
498    registers that can be used without being saved.
499    The latter must include the registers where values are returned
500    and the register where structure-value addresses are passed.
501    Aside from that, you can include as many other registers as you like.  */
502
503 #ifndef SUBTARGET_CALL_USED_REGISTERS
504 #define SUBTARGET_CALL_USED_REGISTERS
505 #endif
506
507 #define CALL_USED_REGISTERS     \
508 {                               \
509   1, 1, 1, 1, 1, 1, 1, 1,       \
510   0, 0, 0, 0, 0, 0, 1, 1,       \
511   1, 1, 1                       \
512   SUBTARGET_CALL_USED_REGISTERS \
513 }
514
515 #define CALL_REALLY_USED_REGISTERS CALL_USED_REGISTERS
516
517 /* Zero or more C statements that may conditionally modify two variables
518    `fixed_regs' and `call_used_regs' (both of type `char []') after they
519    have been initialized from the two preceding macros.
520
521    This is necessary in case the fixed or call-clobbered registers depend
522    on target flags.
523
524    You need not define this macro if it has no work to do.  */
525
526 #ifdef SUBTARGET_CONDITIONAL_REGISTER_USAGE
527 #define CONDITIONAL_REGISTER_USAGE SUBTARGET_CONDITIONAL_REGISTER_USAGE
528 #else
529 #define CONDITIONAL_REGISTER_USAGE                       \
530   do                                                     \
531     {                                                    \
532       if (flag_pic)                                      \
533        {                                                 \
534          fixed_regs[PIC_OFFSET_TABLE_REGNUM] = 1;        \
535          call_used_regs[PIC_OFFSET_TABLE_REGNUM] = 1;    \
536        }                                                 \
537     }                                                    \
538   while (0)
539 #endif
540
541 /* If defined, an initializer for a vector of integers, containing the
542    numbers of hard registers in the order in which GCC should
543    prefer to use them (from most preferred to least).  */
544
545 #ifndef SUBTARGET_REG_ALLOC_ORDER
546 #define SUBTARGET_REG_ALLOC_ORDER
547 #endif
548
549 #if 1 /* Better for int code.  */
550 #define REG_ALLOC_ORDER                         \
551 {                                               \
552   4,  5,  6,  7,  2,  3,  8,  9, 10,            \
553   11, 12, 13, 14,  0,  1, 15, 16, 17, 18        \
554   SUBTARGET_REG_ALLOC_ORDER                     \
555 }
556
557 #else /* Better for fp code at expense of int code.  */
558 #define REG_ALLOC_ORDER                         \
559 {                                               \
560    0,  1,  2,  3,  4,  5,  6,  7,  8,           \
561    9, 10, 11, 12, 13, 14, 15, 16, 17, 18        \
562   SUBTARGET_REG_ALLOC_ORDER                     \
563 }
564 #endif
565
566 /* Return number of consecutive hard regs needed starting at reg REGNO
567    to hold something of mode MODE.
568    This is ordinarily the length in words of a value of mode MODE
569    but can be less for certain modes in special long registers.  */
570 #define HARD_REGNO_NREGS(REGNO, MODE) \
571   ((GET_MODE_SIZE (MODE) + UNITS_PER_WORD - 1) / UNITS_PER_WORD)
572
573 /* Value is 1 if hard register REGNO can hold a value of machine-mode MODE.  */
574 extern const unsigned int m32r_hard_regno_mode_ok[FIRST_PSEUDO_REGISTER];
575 extern unsigned int m32r_mode_class[];
576 #define HARD_REGNO_MODE_OK(REGNO, MODE) \
577   ((m32r_hard_regno_mode_ok[REGNO] & m32r_mode_class[MODE]) != 0)
578
579 /* A C expression that is nonzero if it is desirable to choose
580    register allocation so as to avoid move instructions between a
581    value of mode MODE1 and a value of mode MODE2.
582
583    If `HARD_REGNO_MODE_OK (R, MODE1)' and `HARD_REGNO_MODE_OK (R,
584    MODE2)' are ever different for any R, then `MODES_TIEABLE_P (MODE1,
585    MODE2)' must be zero.  */
586
587 /* Tie QI/HI/SI modes together.  */
588 #define MODES_TIEABLE_P(MODE1, MODE2)           \
589   (   GET_MODE_CLASS (MODE1) == MODE_INT        \
590    && GET_MODE_CLASS (MODE2) == MODE_INT        \
591    && GET_MODE_SIZE (MODE1) <= UNITS_PER_WORD   \
592    && GET_MODE_SIZE (MODE2) <= UNITS_PER_WORD)
593
594 #define HARD_REGNO_RENAME_OK(OLD_REG, NEW_REG) \
595   m32r_hard_regno_rename_ok (OLD_REG, NEW_REG)
596 \f
597 /* Register classes and constants.  */
598
599 /* Define the classes of registers for register constraints in the
600    machine description.  Also define ranges of constants.
601
602    One of the classes must always be named ALL_REGS and include all hard regs.
603    If there is more than one class, another class must be named NO_REGS
604    and contain no registers.
605
606    The name GENERAL_REGS must be the name of a class (or an alias for
607    another name such as ALL_REGS).  This is the class of registers
608    that is allowed by "g" or "r" in a register constraint.
609    Also, registers outside this class are allocated only when
610    instructions express preferences for them.
611
612    The classes must be numbered in nondecreasing order; that is,
613    a larger-numbered class must never be contained completely
614    in a smaller-numbered class.
615
616    For any two classes, it is very desirable that there be another
617    class that represents their union.
618
619    It is important that any condition codes have class NO_REGS.
620    See `register_operand'.  */
621
622 enum reg_class
623 {
624   NO_REGS, CARRY_REG, ACCUM_REGS, GENERAL_REGS, ALL_REGS, LIM_REG_CLASSES
625 };
626
627 #define IRA_COVER_CLASSES                               \
628 {                                                       \
629   ACCUM_REGS, GENERAL_REGS, LIM_REG_CLASSES             \
630 }
631
632 #define N_REG_CLASSES ((int) LIM_REG_CLASSES)
633
634 /* Give names of register classes as strings for dump file.  */
635 #define REG_CLASS_NAMES \
636   { "NO_REGS", "CARRY_REG", "ACCUM_REGS", "GENERAL_REGS", "ALL_REGS" }
637
638 /* Define which registers fit in which classes.
639    This is an initializer for a vector of HARD_REG_SET
640    of length N_REG_CLASSES.  */
641
642 #ifndef SUBTARGET_REG_CLASS_CARRY
643 #define SUBTARGET_REG_CLASS_CARRY 0
644 #endif
645
646 #ifndef SUBTARGET_REG_CLASS_ACCUM
647 #define SUBTARGET_REG_CLASS_ACCUM 0
648 #endif
649
650 #ifndef SUBTARGET_REG_CLASS_GENERAL
651 #define SUBTARGET_REG_CLASS_GENERAL 0
652 #endif
653
654 #ifndef SUBTARGET_REG_CLASS_ALL
655 #define SUBTARGET_REG_CLASS_ALL 0
656 #endif
657
658 #define REG_CLASS_CONTENTS                                              \
659 {                                                                       \
660   { 0x00000 },                                                          \
661   { 0x20000 | SUBTARGET_REG_CLASS_CARRY },                              \
662   { 0x40000 | SUBTARGET_REG_CLASS_ACCUM },                              \
663   { 0x1ffff | SUBTARGET_REG_CLASS_GENERAL },                            \
664   { 0x7ffff | SUBTARGET_REG_CLASS_ALL },                                \
665 }
666
667 /* The same information, inverted:
668    Return the class number of the smallest class containing
669    reg number REGNO.  This could be a conditional expression
670    or could index an array.  */
671 extern enum reg_class m32r_regno_reg_class[FIRST_PSEUDO_REGISTER];
672 #define REGNO_REG_CLASS(REGNO) (m32r_regno_reg_class[REGNO])
673
674 /* The class value for index registers, and the one for base regs.  */
675 #define INDEX_REG_CLASS GENERAL_REGS
676 #define BASE_REG_CLASS GENERAL_REGS
677
678 /* These assume that REGNO is a hard or pseudo reg number.
679    They give nonzero only if REGNO is a hard reg of the suitable class
680    or a pseudo reg currently allocated to a suitable hard reg.
681    Since they use reg_renumber, they are safe only once reg_renumber
682    has been allocated, which happens in local-alloc.c.  */
683 #define REGNO_OK_FOR_BASE_P(REGNO) \
684   ((REGNO) < FIRST_PSEUDO_REGISTER                      \
685    ? GPR_P (REGNO) || (REGNO) == ARG_POINTER_REGNUM     \
686    : GPR_P (reg_renumber[REGNO]))
687
688 #define REGNO_OK_FOR_INDEX_P(REGNO) REGNO_OK_FOR_BASE_P(REGNO)
689
690 /* Given an rtx X being reloaded into a reg required to be
691    in class CLASS, return the class of reg to actually use.
692    In general this is just CLASS; but on some machines
693    in some cases it is preferable to use a more restrictive class.  */
694 #define PREFERRED_RELOAD_CLASS(X,CLASS) (CLASS)
695
696 /* Return the maximum number of consecutive registers
697    needed to represent mode MODE in a register of class CLASS.  */
698 #define CLASS_MAX_NREGS(CLASS, MODE) \
699   ((GET_MODE_SIZE (MODE) + UNITS_PER_WORD - 1) / UNITS_PER_WORD)
700
701 /* Return true if a value is inside a range.  */
702 #define IN_RANGE_P(VALUE, LOW, HIGH)                    \
703   (((unsigned HOST_WIDE_INT)((VALUE) - (LOW)))          \
704    <= ((unsigned HOST_WIDE_INT)((HIGH) - (LOW))))
705
706 /* Some range macros.  */
707 #define INT16_P(X)     ((X) >= - 0x8000 && (X) <= 0x7fff)
708 #define CMP_INT16_P(X) ((X) >= - 0x7fff && (X) <= 0x8000)
709 #define UINT16_P(X)   (((unsigned HOST_WIDE_INT) (X)) <= 0x0000ffff)
710 #define UINT24_P(X)   (((unsigned HOST_WIDE_INT) (X)) <= 0x00ffffff)
711 \f
712 /* Stack layout and stack pointer usage.  */
713
714 /* Define this macro if pushing a word onto the stack moves the stack
715    pointer to a smaller address.  */
716 #define STACK_GROWS_DOWNWARD
717
718 /* Offset from frame pointer to start allocating local variables at.
719    If FRAME_GROWS_DOWNWARD, this is the offset to the END of the
720    first local allocated.  Otherwise, it is the offset to the BEGINNING
721    of the first local allocated.  */
722 /* The frame pointer points at the same place as the stack pointer, except if
723    alloca has been called.  */
724 #define STARTING_FRAME_OFFSET \
725   M32R_STACK_ALIGN (crtl->outgoing_args_size)
726
727 /* Offset from the stack pointer register to the first location at which
728    outgoing arguments are placed.  */
729 #define STACK_POINTER_OFFSET 0
730
731 /* Offset of first parameter from the argument pointer register value.  */
732 #define FIRST_PARM_OFFSET(FNDECL) 0
733
734 /* Register to use for pushing function arguments.  */
735 #define STACK_POINTER_REGNUM 15
736
737 /* Base register for access to local variables of the function.  */
738 #define FRAME_POINTER_REGNUM 13
739
740 /* Base register for access to arguments of the function.  */
741 #define ARG_POINTER_REGNUM 16
742
743 /* Register in which static-chain is passed to a function.
744    This must not be a register used by the prologue.  */
745 #define STATIC_CHAIN_REGNUM  7
746
747 /* These aren't official macros.  */
748 #define PROLOGUE_TMP_REGNUM  4
749 #define RETURN_ADDR_REGNUM  14
750 /* #define GP_REGNUM        12 */
751 #define CARRY_REGNUM        17
752 #define ACCUM_REGNUM        18
753 #define M32R_MAX_INT_REGS   16
754
755 #ifndef SUBTARGET_GPR_P
756 #define SUBTARGET_GPR_P(REGNO) 0
757 #endif
758
759 #ifndef SUBTARGET_ACCUM_P
760 #define SUBTARGET_ACCUM_P(REGNO) 0
761 #endif
762
763 #ifndef SUBTARGET_CARRY_P
764 #define SUBTARGET_CARRY_P(REGNO) 0
765 #endif
766
767 #define GPR_P(REGNO)   (IN_RANGE_P ((REGNO), 0, 15) || SUBTARGET_GPR_P (REGNO))
768 #define ACCUM_P(REGNO) ((REGNO) == ACCUM_REGNUM || SUBTARGET_ACCUM_P (REGNO))
769 #define CARRY_P(REGNO) ((REGNO) == CARRY_REGNUM || SUBTARGET_CARRY_P (REGNO))
770 \f
771 /* Eliminating the frame and arg pointers.  */
772
773 /* A C expression which is nonzero if a function must have and use a
774    frame pointer.  This expression is evaluated in the reload pass.
775    If its value is nonzero the function will have a frame pointer.  */
776 #define FRAME_POINTER_REQUIRED cfun->calls_alloca
777
778 #if 0
779 /* C statement to store the difference between the frame pointer
780    and the stack pointer values immediately after the function prologue.
781    If `ELIMINABLE_REGS' is defined, this macro will be not be used and
782    need not be defined.  */
783 #define INITIAL_FRAME_POINTER_OFFSET(VAR) \
784 ((VAR) = m32r_compute_frame_size (get_frame_size ()))
785 #endif
786
787 /* If defined, this macro specifies a table of register pairs used to
788    eliminate unneeded registers that point into the stack frame.  If
789    it is not defined, the only elimination attempted by the compiler
790    is to replace references to the frame pointer with references to
791    the stack pointer.
792
793    Note that the elimination of the argument pointer with the stack
794    pointer is specified first since that is the preferred elimination.  */
795
796 #define ELIMINABLE_REGS                                 \
797 {{ FRAME_POINTER_REGNUM, STACK_POINTER_REGNUM },        \
798  { ARG_POINTER_REGNUM,   STACK_POINTER_REGNUM },        \
799  { ARG_POINTER_REGNUM,   FRAME_POINTER_REGNUM }}
800
801 /* A C expression that returns nonzero if the compiler is allowed to
802    try to replace register number FROM-REG with register number
803    TO-REG.  This macro need only be defined if `ELIMINABLE_REGS' is
804    defined, and will usually be the constant 1, since most of the
805    cases preventing register elimination are things that the compiler
806    already knows about.  */
807
808 #define CAN_ELIMINATE(FROM, TO)                                         \
809   ((FROM) == ARG_POINTER_REGNUM && (TO) == STACK_POINTER_REGNUM         \
810    ? ! frame_pointer_needed                                             \
811    : 1)
812
813 /* This macro is similar to `INITIAL_FRAME_POINTER_OFFSET'.  It
814    specifies the initial difference between the specified pair of
815    registers.  This macro must be defined if `ELIMINABLE_REGS' is
816    defined.  */
817
818 #define INITIAL_ELIMINATION_OFFSET(FROM, TO, OFFSET)                            \
819   do                                                                            \
820     {                                                                           \
821       int size = m32r_compute_frame_size (get_frame_size ());                   \
822                                                                                 \
823       if ((FROM) == FRAME_POINTER_REGNUM && (TO) == STACK_POINTER_REGNUM)       \
824         (OFFSET) = 0;                                                           \
825       else if ((FROM) == ARG_POINTER_REGNUM && (TO) == FRAME_POINTER_REGNUM)    \
826         (OFFSET) = size - crtl->args.pretend_args_size;                 \
827       else if ((FROM) == ARG_POINTER_REGNUM && (TO) == STACK_POINTER_REGNUM)    \
828         (OFFSET) = size - crtl->args.pretend_args_size;                 \
829       else                                                                      \
830         gcc_unreachable ();                                                             \
831     }                                                                           \
832   while (0)
833 \f
834 /* Function argument passing.  */
835
836 /* If defined, the maximum amount of space required for outgoing
837    arguments will be computed and placed into the variable
838    `crtl->outgoing_args_size'.  No space will be pushed
839    onto the stack for each call; instead, the function prologue should
840    increase the stack frame size by this amount.  */
841 #define ACCUMULATE_OUTGOING_ARGS 1
842
843 /* Value is the number of bytes of arguments automatically
844    popped when returning from a subroutine call.
845    FUNDECL is the declaration node of the function (as a tree),
846    FUNTYPE is the data type of the function (as a tree),
847    or for a library call it is an identifier node for the subroutine name.
848    SIZE is the number of bytes of arguments passed on the stack.  */
849 #define RETURN_POPS_ARGS(DECL, FUNTYPE, SIZE) 0
850
851 /* Define a data type for recording info about an argument list
852    during the scan of that argument list.  This data type should
853    hold all necessary information about the function itself
854    and about the args processed so far, enough to enable macros
855    such as FUNCTION_ARG to determine where the next arg should go.  */
856 #define CUMULATIVE_ARGS int
857
858 /* Initialize a variable CUM of type CUMULATIVE_ARGS
859    for a call to a function whose data type is FNTYPE.
860    For a library call, FNTYPE is 0.  */
861 #define INIT_CUMULATIVE_ARGS(CUM, FNTYPE, LIBNAME, INDIRECT, N_NAMED_ARGS) \
862   ((CUM) = 0)
863
864 /* The number of registers used for parameter passing.  Local to this file.  */
865 #define M32R_MAX_PARM_REGS 4
866
867 /* 1 if N is a possible register number for function argument passing.  */
868 #define FUNCTION_ARG_REGNO_P(N) \
869   ((unsigned) (N) < M32R_MAX_PARM_REGS)
870
871 /* The ROUND_ADVANCE* macros are local to this file.  */
872 /* Round SIZE up to a word boundary.  */
873 #define ROUND_ADVANCE(SIZE) \
874   (((SIZE) + UNITS_PER_WORD - 1) / UNITS_PER_WORD)
875
876 /* Round arg MODE/TYPE up to the next word boundary.  */
877 #define ROUND_ADVANCE_ARG(MODE, TYPE) \
878   ((MODE) == BLKmode                            \
879    ? ROUND_ADVANCE ((unsigned int) int_size_in_bytes (TYPE))    \
880    : ROUND_ADVANCE ((unsigned int) GET_MODE_SIZE (MODE)))
881
882 /* Round CUM up to the necessary point for argument MODE/TYPE.  */
883 #define ROUND_ADVANCE_CUM(CUM, MODE, TYPE) (CUM)
884
885 /* Return boolean indicating arg of type TYPE and mode MODE will be passed in
886    a reg.  This includes arguments that have to be passed by reference as the
887    pointer to them is passed in a reg if one is available (and that is what
888    we're given).
889    This macro is only used in this file.  */
890 #define PASS_IN_REG_P(CUM, MODE, TYPE) \
891   (ROUND_ADVANCE_CUM ((CUM), (MODE), (TYPE)) < M32R_MAX_PARM_REGS)
892
893 /* Determine where to put an argument to a function.
894    Value is zero to push the argument on the stack,
895    or a hard register in which to store the argument.
896
897    MODE is the argument's machine mode.
898    TYPE is the data type of the argument (as a tree).
899     This is null for libcalls where that information may
900     not be available.
901    CUM is a variable of type CUMULATIVE_ARGS which gives info about
902     the preceding args and about the function being called.
903    NAMED is nonzero if this argument is a named parameter
904     (otherwise it is an extra parameter matching an ellipsis).  */
905 /* On the M32R the first M32R_MAX_PARM_REGS args are normally in registers
906    and the rest are pushed.  */
907 #define FUNCTION_ARG(CUM, MODE, TYPE, NAMED) \
908   (PASS_IN_REG_P ((CUM), (MODE), (TYPE))                        \
909    ? gen_rtx_REG ((MODE), ROUND_ADVANCE_CUM ((CUM), (MODE), (TYPE)))    \
910    : 0)
911
912 /* Update the data in CUM to advance over an argument
913    of mode MODE and data type TYPE.
914    (TYPE is null for libcalls where that information may not be available.)  */
915 #define FUNCTION_ARG_ADVANCE(CUM, MODE, TYPE, NAMED) \
916   ((CUM) = (ROUND_ADVANCE_CUM ((CUM), (MODE), (TYPE)) \
917           + ROUND_ADVANCE_ARG ((MODE), (TYPE))))
918
919 /* If defined, a C expression that gives the alignment boundary, in bits,
920    of an argument with the specified mode and type.  If it is not defined, 
921    PARM_BOUNDARY is used for all arguments.  */
922 #if 0
923 /* We assume PARM_BOUNDARY == UNITS_PER_WORD here.  */
924 #define FUNCTION_ARG_BOUNDARY(MODE, TYPE) \
925   (((TYPE) ? TYPE_ALIGN (TYPE) : GET_MODE_BITSIZE (MODE)) <= PARM_BOUNDARY \
926    ? PARM_BOUNDARY : 2 * PARM_BOUNDARY)
927 #endif
928 \f
929 /* Function results.  */
930
931 /* Define how to find the value returned by a function.
932    VALTYPE is the data type of the value (as a tree).
933    If the precise function being called is known, FUNC is its FUNCTION_DECL;
934    otherwise, FUNC is 0.  */
935 #define FUNCTION_VALUE(VALTYPE, FUNC) gen_rtx_REG (TYPE_MODE (VALTYPE), 0)
936
937 /* Define how to find the value returned by a library function
938    assuming the value has mode MODE.  */
939 #define LIBCALL_VALUE(MODE) gen_rtx_REG (MODE, 0)
940
941 /* 1 if N is a possible register number for a function value
942    as seen by the caller.  */
943 /* ??? What about r1 in DI/DF values.  */
944 #define FUNCTION_VALUE_REGNO_P(N) ((N) == 0)
945
946 /* Tell GCC to use TARGET_RETURN_IN_MEMORY.  */
947 #define DEFAULT_PCC_STRUCT_RETURN 0
948 \f
949 /* Function entry and exit.  */
950
951 /* Initialize data used by insn expanders.  This is called from
952    init_emit, once for each function, before code is generated.  */
953 #define INIT_EXPANDERS m32r_init_expanders ()
954
955 /* EXIT_IGNORE_STACK should be nonzero if, when returning from a function,
956    the stack pointer does not matter.  The value is tested only in
957    functions that have frame pointers.
958    No definition is equivalent to always zero.  */
959 #define EXIT_IGNORE_STACK 1
960
961 /* Output assembler code to FILE to increment profiler label # LABELNO
962    for profiling a function entry.  */
963 #undef  FUNCTION_PROFILER
964 #define FUNCTION_PROFILER(FILE, LABELNO)                        \
965   do                                                            \
966     {                                                           \
967       if (flag_pic)                                             \
968         {                                                       \
969           fprintf (FILE, "\tld24 r14,#mcount\n");               \
970           fprintf (FILE, "\tadd r14,r12\n");                    \
971           fprintf (FILE, "\tld r14,@r14\n");                    \
972           fprintf (FILE, "\tjl r14\n");                         \
973         }                                                       \
974       else                                                      \
975         {                                                       \
976           if (TARGET_ADDR24)                                    \
977             fprintf (FILE, "\tbl mcount\n");                    \
978           else                                                  \
979             {                                                   \
980               fprintf (FILE, "\tseth r14,#high(mcount)\n");     \
981               fprintf (FILE, "\tor3 r14,r14,#low(mcount)\n");   \
982               fprintf (FILE, "\tjl r14\n");                     \
983             }                                                   \
984         }                                                       \
985       fprintf (FILE, "\taddi sp,#4\n");                         \
986     }                                                           \
987   while (0)
988 \f
989 /* Trampolines.  */
990
991 /* On the M32R, the trampoline is:
992
993         mv      r7, lr   -> bl L1        ; 178e 7e01
994 L1:     add3    r6, lr, #L2-L1           ; 86ae 000c (L2 - L1 = 12)
995         mv      lr, r7   -> ld r7,@r6+   ; 1e87 27e6
996         ld      r6, @r6  -> jmp r6       ; 26c6 1fc6
997 L2:     .word STATIC
998         .word FUNCTION  */
999
1000 #ifndef CACHE_FLUSH_FUNC
1001 #define CACHE_FLUSH_FUNC "_flush_cache"
1002 #endif
1003 #ifndef CACHE_FLUSH_TRAP
1004 #define CACHE_FLUSH_TRAP 12
1005 #endif
1006
1007 /* Length in bytes of the trampoline for entering a nested function.  */
1008 #define TRAMPOLINE_SIZE 24
1009
1010 /* Emit RTL insns to initialize the variable parts of a trampoline.
1011    FNADDR is an RTX for the address of the function's pure code.
1012    CXT is an RTX for the static chain value for the function.  */
1013 #define INITIALIZE_TRAMPOLINE(TRAMP, FNADDR, CXT)                               \
1014   do                                                                            \
1015     {                                                                           \
1016       emit_move_insn (gen_rtx_MEM (SImode, plus_constant (TRAMP, 0)),           \
1017                       gen_int_mode (TARGET_LITTLE_ENDIAN ?                      \
1018                                     0x017e8e17 : 0x178e7e01, SImode));          \
1019       emit_move_insn (gen_rtx_MEM (SImode, plus_constant (TRAMP, 4)),           \
1020                       gen_int_mode (TARGET_LITTLE_ENDIAN ?                      \
1021                                     0x0c00ae86 : 0x86ae000c, SImode));          \
1022       emit_move_insn (gen_rtx_MEM (SImode, plus_constant (TRAMP, 8)),           \
1023                       gen_int_mode (TARGET_LITTLE_ENDIAN ?                      \
1024                                     0xe627871e : 0x1e8727e6, SImode));          \
1025       emit_move_insn (gen_rtx_MEM (SImode, plus_constant (TRAMP, 12)),          \
1026                       gen_int_mode (TARGET_LITTLE_ENDIAN ?                      \
1027                                     0xc616c626 : 0x26c61fc6, SImode));          \
1028       emit_move_insn (gen_rtx_MEM (SImode, plus_constant (TRAMP, 16)),          \
1029                       (CXT));                                                   \
1030       emit_move_insn (gen_rtx_MEM (SImode, plus_constant (TRAMP, 20)),          \
1031                       (FNADDR));                                                \
1032       if (m32r_cache_flush_trap >= 0)                                           \
1033         emit_insn (gen_flush_icache (validize_mem (gen_rtx_MEM (SImode, TRAMP)),\
1034                                      gen_int_mode (m32r_cache_flush_trap, SImode))); \
1035       else if (m32r_cache_flush_func && m32r_cache_flush_func[0])               \
1036         emit_library_call (m32r_function_symbol (m32r_cache_flush_func),        \
1037                            0, VOIDmode, 3, TRAMP, Pmode,                        \
1038                            gen_int_mode (TRAMPOLINE_SIZE, SImode), SImode,      \
1039                            GEN_INT (3), SImode);                                \
1040     }                                                                           \
1041   while (0)
1042 \f
1043 #define RETURN_ADDR_RTX(COUNT, FRAME) m32r_return_addr (COUNT)
1044
1045 #define INCOMING_RETURN_ADDR_RTX   gen_rtx_REG (Pmode, RETURN_ADDR_REGNUM)
1046
1047 /* Addressing modes, and classification of registers for them.  */
1048
1049 /* Maximum number of registers that can appear in a valid memory address.  */
1050 #define MAX_REGS_PER_ADDRESS 1
1051
1052 /* We have post-inc load and pre-dec,pre-inc store,
1053    but only for 4 byte vals.  */
1054 #define HAVE_PRE_DECREMENT  1
1055 #define HAVE_PRE_INCREMENT  1
1056 #define HAVE_POST_INCREMENT 1
1057
1058 /* Recognize any constant value that is a valid address.  */
1059 #define CONSTANT_ADDRESS_P(X)   \
1060   (    GET_CODE (X) == LABEL_REF  \
1061    ||  GET_CODE (X) == SYMBOL_REF \
1062    ||  GET_CODE (X) == CONST_INT  \
1063    || (GET_CODE (X) == CONST      \
1064        && ! (flag_pic && ! m32r_legitimate_pic_operand_p (X))))
1065
1066 /* Nonzero if the constant value X is a legitimate general operand.
1067    We don't allow (plus symbol large-constant) as the relocations can't
1068    describe it.  INTVAL > 32767 handles both 16-bit and 24-bit relocations.
1069    We allow all CONST_DOUBLE's as the md file patterns will force the
1070    constant to memory if they can't handle them.  */
1071
1072 #define LEGITIMATE_CONSTANT_P(X)                                        \
1073   (! (GET_CODE (X) == CONST                                             \
1074       && GET_CODE (XEXP (X, 0)) == PLUS                                 \
1075       && (GET_CODE (XEXP (XEXP (X, 0), 0)) == SYMBOL_REF || GET_CODE (XEXP (XEXP (X, 0), 0)) == LABEL_REF) \
1076       && GET_CODE (XEXP (XEXP (X, 0), 1)) == CONST_INT                  \
1077       && (unsigned HOST_WIDE_INT) INTVAL (XEXP (XEXP (X, 0), 1)) > 32767))
1078
1079 /* The macros REG_OK_FOR..._P assume that the arg is a REG rtx
1080    and check its validity for a certain class.
1081    We have two alternate definitions for each of them.
1082    The usual definition accepts all pseudo regs; the other rejects
1083    them unless they have been allocated suitable hard regs.
1084    The symbol REG_OK_STRICT causes the latter definition to be used.
1085
1086    Most source files want to accept pseudo regs in the hope that
1087    they will get allocated to the class that the insn wants them to be in.
1088    Source files for reload pass need to be strict.
1089    After reload, it makes no difference, since pseudo regs have
1090    been eliminated by then.  */
1091
1092 #ifdef REG_OK_STRICT
1093
1094 /* Nonzero if X is a hard reg that can be used as a base reg.  */
1095 #define REG_OK_FOR_BASE_P(X) GPR_P (REGNO (X))
1096 /* Nonzero if X is a hard reg that can be used as an index.  */
1097 #define REG_OK_FOR_INDEX_P(X) REG_OK_FOR_BASE_P (X)
1098
1099 #else
1100
1101 /* Nonzero if X is a hard reg that can be used as a base reg
1102    or if it is a pseudo reg.  */
1103 #define REG_OK_FOR_BASE_P(X)            \
1104   (GPR_P (REGNO (X))                    \
1105    || (REGNO (X)) == ARG_POINTER_REGNUM \
1106    || REGNO (X) >= FIRST_PSEUDO_REGISTER)
1107 /* Nonzero if X is a hard reg that can be used as an index
1108    or if it is a pseudo reg.  */
1109 #define REG_OK_FOR_INDEX_P(X) REG_OK_FOR_BASE_P (X)
1110
1111 #endif
1112
1113 /* GO_IF_LEGITIMATE_ADDRESS recognizes an RTL expression
1114    that is a valid memory address for an instruction.
1115    The MODE argument is the machine mode for the MEM expression
1116    that wants to use this address.  */
1117
1118 /* Local to this file.  */
1119 #define RTX_OK_FOR_BASE_P(X) (REG_P (X) && REG_OK_FOR_BASE_P (X))
1120
1121 /* Local to this file.  */
1122 #define RTX_OK_FOR_OFFSET_P(X) \
1123   (GET_CODE (X) == CONST_INT && INT16_P (INTVAL (X)))
1124
1125 /* Local to this file.  */
1126 #define LEGITIMATE_OFFSET_ADDRESS_P(MODE, X)                    \
1127   (GET_CODE (X) == PLUS                                         \
1128    && RTX_OK_FOR_BASE_P (XEXP (X, 0))                           \
1129    && RTX_OK_FOR_OFFSET_P (XEXP (X, 1)))
1130
1131 /* Local to this file.  */
1132 /* For LO_SUM addresses, do not allow them if the MODE is > 1 word,
1133    since more than one instruction will be required.  */
1134 #define LEGITIMATE_LO_SUM_ADDRESS_P(MODE, X)                    \
1135   (GET_CODE (X) == LO_SUM                                       \
1136    && (MODE != BLKmode && GET_MODE_SIZE (MODE) <= UNITS_PER_WORD)\
1137    && RTX_OK_FOR_BASE_P (XEXP (X, 0))                           \
1138    && CONSTANT_P (XEXP (X, 1)))
1139
1140 /* Local to this file.  */
1141 /* Is this a load and increment operation.  */
1142 #define LOAD_POSTINC_P(MODE, X)                                 \
1143   (((MODE) == SImode || (MODE) == SFmode)                       \
1144    && GET_CODE (X) == POST_INC                                  \
1145    && GET_CODE (XEXP (X, 0)) == REG                             \
1146    && RTX_OK_FOR_BASE_P (XEXP (X, 0)))
1147
1148 /* Local to this file.  */
1149 /* Is this an increment/decrement and store operation.  */
1150 #define STORE_PREINC_PREDEC_P(MODE, X)                          \
1151   (((MODE) == SImode || (MODE) == SFmode)                       \
1152    && (GET_CODE (X) == PRE_INC || GET_CODE (X) == PRE_DEC)      \
1153    && GET_CODE (XEXP (X, 0)) == REG                             \
1154    && RTX_OK_FOR_BASE_P (XEXP (X, 0)))
1155
1156 #define GO_IF_LEGITIMATE_ADDRESS(MODE, X, ADDR)                 \
1157   do                                                            \
1158     {                                                           \
1159       if (RTX_OK_FOR_BASE_P (X))                                \
1160         goto ADDR;                                              \
1161       if (LEGITIMATE_OFFSET_ADDRESS_P ((MODE), (X)))            \
1162         goto ADDR;                                              \
1163       if (LEGITIMATE_LO_SUM_ADDRESS_P ((MODE), (X)))            \
1164         goto ADDR;                                              \
1165       if (LOAD_POSTINC_P ((MODE), (X)))                         \
1166         goto ADDR;                                              \
1167       if (STORE_PREINC_PREDEC_P ((MODE), (X)))                  \
1168         goto ADDR;                                              \
1169     }                                                           \
1170   while (0)
1171
1172 /* Try machine-dependent ways of modifying an illegitimate address
1173    to be legitimate.  If we find one, return the new, valid address.
1174    This macro is used in only one place: `memory_address' in explow.c.
1175
1176    OLDX is the address as it was before break_out_memory_refs was called.
1177    In some cases it is useful to look at this to decide what needs to be done.
1178
1179    MODE and WIN are passed so that this macro can use
1180    GO_IF_LEGITIMATE_ADDRESS.
1181
1182    It is always safe for this macro to do nothing.  It exists to recognize
1183    opportunities to optimize the output.  */
1184
1185 #define LEGITIMIZE_ADDRESS(X, OLDX, MODE, WIN)                   \
1186   do                                                             \
1187     {                                                            \
1188       if (flag_pic)                                              \
1189         (X) = m32r_legitimize_pic_address (X, NULL_RTX);         \
1190       if (memory_address_p (MODE, X))                            \
1191         goto WIN;                                                \
1192     }                                                            \
1193   while (0)
1194
1195 /* Go to LABEL if ADDR (a legitimate address expression)
1196    has an effect that depends on the machine mode it is used for.  */
1197 #define GO_IF_MODE_DEPENDENT_ADDRESS(ADDR, LABEL)               \
1198   do                                                            \
1199     {                                                           \
1200       if (GET_CODE (ADDR) == LO_SUM)                            \
1201         goto LABEL;                                             \
1202     }                                                           \
1203   while (0)
1204 \f
1205 /* Condition code usage.  */
1206
1207 /* Return nonzero if SELECT_CC_MODE will never return MODE for a
1208    floating point inequality comparison.  */
1209 #define REVERSIBLE_CC_MODE(MODE) 1 /*???*/
1210 \f
1211 /* Costs.  */
1212
1213 /* Compute extra cost of moving data between one register class
1214    and another.  */
1215 #define REGISTER_MOVE_COST(MODE, CLASS1, CLASS2) 2
1216
1217 /* Compute the cost of moving data between registers and memory.  */
1218 /* Memory is 3 times as expensive as registers.
1219    ??? Is that the right way to look at it?  */
1220 #define MEMORY_MOVE_COST(MODE,CLASS,IN_P) \
1221 (GET_MODE_SIZE (MODE) <= UNITS_PER_WORD ? 6 : 12)
1222
1223 /* The cost of a branch insn.  */
1224 /* A value of 2 here causes GCC to avoid using branches in comparisons like
1225    while (a < N && a).  Branches aren't that expensive on the M32R so
1226    we define this as 1.  Defining it as 2 had a heavy hit in fp-bit.c.  */
1227 #define BRANCH_COST(speed_p, predictable_p) ((TARGET_BRANCH_COST) ? 2 : 1)
1228
1229 /* Nonzero if access to memory by bytes is slow and undesirable.
1230    For RISC chips, it means that access to memory by bytes is no
1231    better than access by words when possible, so grab a whole word
1232    and maybe make use of that.  */
1233 #define SLOW_BYTE_ACCESS 1
1234
1235 /* Define this macro if it is as good or better to call a constant
1236    function address than to call an address kept in a register.  */
1237 #define NO_FUNCTION_CSE
1238 \f
1239 /* Section selection.  */
1240
1241 #define TEXT_SECTION_ASM_OP     "\t.section .text"
1242 #define DATA_SECTION_ASM_OP     "\t.section .data"
1243 #define BSS_SECTION_ASM_OP      "\t.section .bss"
1244
1245 /* Define this macro if jump tables (for tablejump insns) should be
1246    output in the text section, along with the assembler instructions.
1247    Otherwise, the readonly data section is used.
1248    This macro is irrelevant if there is no separate readonly data section.  */
1249 #define JUMP_TABLES_IN_TEXT_SECTION (flag_pic)
1250 \f
1251 /* Position Independent Code.  */
1252
1253 /* The register number of the register used to address a table of static
1254    data addresses in memory.  In some cases this register is defined by a
1255    processor's ``application binary interface'' (ABI).  When this macro
1256    is defined, RTL is generated for this register once, as with the stack
1257    pointer and frame pointer registers.  If this macro is not defined, it
1258    is up to the machine-dependent files to allocate such a register (if
1259    necessary).  */
1260 #define PIC_OFFSET_TABLE_REGNUM 12
1261
1262 /* Define this macro if the register defined by PIC_OFFSET_TABLE_REGNUM is
1263    clobbered by calls.  Do not define this macro if PIC_OFFSET_TABLE_REGNUM
1264    is not defined.  */
1265 /* This register is call-saved on the M32R.  */
1266 /*#define PIC_OFFSET_TABLE_REG_CALL_CLOBBERED*/
1267
1268 /* A C expression that is nonzero if X is a legitimate immediate
1269    operand on the target machine when generating position independent code.
1270    You can assume that X satisfies CONSTANT_P, so you need not
1271    check this.  You can also assume `flag_pic' is true, so you need not
1272    check it either.  You need not define this macro if all constants
1273    (including SYMBOL_REF) can be immediate operands when generating
1274    position independent code.  */
1275 #define LEGITIMATE_PIC_OPERAND_P(X) m32r_legitimate_pic_operand_p (X)
1276 \f
1277 /* Control the assembler format that we output.  */
1278
1279 /* A C string constant describing how to begin a comment in the target
1280    assembler language.  The compiler assumes that the comment will
1281    end at the end of the line.  */
1282 #define ASM_COMMENT_START ";"
1283
1284 /* Output to assembler file text saying following lines
1285    may contain character constants, extra white space, comments, etc.  */
1286 #define ASM_APP_ON ""
1287
1288 /* Output to assembler file text saying following lines
1289    no longer contain unusual constructs.  */
1290 #define ASM_APP_OFF ""
1291
1292 /* Globalizing directive for a label.  */
1293 #define GLOBAL_ASM_OP "\t.global\t"
1294
1295 /* We do not use DBX_LINES_FUNCTION_RELATIVE or
1296    dbxout_stab_value_internal_label_diff here because
1297    we need to use .debugsym for the line label.  */
1298
1299 #define DBX_OUTPUT_SOURCE_LINE(file, line, counter)                     \
1300   do                                                                    \
1301     {                                                                   \
1302       const char * begin_label =                                        \
1303         XSTR (XEXP (DECL_RTL (current_function_decl), 0), 0);           \
1304       char label[64];                                                   \
1305       ASM_GENERATE_INTERNAL_LABEL (label, "LM", counter);               \
1306                                                                         \
1307       dbxout_begin_stabn_sline (line);                                  \
1308       assemble_name (file, label);                                      \
1309       putc ('-', file);                                                 \
1310       assemble_name (file, begin_label);                                \
1311       fputs ("\n\t.debugsym ", file);                                   \
1312       assemble_name (file, label);                                      \
1313       putc ('\n', file);                                                \
1314       counter += 1;                                                     \
1315      }                                                                  \
1316   while (0)
1317
1318 /* How to refer to registers in assembler output.
1319    This sequence is indexed by compiler's hard-register-number (see above).  */
1320 #ifndef SUBTARGET_REGISTER_NAMES
1321 #define SUBTARGET_REGISTER_NAMES
1322 #endif
1323
1324 #define REGISTER_NAMES                                  \
1325 {                                                       \
1326   "r0", "r1", "r2", "r3", "r4", "r5", "r6", "r7",       \
1327   "r8", "r9", "r10", "r11", "r12", "fp", "lr", "sp",    \
1328   "ap", "cbit", "a0"                                    \
1329   SUBTARGET_REGISTER_NAMES                              \
1330 }
1331
1332 /* If defined, a C initializer for an array of structures containing
1333    a name and a register number.  This macro defines additional names
1334    for hard registers, thus allowing the `asm' option in declarations
1335    to refer to registers using alternate names.  */
1336 #ifndef SUBTARGET_ADDITIONAL_REGISTER_NAMES
1337 #define SUBTARGET_ADDITIONAL_REGISTER_NAMES
1338 #endif
1339
1340 #define ADDITIONAL_REGISTER_NAMES       \
1341 {                                       \
1342   /*{ "gp", GP_REGNUM },*/              \
1343   { "r13", FRAME_POINTER_REGNUM },      \
1344   { "r14", RETURN_ADDR_REGNUM },        \
1345   { "r15", STACK_POINTER_REGNUM },      \
1346   SUBTARGET_ADDITIONAL_REGISTER_NAMES   \
1347 }
1348
1349 /* A C expression which evaluates to true if CODE is a valid
1350    punctuation character for use in the `PRINT_OPERAND' macro.  */
1351 extern char m32r_punct_chars[256];
1352 #define PRINT_OPERAND_PUNCT_VALID_P(CHAR) \
1353   m32r_punct_chars[(unsigned char) (CHAR)]
1354
1355 /* Print operand X (an rtx) in assembler syntax to file FILE.
1356    CODE is a letter or dot (`z' in `%z0') or 0 if no letter was specified.
1357    For `%' followed by punctuation, CODE is the punctuation and X is null.  */
1358 #define PRINT_OPERAND(FILE, X, CODE) \
1359   m32r_print_operand (FILE, X, CODE)
1360
1361 /* A C compound statement to output to stdio stream STREAM the
1362    assembler syntax for an instruction operand that is a memory
1363    reference whose address is ADDR.  ADDR is an RTL expression.  */
1364 #define PRINT_OPERAND_ADDRESS(FILE, ADDR) \
1365   m32r_print_operand_address (FILE, ADDR)
1366
1367 /* If defined, C string expressions to be used for the `%R', `%L',
1368    `%U', and `%I' options of `asm_fprintf' (see `final.c').  These
1369    are useful when a single `md' file must support multiple assembler
1370    formats.  In that case, the various `tm.h' files can define these
1371    macros differently.  */
1372 #define REGISTER_PREFIX         ""
1373 #define LOCAL_LABEL_PREFIX      ".L"
1374 #define USER_LABEL_PREFIX       ""
1375 #define IMMEDIATE_PREFIX        "#"
1376
1377 /* This is how to output an element of a case-vector that is absolute.  */
1378 #define ASM_OUTPUT_ADDR_VEC_ELT(FILE, VALUE)            \
1379    do                                                   \
1380      {                                                  \
1381        char label[30];                                  \
1382        ASM_GENERATE_INTERNAL_LABEL (label, "L", VALUE); \
1383        fprintf (FILE, "\t.word\t");                     \
1384        assemble_name (FILE, label);                     \
1385        fprintf (FILE, "\n");                            \
1386      }                                                  \
1387   while (0)
1388
1389 /* This is how to output an element of a case-vector that is relative.  */
1390 #define ASM_OUTPUT_ADDR_DIFF_ELT(FILE, BODY, VALUE, REL)\
1391   do                                                    \
1392     {                                                   \
1393       char label[30];                                   \
1394       ASM_GENERATE_INTERNAL_LABEL (label, "L", VALUE);  \
1395       fprintf (FILE, "\t.word\t");                      \
1396       assemble_name (FILE, label);                      \
1397       fprintf (FILE, "-");                              \
1398       ASM_GENERATE_INTERNAL_LABEL (label, "L", REL);    \
1399       assemble_name (FILE, label);                      \
1400       fprintf (FILE, "\n");                             \
1401     }                                                   \
1402   while (0)
1403
1404 /* The desired alignment for the location counter at the beginning
1405    of a loop.  */
1406 /* On the M32R, align loops to 32 byte boundaries (cache line size)
1407    if -malign-loops.  */
1408 #define LOOP_ALIGN(LABEL) (TARGET_ALIGN_LOOPS ? 5 : 0)
1409
1410 /* Define this to be the maximum number of insns to move around when moving
1411    a loop test from the top of a loop to the bottom
1412    and seeing whether to duplicate it.  The default is thirty.
1413
1414    Loop unrolling currently doesn't like this optimization, so
1415    disable doing if we are unrolling loops and saving space.  */
1416 #define LOOP_TEST_THRESHOLD (optimize_size                              \
1417                              && !flag_unroll_loops                      \
1418                              && !flag_unroll_all_loops ? 2 : 30)
1419
1420 /* This is how to output an assembler line
1421    that says to advance the location counter
1422    to a multiple of 2**LOG bytes.  */
1423 /* .balign is used to avoid confusion.  */
1424 #define ASM_OUTPUT_ALIGN(FILE,LOG)                      \
1425   do                                                    \
1426     {                                                   \
1427       if ((LOG) != 0)                                   \
1428         fprintf (FILE, "\t.balign %d\n", 1 << (LOG));   \
1429     }                                                   \
1430   while (0)
1431
1432 /* Like `ASM_OUTPUT_COMMON' except takes the required alignment as a
1433    separate, explicit argument.  If you define this macro, it is used in
1434    place of `ASM_OUTPUT_COMMON', and gives you more flexibility in
1435    handling the required alignment of the variable.  The alignment is
1436    specified as the number of bits.  */
1437
1438 #define SCOMMON_ASM_OP "\t.scomm\t"
1439
1440 #undef  ASM_OUTPUT_ALIGNED_COMMON
1441 #define ASM_OUTPUT_ALIGNED_COMMON(FILE, NAME, SIZE, ALIGN)              \
1442   do                                                                    \
1443     {                                                                   \
1444       if (! TARGET_SDATA_NONE                                           \
1445           && (SIZE) > 0 && (SIZE) <= g_switch_value)                    \
1446         fprintf ((FILE), "%s", SCOMMON_ASM_OP);                         \
1447       else                                                              \
1448         fprintf ((FILE), "%s", COMMON_ASM_OP);                          \
1449       assemble_name ((FILE), (NAME));                                   \
1450       fprintf ((FILE), ",%u,%u\n", (int)(SIZE), (ALIGN) / BITS_PER_UNIT);\
1451     }                                                                   \
1452   while (0)
1453
1454 #define ASM_OUTPUT_ALIGNED_BSS(FILE, DECL, NAME, SIZE, ALIGN)           \
1455   do                                                                    \
1456     {                                                                   \
1457       if (! TARGET_SDATA_NONE                                           \
1458           && (SIZE) > 0 && (SIZE) <= g_switch_value)                    \
1459         switch_to_section (get_named_section (NULL, ".sbss", 0));       \
1460       else                                                              \
1461         switch_to_section (bss_section);                                \
1462       ASM_OUTPUT_ALIGN (FILE, floor_log2 (ALIGN / BITS_PER_UNIT));      \
1463       last_assemble_variable_decl = DECL;                               \
1464       ASM_DECLARE_OBJECT_NAME (FILE, NAME, DECL);                       \
1465       ASM_OUTPUT_SKIP (FILE, SIZE ? SIZE : 1);                          \
1466     }                                                                   \
1467   while (0)
1468 \f
1469 /* Debugging information.  */
1470
1471 /* Generate DBX and DWARF debugging information.  */
1472 #define DBX_DEBUGGING_INFO    1
1473 #define DWARF2_DEBUGGING_INFO 1
1474
1475 /* Use DWARF2 debugging info by default.  */
1476 #undef  PREFERRED_DEBUGGING_TYPE
1477 #define PREFERRED_DEBUGGING_TYPE DWARF2_DEBUG
1478
1479 /* Turn off splitting of long stabs.  */
1480 #define DBX_CONTIN_LENGTH 0
1481 \f
1482 /* Miscellaneous.  */
1483
1484 /* Specify the machine mode that this machine uses
1485    for the index in the tablejump instruction.  */
1486 #define CASE_VECTOR_MODE (flag_pic ? SImode : Pmode)
1487
1488 /* Define if operations between registers always perform the operation
1489    on the full register even if a narrower mode is specified.  */
1490 #define WORD_REGISTER_OPERATIONS
1491
1492 /* Define if loading in MODE, an integral mode narrower than BITS_PER_WORD
1493    will either zero-extend or sign-extend.  The value of this macro should
1494    be the code that says which one of the two operations is implicitly
1495    done, UNKNOWN if none.  */
1496 #define LOAD_EXTEND_OP(MODE) ZERO_EXTEND
1497
1498 /* Max number of bytes we can move from memory
1499    to memory in one reasonably fast instruction.  */
1500 #define MOVE_MAX 4
1501
1502 /* Define this to be nonzero if shift instructions ignore all but the low-order
1503    few bits.  */
1504 #define SHIFT_COUNT_TRUNCATED 1
1505
1506 /* Value is 1 if truncating an integer of INPREC bits to OUTPREC bits
1507    is done just by pretending it is already truncated.  */
1508 #define TRULY_NOOP_TRUNCATION(OUTPREC, INPREC) 1
1509
1510 /* Specify the machine mode that pointers have.
1511    After generation of rtl, the compiler makes no further distinction
1512    between pointers and any other objects of this machine mode.  */
1513 /* ??? The M32R doesn't have full 32-bit pointers, but making this PSImode has
1514    its own problems (you have to add extendpsisi2 and truncsipsi2).
1515    Try to avoid it.  */
1516 #define Pmode SImode
1517
1518 /* A function address in a call instruction.  */
1519 #define FUNCTION_MODE SImode
1520 \f
1521 /* Define the information needed to generate branch and scc insns.  This is
1522    stored from the compare operation.  Note that we can't use "rtx" here
1523    since it hasn't been defined!  */
1524 extern struct rtx_def * m32r_compare_op0;
1525 extern struct rtx_def * m32r_compare_op1;
1526
1527 /* M32R function types.  */
1528 enum m32r_function_type
1529 {
1530   M32R_FUNCTION_UNKNOWN, M32R_FUNCTION_NORMAL, M32R_FUNCTION_INTERRUPT
1531 };
1532
1533 #define M32R_INTERRUPT_P(TYPE) ((TYPE) == M32R_FUNCTION_INTERRUPT)
1534
1535 /* The maximum number of bytes to copy using pairs of load/store instructions.
1536    If a block is larger than this then a loop will be generated to copy
1537    MAX_MOVE_BYTES chunks at a time.  The value of 32 is a semi-arbitrary choice.
1538    A customer uses Dhrystome as their benchmark, and Dhrystone has a 31 byte
1539    string copy in it.  */
1540 #define MAX_MOVE_BYTES 32