1 /* score.h for Sunplus S+CORE processor
2 Copyright (C) 2005, 2007, 2008, 2009 Free Software Foundation, Inc.
3 Contributed by Sunnorth.
5 This file is part of GCC.
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.
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.
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/>. */
21 #include "score-conv.h"
23 /* Controlling the Compilation Driver. */
24 #undef SWITCH_TAKES_ARG
25 #define SWITCH_TAKES_ARG(CHAR) \
26 (DEFAULT_SWITCH_TAKES_ARG (CHAR) || (CHAR) == 'G')
29 #define CPP_SPEC "%{mscore3:-D__score3__} %{G*}"
32 #define CC1_SPEC "%{!mel:-meb} %{mel:-mel } \
33 %{!mscore*:-mscore7} \
35 %{mscore3d:-mscore3d} \
37 %{mscore7d:-mscore7d} \
41 #define ASM_SPEC "%{!mel:-EB} %{mel:-EL} \
42 %{!mscore*:-march=score7} \
43 %{mscore7:-march=score7} \
44 %{mscore7d:-march=score7} \
45 %{mscore3:-march=score3} \
46 %{mscore3d:-march=score3} \
47 %{march=score5:-march=score7} \
48 %{march=score5u:-march=score7} \
49 %{march=score7:-march=score7} \
50 %{march=score7d:-march=score7} \
51 %{march=score3:-march=score3} \
52 %{march=score3d:-march=score3} \
56 #define LINK_SPEC "%{!mel:-EB} %{mel:-EL} \
57 %{!mscore*:-mscore7_elf} \
58 %{mscore7:-mscore7_elf} \
59 %{mscore7d:-mscore7_elf} \
60 %{mscore3:-mscore3_elf} \
61 %{mscore3d:-mscore3_elf} \
62 %{march=score5:-mscore7_elf} \
63 %{march=score5u:-mscore7_elf} \
64 %{march=score7:-mscore7_elf} \
65 %{march=score7d:-mscore7_elf} \
66 %{march=score3:-mscore3_elf} \
67 %{march=score3d:-mscore3_elf} \
70 /* Run-time Target Specification. */
71 #define TARGET_CPU_CPP_BUILTINS() \
73 builtin_define ("SUNPLUS"); \
74 builtin_define ("__SCORE__"); \
75 builtin_define ("__score__"); \
76 if (TARGET_LITTLE_ENDIAN) \
77 builtin_define ("__scorele__"); \
79 builtin_define ("__scorebe__"); \
81 builtin_define ("__score5__"); \
83 builtin_define ("__score5u__"); \
85 builtin_define ("__score7__"); \
87 builtin_define ("__score7d__"); \
89 builtin_define ("__score3__"); \
91 builtin_define ("__score3d__"); \
94 #define TARGET_DEFAULT 0
96 #define SCORE_GCC_VERSION "1.6"
98 #define TARGET_VERSION \
99 fprintf (stderr, "Sunplus S+core rev=%s", SCORE_GCC_VERSION);
101 #define OVERRIDE_OPTIONS score_override_options ()
103 /* Show we can debug even without a frame pointer. */
104 #define CAN_DEBUG_WITHOUT_FP
106 /* Target machine storage layout. */
107 #define BITS_BIG_ENDIAN 0
108 #define BYTES_BIG_ENDIAN (TARGET_LITTLE_ENDIAN == 0)
109 #define WORDS_BIG_ENDIAN (TARGET_LITTLE_ENDIAN == 0)
111 /* Define this to set the endianness to use in libgcc2.c, which can
112 not depend on target_flags. */
113 #if defined(__scorele__)
114 #define LIBGCC2_WORDS_BIG_ENDIAN 0
116 #define LIBGCC2_WORDS_BIG_ENDIAN 1
119 /* Width of a word, in units (bytes). */
120 #define UNITS_PER_WORD 4
122 /* Define this macro if it is advisable to hold scalars in registers
123 in a wider mode than that declared by the program. In such cases,
124 the value is constrained to be within the bounds of the declared
125 type, but kept valid in the wider mode. The signedness of the
126 extension may differ from that of the type. */
127 #define PROMOTE_MODE(MODE, UNSIGNEDP, TYPE) \
128 if (GET_MODE_CLASS (MODE) == MODE_INT \
129 && GET_MODE_SIZE (MODE) < UNITS_PER_WORD) \
132 /* Allocation boundary (in *bits*) for storing arguments in argument list. */
133 #define PARM_BOUNDARY BITS_PER_WORD
134 #define STACK_BOUNDARY BITS_PER_WORD
136 /* Allocation boundary (in *bits*) for the code of a function. */
137 #define FUNCTION_BOUNDARY BITS_PER_WORD
139 /* There is no point aligning anything to a rounder boundary than this. */
140 #define BIGGEST_ALIGNMENT LONG_DOUBLE_TYPE_SIZE
142 /* If defined, a C expression to compute the alignment for a static
143 variable. TYPE is the data type, and ALIGN is the alignment that
144 the object would ordinarily have. The value of this macro is used
145 instead of that alignment to align the object.
147 If this macro is not defined, then ALIGN is used.
149 One use of this macro is to increase alignment of medium-size
150 data to make it all fit in fewer cache lines. Another is to
151 cause character arrays to be word-aligned so that `strcpy' calls
152 that copy constants to character arrays can be done inline. */
153 #define DATA_ALIGNMENT(TYPE, ALIGN) \
154 ((((ALIGN) < BITS_PER_WORD) \
155 && (TREE_CODE (TYPE) == ARRAY_TYPE \
156 || TREE_CODE (TYPE) == UNION_TYPE \
157 || TREE_CODE (TYPE) == RECORD_TYPE)) ? BITS_PER_WORD : (ALIGN))
159 /* If defined, a C expression to compute the alignment given to a
160 constant that is being placed in memory. EXP is the constant
161 and ALIGN is the alignment that the object would ordinarily have.
162 The value of this macro is used instead of that alignment to align
165 If this macro is not defined, then ALIGN is used.
167 The typical use of this macro is to increase alignment for string
168 constants to be word aligned so that `strcpy' calls that copy
169 constants can be done inline. */
170 #define CONSTANT_ALIGNMENT(EXP, ALIGN) \
171 ((TREE_CODE (EXP) == STRING_CST || TREE_CODE (EXP) == CONSTRUCTOR) \
172 && (ALIGN) < BITS_PER_WORD ? BITS_PER_WORD : (ALIGN))
174 /* If defined, a C expression to compute the alignment for a local
175 variable. TYPE is the data type, and ALIGN is the alignment that
176 the object would ordinarily have. The value of this macro is used
177 instead of that alignment to align the object.
179 If this macro is not defined, then ALIGN is used.
181 One use of this macro is to increase alignment of medium-size
182 data to make it all fit in fewer cache lines. */
183 #define LOCAL_ALIGNMENT(TYPE, ALIGN) \
184 ((TREE_CODE (TYPE) == ARRAY_TYPE \
185 && TYPE_MODE (TREE_TYPE (TYPE)) == QImode \
186 && (ALIGN) < BITS_PER_WORD) ? BITS_PER_WORD : (ALIGN))
188 /* Alignment of field after `int : 0' in a structure. */
189 #define EMPTY_FIELD_BOUNDARY 32
191 /* All accesses must be aligned. */
192 #define STRICT_ALIGNMENT 1
194 /* Score requires that structure alignment is affected by bitfields. */
195 #define PCC_BITFIELD_TYPE_MATTERS 1
197 /* long double is not a fixed mode, but the idea is that, if we
198 support long double, we also want a 128-bit integer type. */
199 #define MAX_FIXED_MODE_SIZE LONG_DOUBLE_TYPE_SIZE
201 /* Layout of Data Type. */
202 /* Set the sizes of the core types. */
203 #define INT_TYPE_SIZE 32
204 #define SHORT_TYPE_SIZE 16
205 #define LONG_TYPE_SIZE 32
206 #define LONG_LONG_TYPE_SIZE 64
207 #define CHAR_TYPE_SIZE 8
208 #define FLOAT_TYPE_SIZE 32
209 #define DOUBLE_TYPE_SIZE 64
210 #define LONG_DOUBLE_TYPE_SIZE 64
212 /* Define this as 1 if `char' should by default be signed; else as 0. */
213 #undef DEFAULT_SIGNED_CHAR
214 #define DEFAULT_SIGNED_CHAR 1
216 /* Default definitions for size_t and ptrdiff_t. */
217 #define SIZE_TYPE "unsigned int"
219 #define UINTPTR_TYPE "long unsigned int"
224 - 32 integer registers
225 - 16 control registers (cond)
226 - 16 special registers (ceh/cel/cnt/lcr/scr/arg/fp)
227 - 32 coprocessors 1 registers
228 - 32 coprocessors 2 registers
229 - 32 coprocessors 3 registers. */
230 #define FIRST_PSEUDO_REGISTER 160
232 /* By default, fix the kernel registers (r30 and r31), the global
233 pointer (r28) and the stack pointer (r0). This can change
234 depending on the command-line options.
236 Regarding coprocessor registers: without evidence to the contrary,
237 it's best to assume that each coprocessor register has a unique
238 use. This can be overridden, in, e.g., override_options() or
239 CONDITIONAL_REGISTER_USAGE should the assumption be inappropriate
240 for a particular target. */
242 /* Control Registers, use mfcr/mtcr insn
260 Custom Engine Register, use mfce/mtce
264 Special-Purpose Register, use mfsr/mtsr
269 53 ARG_POINTER_REGNUM
270 54 FRAME_POINTER_REGNUM
271 but Control register have 32 registers, cr16-cr31. */
272 #define FIXED_REGISTERS \
274 /* General Purpose Registers */ \
275 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, \
276 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, \
277 /* Control Registers */ \
278 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, \
279 /* CEH/ CEL/ CNT/ LCR/ SCR / ARG_POINTER_REGNUM/ FRAME_POINTER_REGNUM */\
280 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, \
281 /* CP 1 Registers */ \
282 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, \
283 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, \
284 /* CP 2 Registers */ \
285 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, \
286 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, \
287 /* CP 3 Registers */ \
288 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, \
289 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, \
292 #define CALL_USED_REGISTERS \
294 /* General purpose register */ \
295 1, 1, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, \
296 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, \
297 /* Control Registers */ \
298 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, \
299 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, \
300 /* CP 1 Registers */ \
301 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, \
302 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, \
303 /* CP 2 Registers */ \
304 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, \
305 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, \
306 /* CP 3 Registers */ \
307 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, \
308 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, \
311 #define REG_ALLOC_ORDER \
312 { 0, 1, 6, 7, 8, 9, 10, 11, 4, 5, 22, 23, 24, 25, 26, 27, \
313 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 28, 29, 30, 31, 2, 3, \
314 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, \
315 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, \
316 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, \
317 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, \
318 96, 97, 98, 99,100,101,102,103,104,105,106,107,108,109,110,111, \
319 112,113,114,115,116,117,118,119,120,121,122,123,124,125,126,127, \
320 128,129,130,131,132,133,134,135,136,137,138,139,140,141,142,143, \
321 144,145,146,147,148,149,150,151,152,153,154,155,156,157,158,159 }
323 /* Macro to conditionally modify fixed_regs/call_used_regs. */
324 #define PIC_OFFSET_TABLE_REGNUM 29
326 #define CONDITIONAL_REGISTER_USAGE \
329 fixed_regs[PIC_OFFSET_TABLE_REGNUM] = \
330 call_used_regs[PIC_OFFSET_TABLE_REGNUM] = 0; \
333 #define HARD_REGNO_NREGS(REGNO, MODE) \
334 ((GET_MODE_SIZE (MODE) + UNITS_PER_WORD - 1) / UNITS_PER_WORD)
336 /* Return true if REGNO is suitable for holding a quantity of type MODE. */
337 #define HARD_REGNO_MODE_OK(REGNO, MODE) score_hard_regno_mode_ok (REGNO, MODE)
339 /* Value is 1 if it is a good idea to tie two pseudo registers
340 when one has mode MODE1 and one has mode MODE2.
341 If HARD_REGNO_MODE_OK could produce different values for MODE1 and MODE2,
342 for any hard reg, then this must be 0 for correct output. */
343 #define MODES_TIEABLE_P(MODE1, MODE2) \
344 ((GET_MODE_CLASS (MODE1) == MODE_FLOAT \
345 || GET_MODE_CLASS (MODE1) == MODE_COMPLEX_FLOAT) \
346 == (GET_MODE_CLASS (MODE2) == MODE_FLOAT \
347 || GET_MODE_CLASS (MODE2) == MODE_COMPLEX_FLOAT))
349 /* Register Classes. */
350 /* Define the classes of registers for register constraints in the
351 machine description. Also define ranges of constants. */
355 G16_REGS, /* r0 ~ r15 */
356 G32_REGS, /* r0 ~ r31 */
357 T32_REGS, /* r8 ~ r11 | r22 ~ r27 */
361 CE_REGS, /* hi + lo */
366 SP_REGS, /* cnt + lcb + scb */
368 CR_REGS, /* cr0 - cr15 */
373 CPA_REGS, /* cp1 + cp2 + cp3 */
379 #define N_REG_CLASSES ((int) LIM_REG_CLASSES)
381 #define GENERAL_REGS G32_REGS
383 /* Give names of register classes as strings for dump file. */
384 #define REG_CLASS_NAMES \
410 /* Define which registers fit in which classes. */
411 #define REG_CLASS_CONTENTS \
413 /* NO_REGS/G16/G32/T32 */ \
414 { 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000}, \
415 { 0x0000ffff, 0x00000000, 0x00000000, 0x00000000, 0x00000000}, \
416 { 0xffffffff, 0x00000000, 0x00000000, 0x00000000, 0x00000000}, \
417 { 0x0fc00f00, 0x00000000, 0x00000000, 0x00000000, 0x00000000}, \
419 { 0x00000000, 0x00010000, 0x00000000, 0x00000000, 0x00000000}, \
420 { 0x00000000, 0x00020000, 0x00000000, 0x00000000, 0x00000000}, \
421 { 0x00000000, 0x00030000, 0x00000000, 0x00000000, 0x00000000}, \
422 /* CN/LC/SC/SP/CR */ \
423 { 0x00000000, 0x00040000, 0x00000000, 0x00000000, 0x00000000}, \
424 { 0x00000000, 0x00080000, 0x00000000, 0x00000000, 0x00000000}, \
425 { 0x00000000, 0x00100000, 0x00000000, 0x00000000, 0x00000000}, \
426 { 0x00000000, 0x001c0000, 0x00000000, 0x00000000, 0x00000000}, \
427 { 0x00000000, 0x0000ffff, 0x00000000, 0x00000000, 0x00000000}, \
428 /* CP1/CP2/CP3/CPA */ \
429 { 0x00000000, 0x00000000, 0xffffffff, 0x00000000, 0x00000000}, \
430 { 0x00000000, 0x00000000, 0x00000000, 0xffffffff, 0x00000000}, \
431 { 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xffffffff}, \
432 { 0x00000000, 0x00000000, 0xffffffff, 0xffffffff, 0xffffffff}, \
434 { 0xffffffff, 0x001fffff, 0xffffffff, 0xffffffff, 0xffffffff}, \
437 /* A C expression whose value is a register class containing hard
438 register REGNO. In general there is more that one such class;
439 choose a class which is "minimal", meaning that no smaller class
440 also contains the register. */
441 #define REGNO_REG_CLASS(REGNO) score_reg_class (REGNO)
443 /* The following macro defines cover classes for Integrated Register
444 Allocator. Cover classes is a set of non-intersected register
445 classes covering all hard registers used for register allocation
446 purpose. Any move between two registers of a cover class should be
447 cheaper than load or store of the registers. The macro value is
448 array of register classes with LIM_REG_CLASSES used as the end
450 #define IRA_COVER_CLASSES \
452 G32_REGS, CE_REGS, SP_REGS, LIM_REG_CLASSES \
455 /* A macro whose definition is the name of the class to which a
456 valid base register must belong. A base register is one used in
457 an address which is the register value plus a displacement. */
458 #define BASE_REG_CLASS G16_REGS
460 /* The class value for index registers. */
461 #define INDEX_REG_CLASS NO_REGS
463 extern enum reg_class score_char_to_class[256];
464 #define REG_CLASS_FROM_LETTER(C) score_char_to_class[(unsigned char) (C)]
466 /* Addressing modes, and classification of registers for them. */
467 #define REGNO_MODE_OK_FOR_BASE_P(REGNO, MODE) \
468 score_regno_mode_ok_for_base_p (REGNO, 1)
470 #define REGNO_OK_FOR_INDEX_P(NUM) 0
472 #define PREFERRED_RELOAD_CLASS(X, CLASS) \
473 score_preferred_reload_class (X, CLASS)
475 /* If we need to load shorts byte-at-a-time, then we need a scratch. */
476 #define SECONDARY_INPUT_RELOAD_CLASS(CLASS, MODE, X) \
477 score_secondary_reload_class (CLASS, MODE, X)
479 /* Return the register class of a scratch register needed to copy IN into
480 or out of a register in CLASS in MODE. If it can be done directly,
481 NO_REGS is returned. */
482 #define SECONDARY_OUTPUT_RELOAD_CLASS(CLASS, MODE, X) \
483 score_secondary_reload_class (CLASS, MODE, X)
485 /* Return the maximum number of consecutive registers
486 needed to represent mode MODE in a register of class CLASS. */
487 #define CLASS_MAX_NREGS(CLASS, MODE) \
488 ((GET_MODE_SIZE (MODE) + UNITS_PER_WORD - 1) / UNITS_PER_WORD)
490 #define CANNOT_CHANGE_MODE_CLASS(FROM, TO, CLASS) \
491 (GET_MODE_SIZE (FROM) != GET_MODE_SIZE (TO) \
492 ? reg_classes_intersect_p (HI_REG, (CLASS)) : 0)
494 /* The letters I, J, K, L, M, N, O, and P in a register constraint
495 string can be used to stand for particular ranges of immediate
496 operands. This macro defines what the ranges are. C is the
497 letter, and VALUE is a constant value. Return 1 if VALUE is
498 in the range specified by C. */
499 #define CONST_OK_FOR_LETTER_P(VALUE, C) score_const_ok_for_letter_p (VALUE, C)
501 /* Similar, but for floating constants, and defining letters G and H.
502 Here VALUE is the CONST_DOUBLE rtx itself. */
504 #define CONST_DOUBLE_OK_FOR_LETTER_P(VALUE, C) \
505 ((C) == 'G' && (VALUE) == CONST0_RTX (GET_MODE (VALUE)))
507 /* Letters in the range `Q' through `U' may be defined in a
508 machine-dependent fashion to stand for arbitrary operand types.
509 The machine description macro `EXTRA_CONSTRAINT' is passed the
510 operand as its first argument and the constraint letter as its
512 #define EXTRA_CONSTRAINT(VALUE, C) score_extra_constraint (VALUE, C)
514 /* Basic Stack Layout. */
515 /* Stack layout; function entry, exit and calling. */
516 #define STACK_GROWS_DOWNWARD
518 #define STACK_PUSH_CODE PRE_DEC
519 #define STACK_POP_CODE POST_INC
521 /* The offset of the first local variable from the beginning of the frame.
522 See compute_frame_size for details about the frame layout. */
523 #define STARTING_FRAME_OFFSET crtl->outgoing_args_size
525 /* The argument pointer always points to the first argument. */
526 #define FIRST_PARM_OFFSET(FUNDECL) 0
528 /* A C expression whose value is RTL representing the value of the return
529 address for the frame COUNT steps up from the current frame. */
530 #define RETURN_ADDR_RTX(count, frame) score_return_addr (count, frame)
532 /* Pick up the return address upon entry to a procedure. */
533 #define INCOMING_RETURN_ADDR_RTX gen_rtx_REG (VOIDmode, RA_REGNUM)
535 /* Exception handling Support. */
536 /* Use r0 to r3 to pass exception handling information. */
537 #define EH_RETURN_DATA_REGNO(N) \
538 ((N) < 4 ? (N) + ARG_REG_FIRST : INVALID_REGNUM)
540 /* The register that holds the return address in exception handlers. */
541 #define EH_RETURN_STACKADJ_RTX gen_rtx_REG (Pmode, EH_REGNUM)
543 /* Registers That Address the Stack Frame. */
544 /* Register to use for pushing function arguments. */
545 #define STACK_POINTER_REGNUM SP_REGNUM
547 /* These two registers don't really exist: they get eliminated to either
548 the stack or hard frame pointer. */
549 #define FRAME_POINTER_REGNUM 53
551 /* we use r2 as the frame pointer. */
552 #define HARD_FRAME_POINTER_REGNUM FP_REGNUM
554 #define ARG_POINTER_REGNUM 54
556 /* Register in which static-chain is passed to a function. */
557 #define STATIC_CHAIN_REGNUM 23
559 /* Elimination Frame Pointer and Arg Pointer */
561 #define ELIMINABLE_REGS \
562 {{ ARG_POINTER_REGNUM, STACK_POINTER_REGNUM}, \
563 { ARG_POINTER_REGNUM, HARD_FRAME_POINTER_REGNUM}, \
564 { FRAME_POINTER_REGNUM, STACK_POINTER_REGNUM}, \
565 { FRAME_POINTER_REGNUM, HARD_FRAME_POINTER_REGNUM}}
567 #define INITIAL_ELIMINATION_OFFSET(FROM, TO, OFFSET) \
568 (OFFSET) = score_initial_elimination_offset ((FROM), (TO))
570 /* Passing Function Arguments on the Stack. */
571 /* Allocate stack space for arguments at the beginning of each function. */
572 #define ACCUMULATE_OUTGOING_ARGS 1
574 /* reserve stack space for all argument registers. */
575 #define REG_PARM_STACK_SPACE(FNDECL) UNITS_PER_WORD
577 /* Define this if it is the responsibility of the caller to
578 allocate the area reserved for arguments passed in registers.
579 If `ACCUMULATE_OUTGOING_ARGS' is also defined, the only effect
580 of this macro is to determine whether the space is included in
581 `crtl->outgoing_args_size'. */
582 #define OUTGOING_REG_PARM_STACK_SPACE(FNTYPE) 1
584 #define RETURN_POPS_ARGS(FUNDECL, FUNTYPE, STACK_SIZE) 0
586 /* Passing Arguments in Registers */
587 /* Determine where to put an argument to a function.
588 Value is zero to push the argument on the stack,
589 or a hard register in which to store the argument.
591 MODE is the argument's machine mode.
592 TYPE is the data type of the argument (as a tree).
593 This is null for libcalls where that information may
595 CUM is a variable of type CUMULATIVE_ARGS which gives info about
596 the preceding args and about the function being called.
597 NAMED is nonzero if this argument is a named parameter
598 (otherwise it is an extra parameter matching an ellipsis). */
599 #define FUNCTION_ARG(CUM, MODE, TYPE, NAMED) \
600 score_function_arg (&CUM, MODE, TYPE, NAMED)
602 /* A C type for declaring a variable that is used as the first argument of
603 `FUNCTION_ARG' and other related values. For some target machines, the
604 type `int' suffices and can hold the number of bytes of argument so far. */
605 typedef struct score_args
607 unsigned int arg_number; /* how many arguments have been seen */
608 unsigned int num_gprs; /* number of gprs in use */
609 unsigned int stack_words; /* number of words in stack */
612 #define CUMULATIVE_ARGS score_args_t
614 /* Initialize a variable CUM of type CUMULATIVE_ARGS
615 for a call to a function whose data type is FNTYPE.
616 For a library call, FNTYPE is 0. */
617 #define INIT_CUMULATIVE_ARGS(CUM, FNTYPE, LIBNAME, INDIRECT, n_named_args) \
618 score_init_cumulative_args (&CUM, FNTYPE, LIBNAME)
620 /* Update the data in CUM to advance over an argument
621 of mode MODE and data type TYPE.
622 (TYPE is null for libcalls where that information may not be available.) */
623 #define FUNCTION_ARG_ADVANCE(CUM, MODE, TYPE, NAMED) \
624 score_function_arg_advance (&CUM, MODE, TYPE, NAMED)
626 /* 1 if N is a possible register number for function argument passing.
627 We have no FP argument registers when soft-float. When FP registers
628 are 32 bits, we can't directly reference the odd numbered ones. */
629 #define FUNCTION_ARG_REGNO_P(REGNO) \
630 REG_CONTAIN (REGNO, ARG_REG_FIRST, ARG_REG_NUM)
632 /* How Scalar Function Values Are Returned. */
633 #define FUNCTION_VALUE(VALTYPE, FUNC) \
634 score_function_value ((VALTYPE), (FUNC), VOIDmode)
636 #define LIBCALL_VALUE(MODE) score_function_value (NULL_TREE, NULL, (MODE))
638 /* 1 if N is a possible register number for a function value. */
639 #define FUNCTION_VALUE_REGNO_P(REGNO) ((REGNO) == (ARG_REG_FIRST))
641 #define PIC_FUNCTION_ADDR_REGNUM (GP_REG_FIRST + 25)
643 /* How Large Values Are Returned. */
644 #define STRUCT_VALUE 0
646 /* Function Entry and Exit */
647 /* EXIT_IGNORE_STACK should be nonzero if, when returning from a function,
648 the stack pointer does not matter. The value is tested only in
649 functions that have frame pointers.
650 No definition is equivalent to always zero. */
651 #define EXIT_IGNORE_STACK 1
653 /* Generating Code for Profiling */
654 /* Output assembler code to FILE to increment profiler label # LABELNO
655 for profiling a function entry. */
656 #define FUNCTION_PROFILER(FILE, LABELNO) \
660 fprintf (FILE, " .set r1 \n"); \
661 fprintf (FILE, " mv r%d,r%d \n", AT_REGNUM, RA_REGNUM); \
662 fprintf (FILE, " subi r%d, %d \n", STACK_POINTER_REGNUM, 8); \
663 fprintf (FILE, " jl _mcount \n"); \
664 fprintf (FILE, " .set nor1 \n"); \
666 else if (TARGET_SCORE3) \
668 fprintf (FILE, " .set r1 \n"); \
669 fprintf (FILE, " mv! r%d,r%d \n", AT_REGNUM, RA_REGNUM); \
670 fprintf (FILE, " addi! r%d, %d \n", STACK_POINTER_REGNUM, -8);\
671 fprintf (FILE, " jl _mcount \n"); \
672 fprintf (FILE, " .set nor1 \n"); \
676 #define TRAMPOLINE_TEMPLATE(STREAM) \
680 fprintf (STREAM, "\t.set r1\n"); \
681 fprintf (STREAM, "\tmv r31, r3\n"); \
682 fprintf (STREAM, "\tbl nextinsn\n"); \
683 fprintf (STREAM, "nextinsn:\n"); \
684 fprintf (STREAM, "\tlw r1, [r3, 6*4-8]\n"); \
685 fprintf (STREAM, "\tlw r23, [r3, 6*4-4]\n"); \
686 fprintf (STREAM, "\tmv r3, r31\n"); \
687 fprintf (STREAM, "\tbr! r1\n"); \
688 fprintf (STREAM, "\tnop!\n"); \
689 fprintf (STREAM, "\t.set nor1\n"); \
691 else if (TARGET_SCORE3) \
693 fprintf (STREAM, "\t.set r1\n"); \
694 fprintf (STREAM, "\tmv! r31, r3\n"); \
695 fprintf (STREAM, "\tnop!\n"); \
696 fprintf (STREAM, "\tbl nextinsn\n"); \
697 fprintf (STREAM, "nextinsn:\n"); \
698 fprintf (STREAM, "\tlw! r1, [r3, 6*4-8]\n"); \
699 fprintf (STREAM, "\tnop!\n"); \
700 fprintf (STREAM, "\tlw r23, [r3, 6*4-4]\n"); \
701 fprintf (STREAM, "\tmv! r3, r31\n"); \
702 fprintf (STREAM, "\tnop!\n"); \
703 fprintf (STREAM, "\tbr! r1\n"); \
704 fprintf (STREAM, "\tnop!\n"); \
705 fprintf (STREAM, "\t.set nor1\n"); \
709 /* Trampolines for Nested Functions. */
710 #define TRAMPOLINE_INSNS 6
712 /* A C expression for the size in bytes of the trampoline, as an integer. */
713 #define TRAMPOLINE_SIZE (24 + GET_MODE_SIZE (ptr_mode) * 2)
715 /* A C statement to initialize the variable parts of a trampoline.
716 ADDR is an RTX for the address of the trampoline; FNADDR is an
717 RTX for the address of the nested function; STATIC_CHAIN is an
718 RTX for the static chain value that should be passed to the
719 function when it is called. */
721 #define INITIALIZE_TRAMPOLINE(ADDR, FUNC, CHAIN) \
722 score_initialize_trampoline (ADDR, FUNC, CHAIN)
724 #define HAVE_PRE_INCREMENT 1
725 #define HAVE_PRE_DECREMENT 1
726 #define HAVE_POST_INCREMENT 1
727 #define HAVE_POST_DECREMENT 1
728 #define HAVE_PRE_MODIFY_DISP 1
729 #define HAVE_POST_MODIFY_DISP 1
730 #define HAVE_PRE_MODIFY_REG 0
731 #define HAVE_POST_MODIFY_REG 0
733 /* Recognize any constant value that is a valid address. */
734 #define CONSTANT_ADDRESS_P(X) CONSTANT_P (X)
736 /* Maximum number of registers that can appear in a valid memory address. */
737 #define MAX_REGS_PER_ADDRESS 1
739 /* The macros REG_OK_FOR..._P assume that the arg is a REG rtx
740 and check its validity for a certain class.
741 We have two alternate definitions for each of them.
742 The usual definition accepts all pseudo regs; the other rejects them all.
743 The symbol REG_OK_STRICT causes the latter definition to be used.
745 Most source files want to accept pseudo regs in the hope that
746 they will get allocated to the class that the insn wants them to be in.
747 Some source files that are used after register allocation
748 need to be strict. */
749 #ifndef REG_OK_STRICT
750 #define REG_MODE_OK_FOR_BASE_P(X, MODE) \
751 score_regno_mode_ok_for_base_p (REGNO (X), 0)
753 #define REG_MODE_OK_FOR_BASE_P(X, MODE) \
754 score_regno_mode_ok_for_base_p (REGNO (X), 1)
757 #define REG_OK_FOR_INDEX_P(X) 0
759 #define LEGITIMATE_CONSTANT_P(X) 1
761 /* Condition Code Status. */
762 #define SELECT_CC_MODE(OP, X, Y) score_select_cc_mode (OP, X, Y)
764 /* Return nonzero if SELECT_CC_MODE will never return MODE for a
765 floating point inequality comparison. */
766 #define REVERSIBLE_CC_MODE(MODE) 1
768 /* Describing Relative Costs of Operations */
769 /* Compute extra cost of moving data between one register class and another. */
770 #define REGISTER_MOVE_COST(MODE, FROM, TO) \
771 score_register_move_cost (MODE, FROM, TO)
773 /* Moves to and from memory are quite expensive */
774 #define MEMORY_MOVE_COST(MODE, CLASS, TO_P) \
775 (4 + memory_move_secondary_cost ((MODE), (CLASS), (TO_P)))
777 /* Try to generate sequences that don't involve branches. */
778 #define BRANCH_COST(speed_p, predictable_p) 2
780 /* Nonzero if access to memory by bytes is slow and undesirable. */
781 #define SLOW_BYTE_ACCESS 1
783 /* Define this macro if it is as good or better to call a constant
784 function address than to call an address kept in a register. */
785 #define NO_FUNCTION_CSE 1
787 /* Dividing the Output into Sections (Texts, Data, ...). */
788 /* Define the strings to put out for each section in the object file. */
789 #define TEXT_SECTION_ASM_OP "\t.text"
790 #define DATA_SECTION_ASM_OP "\t.data"
791 #define SDATA_SECTION_ASM_OP "\t.sdata"
793 #undef READONLY_DATA_SECTION_ASM_OP
794 #define READONLY_DATA_SECTION_ASM_OP "\t.rdata"
796 /* The Overall Framework of an Assembler File */
797 /* How to start an assembler comment.
798 The leading space is important. */
799 #define ASM_COMMENT_START "#"
801 /* Output to assembler file text saying following lines
802 may contain character constants, extra white space, comments, etc. */
803 #define ASM_APP_ON "#APP\n\t.set volatile\n"
805 /* Output to assembler file text saying following lines
806 no longer contain unusual constructs. */
807 #define ASM_APP_OFF "#NO_APP\n\t.set optimize\n"
809 /* Output of Uninitialized Variables. */
810 /* This says how to define a global common symbol. */
811 #define ASM_OUTPUT_ALIGNED_DECL_COMMON(STREAM, DECL, NAME, SIZE, ALIGN) \
813 fputs ("\n\t.comm\t", STREAM); \
814 assemble_name (STREAM, NAME); \
815 fprintf (STREAM, " , " HOST_WIDE_INT_PRINT_UNSIGNED ", %u\n", \
816 SIZE, ALIGN / BITS_PER_UNIT); \
819 /* This says how to define a local common symbol (i.e., not visible to
821 #undef ASM_OUTPUT_ALIGNED_LOCAL
822 #define ASM_OUTPUT_ALIGNED_LOCAL(STREAM, NAME, SIZE, ALIGN) \
824 fputs ("\n\t.lcomm\t", STREAM); \
825 assemble_name (STREAM, NAME); \
826 fprintf (STREAM, " , " HOST_WIDE_INT_PRINT_UNSIGNED ", %u\n", \
827 SIZE, ALIGN / BITS_PER_UNIT); \
830 /* Globalizing directive for a label. */
831 #define GLOBAL_ASM_OP "\t.globl\t"
833 /* Output and Generation of Labels */
834 /* This is how to declare a function name. The actual work of
835 emitting the label is moved to function_prologue, so that we can
836 get the line number correctly emitted before the .ent directive,
837 and after any .file directives. Define as empty so that the function
838 is not declared before the .ent directive elsewhere. */
839 #undef ASM_DECLARE_FUNCTION_NAME
840 #define ASM_DECLARE_FUNCTION_NAME(FILE, NAME, DECL)
842 #undef ASM_DECLARE_OBJECT_NAME
843 #define ASM_DECLARE_OBJECT_NAME(STREAM, NAME, DECL) \
845 assemble_name (STREAM, NAME); \
846 fprintf (STREAM, ":\n"); \
849 /* This says how to output an external. It would be possible not to
850 output anything and let undefined symbol become external. However
851 the assembler uses length information on externals to allocate in
852 data/sdata bss/sbss, thereby saving exec time. */
853 #undef ASM_OUTPUT_EXTERNAL
854 #define ASM_OUTPUT_EXTERNAL(STREAM, DECL, NAME) \
855 score_output_external (STREAM, DECL, NAME)
857 /* This handles the magic '..CURRENT_FUNCTION' symbol, which means
858 'the start of the function that this code is output in'. */
859 #define ASM_OUTPUT_LABELREF(STREAM, NAME) \
860 fprintf ((STREAM), "%s", (NAME))
862 /* Local compiler-generated symbols must have a prefix that the assembler
864 #define LOCAL_LABEL_PREFIX (TARGET_SCORE7 ? "." : "$")
866 #undef ASM_GENERATE_INTERNAL_LABEL
867 #define ASM_GENERATE_INTERNAL_LABEL(LABEL, PREFIX, NUM) \
868 sprintf ((LABEL), "*%s%s%ld", (LOCAL_LABEL_PREFIX), (PREFIX), (long) (NUM))
870 /* Output of Assembler Instructions. */
871 #define REGISTER_NAMES \
872 { "r0", "r1", "r2", "r3", "r4", "r5", "r6", "r7", \
873 "r8", "r9", "r10", "r11", "r12", "r13", "r14", "r15", \
874 "r16", "r17", "r18", "r19", "r20", "r21", "r22", "r23", \
875 "r24", "r25", "r26", "r27", "r28", "r29", "r30", "r31", \
877 "cr0", "cr1", "cr2", "cr3", "cr4", "cr5", "cr6", "cr7", \
878 "cr8", "cr9", "cr10", "cr11", "cr12", "cr13", "cr14", "cr15", \
880 "ceh", "cel", "sr0", "sr1", "sr2", "_arg", "_frame", "", \
881 "cr24", "cr25", "cr26", "cr27", "cr28", "cr29", "cr30", "cr31", \
883 "c1r0", "c1r1", "c1r2", "c1r3", "c1r4", "c1r5", "c1r6", "c1r7", \
884 "c1r8", "c1r9", "c1r10", "c1r11", "c1r12", "c1r13", "c1r14", "c1r15", \
885 "c1r16", "c1r17", "c1r18", "c1r19", "c1r20", "c1r21", "c1r22", "c1r23", \
886 "c1r24", "c1r25", "c1r26", "c1r27", "c1r28", "c1r29", "c1r30", "c1r31", \
888 "c2r0", "c2r1", "c2r2", "c2r3", "c2r4", "c2r5", "c2r6", "c2r7", \
889 "c2r8", "c2r9", "c2r10", "c2r11", "c2r12", "c2r13", "c2r14", "c2r15", \
890 "c2r16", "c2r17", "c2r18", "c2r19", "c2r20", "c2r21", "c2r22", "c2r23", \
891 "c2r24", "c2r25", "c2r26", "c2r27", "c2r28", "c2r29", "c2r30", "c2r31", \
893 "c3r0", "c3r1", "c3r2", "c3r3", "c3r4", "c3r5", "c3r6", "c3r7", \
894 "c3r8", "c3r9", "c3r10", "c3r11", "c3r12", "c3r13", "c3r14", "c3r15", \
895 "c3r16", "c3r17", "c3r18", "c3r19", "c3r20", "c3r21", "c3r22", "c3r23", \
896 "c3r24", "c3r25", "c3r26", "c3r27", "c3r28", "c3r29", "c3r30", "c3r31", \
899 /* Print operand X (an rtx) in assembler syntax to file FILE. */
900 #define PRINT_OPERAND(STREAM, X, CODE) score_print_operand (STREAM, X, CODE)
902 /* A C expression which evaluates to true if CODE is a valid
903 punctuation character for use in the `PRINT_OPERAND' macro. */
904 #define PRINT_OPERAND_PUNCT_VALID_P(C) ((C) == '[' || (C) == ']')
906 /* Print a memory address as an operand to reference that memory location. */
907 #define PRINT_OPERAND_ADDRESS(STREAM, X) \
908 score_print_operand_address (STREAM, X)
910 /* By default on the S+core, external symbols do not have an underscore
912 #define USER_LABEL_PREFIX ""
914 /* This is how to output an insn to push a register on the stack. */
915 #define ASM_OUTPUT_REG_PUSH(STREAM, REGNO) \
918 fprintf (STREAM, "\tpush! %s,[%s]\n", \
920 reg_names[STACK_POINTER_REGNUM]); \
921 else if (TARGET_SCORE3) \
922 fprintf (STREAM, "\tpush!\t%s\n", \
926 /* This is how to output an insn to pop a register from the stack. */
927 #define ASM_OUTPUT_REG_POP(STREAM, REGNO) \
930 fprintf (STREAM, "\tpop! %s,[%s]\n", \
932 reg_names[STACK_POINTER_REGNUM]); \
933 else if (TARGET_SCORE3) \
934 fprintf (STREAM, "\tpop!\t%s\n", \
938 /* Output of Dispatch Tables. */
939 /* This is how to output an element of a case-vector. We can make the
940 entries PC-relative in GP-relative when .gp(d)word is supported. */
941 #define ASM_OUTPUT_ADDR_DIFF_ELT(STREAM, BODY, VALUE, REL) \
945 fprintf (STREAM, "\t.gpword %sL%d\n", LOCAL_LABEL_PREFIX, VALUE); \
947 fprintf (STREAM, "\t.word %sL%d\n", LOCAL_LABEL_PREFIX, VALUE); \
948 else if (TARGET_SCORE3) \
950 switch (GET_MODE(BODY)) \
952 case QImode: /* TBB */ \
953 asm_fprintf (STREAM, "\t.byte\t(%LL%d-%LL%d_tbb)/2\n", \
956 case HImode: /* TBH */ \
957 asm_fprintf (STREAM, "\t.2byte\t(%LL%d-%LL%d_tbb)/2\n", \
962 fprintf (STREAM, "\t.gpword %sL%d\n", LOCAL_LABEL_PREFIX, VALUE); \
964 fprintf (STREAM, "\t.word %sL%d\n", LOCAL_LABEL_PREFIX, VALUE); \
972 /* Jump table alignment is explicit in ASM_OUTPUT_CASE_LABEL. */
973 #define ADDR_VEC_ALIGN(JUMPTABLE) (GET_MODE (PATTERN (JUMPTABLE)) == SImode ? 2 \
974 : GET_MODE (PATTERN (JUMPTABLE)) == HImode ? 1 : 0)
976 /* This is how to output a label which precedes a jumptable. Since
977 Score3 instructions are 2 bytes, we may need explicit alignment here. */
978 #undef ASM_OUTPUT_CASE_LABEL
979 #define ASM_OUTPUT_CASE_LABEL(FILE, PREFIX, NUM, JUMPTABLE) \
981 if ((TARGET_SCORE7) && GET_MODE (PATTERN (JUMPTABLE)) == SImode) \
982 ASM_OUTPUT_ALIGN (FILE, 2); \
983 (*targetm.asm_out.internal_label) (FILE, PREFIX, NUM); \
986 /* Specify the machine mode that this machine uses
987 for the index in the tablejump instruction. */
988 #define CASE_VECTOR_MODE SImode
990 #define CASE_VECTOR_PC_RELATIVE (TARGET_SCORE3)
992 #define CASE_VECTOR_SHORTEN_MODE(min, max, body) \
993 ((min < 0 || max >= 0x2000 || TARGET_SCORE7) ? SImode \
994 : (max >= 0x200) ? HImode \
997 /* This is how to output an element of a case-vector that is absolute. */
998 #define ASM_OUTPUT_ADDR_VEC_ELT(STREAM, VALUE) \
999 fprintf (STREAM, "\t.word %sL%d\n", LOCAL_LABEL_PREFIX, VALUE)
1001 /* Assembler Commands for Exception Regions */
1002 /* Since the S+core is encoded in the least-significant bit
1003 of the address, mask it off return addresses for purposes of
1004 finding exception handling regions. */
1005 #define MASK_RETURN_ADDR constm1_rtx
1007 /* Assembler Commands for Alignment */
1008 /* This is how to output an assembler line to advance the location
1009 counter by SIZE bytes. */
1010 #undef ASM_OUTPUT_SKIP
1011 #define ASM_OUTPUT_SKIP(STREAM, SIZE) \
1012 fprintf (STREAM, "\t.space\t"HOST_WIDE_INT_PRINT_UNSIGNED"\n", (SIZE))
1014 /* This is how to output an assembler line
1015 that says to advance the location counter
1016 to a multiple of 2**LOG bytes. */
1017 #define ASM_OUTPUT_ALIGN(STREAM, LOG) \
1018 fprintf (STREAM, "\t.align\t%d\n", (LOG))
1020 /* Macros Affecting All Debugging Formats. */
1021 #ifndef PREFERRED_DEBUGGING_TYPE
1022 #define PREFERRED_DEBUGGING_TYPE DWARF2_DEBUG
1025 /* Specific Options for DBX Output. */
1026 #define DBX_DEBUGGING_INFO 1
1028 /* By default, turn on GDB extensions. */
1029 #define DEFAULT_GDB_EXTENSIONS 1
1031 #define DBX_CONTIN_LENGTH 0
1033 /* File Names in DBX Format. */
1034 #define DWARF2_DEBUGGING_INFO 1
1036 /* The DWARF 2 CFA column which tracks the return address. */
1037 #define DWARF_FRAME_RETURN_COLUMN 3
1039 /* Define if operations between registers always perform the operation
1040 on the full register even if a narrower mode is specified. */
1041 #define WORD_REGISTER_OPERATIONS
1043 /* All references are zero extended. */
1044 #define LOAD_EXTEND_OP(MODE) ZERO_EXTEND
1046 /* Define if loading short immediate values into registers sign extends. */
1047 #define SHORT_IMMEDIATES_SIGN_EXTEND
1049 /* Max number of bytes we can move from memory to memory
1050 in one reasonably fast instruction. */
1053 /* Define this to be nonzero if shift instructions ignore all but the low-order
1055 #define SHIFT_COUNT_TRUNCATED 1
1057 /* Value is 1 if truncating an integer of INPREC bits to OUTPREC bits
1058 is done just by pretending it is already truncated. */
1059 #define TRULY_NOOP_TRUNCATION(OUTPREC, INPREC) 1
1061 /* Specify the machine mode that pointers have.
1062 After generation of rtl, the compiler makes no further distinction
1063 between pointers and any other objects of this machine mode. */
1064 #define Pmode SImode
1066 /* Give call MEMs SImode since it is the "most permissive" mode
1067 for 32-bit targets. */
1068 #define FUNCTION_MODE Pmode
1070 struct extern_list GTY ((chain_next ("%h.next")))
1072 struct extern_list *next; /* next external */
1073 const char *name; /* name of the external */
1074 int size; /* size in bytes */
1077 extern GTY (()) struct extern_list *extern_head;