OSDN Git Service

* config/score/crti.asm: add pic support.
[pf3gnuchains/gcc-fork.git] / gcc / config / score / score.h
1 /* score.h for Sunplus S+CORE processor
2    Copyright (C) 2005 Free Software Foundation, Inc.
3    Contributed by Sunnorth.
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 2, 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 COPYING.  If not, write to
19    the Free Software Foundation, 51 Franklin Street, Fifth Floor,
20    Boston, MA 02110-1301, USA.  */
21
22 #include "score-conv.h"
23 #include "score-version.h"
24
25 /* Define the information needed to generate branch insns.  This is
26    stored from the compare operation.  */
27 extern GTY(()) rtx cmp_op0;
28 extern GTY(()) rtx cmp_op1;
29
30 /* Controlling the Compilation Driver.  */
31 #define SWITCH_TAKES_ARG(CHAR) \
32   (DEFAULT_SWITCH_TAKES_ARG (CHAR) || (CHAR) == 'G')
33
34 /* CC1_SPEC is the set of arguments to pass to the compiler proper.  */
35 #undef CC1_SPEC
36 #define CC1_SPEC                 "%{!mel:-meb}"
37
38 #undef ASM_SPEC
39 #define ASM_SPEC \
40   "%{!mel:-EB} %{mel:-EL} %{mSCORE5U:-SCORE5U} %{mSCORE7:-SCORE7} %{G*}"
41
42 #undef LINK_SPEC
43 #define LINK_SPEC                 "%{!mel:-EB} %{mel:-EL} %{G*}"
44
45 /* Run-time Target Specification.  */
46 #define TARGET_CPU_CPP_BUILTINS()               \
47   do {                                          \
48     builtin_define ("SUNPLUS");                 \
49     builtin_define ("__SCORE__");               \
50     builtin_define ("__score__");               \
51     if (TARGET_LITTLE_ENDIAN)                   \
52       builtin_define ("__scorele__");           \
53     else                                        \
54       builtin_define ("__scorebe__");           \
55     if (TARGET_SCORE5U)                         \
56       builtin_define ("__score5u__");           \
57     else                                        \
58       builtin_define ("__score7__");            \
59   } while (0)
60
61 #define TARGET_DEFAULT         MASK_SCORE7
62
63 #define TARGET_VERSION \
64   fprintf (stderr, "Sunplus S+CORE %s", SCORE_GCC_VERSION);
65
66 #define OVERRIDE_OPTIONS       score_override_options ()
67
68 /* Show we can debug even without a frame pointer.  */
69 #define CAN_DEBUG_WITHOUT_FP
70
71 /* Target machine storage layout.  */
72 #define BITS_BIG_ENDIAN        0
73 #define BYTES_BIG_ENDIAN       (TARGET_LITTLE_ENDIAN == 0)
74 #define WORDS_BIG_ENDIAN       (TARGET_LITTLE_ENDIAN == 0)
75
76 /* Define this to set the endianness to use in libgcc2.c, which can
77    not depend on target_flags.  */
78 #if defined(__scorele__)
79 #define LIBGCC2_WORDS_BIG_ENDIAN       0
80 #else
81 #define LIBGCC2_WORDS_BIG_ENDIAN       1
82 #endif
83
84 /* Width of a word, in units (bytes).  */
85 #define UNITS_PER_WORD                 4
86
87 /* Define this macro if it is advisable to hold scalars in registers
88    in a wider mode than that declared by the program.  In such cases,
89    the value is constrained to be within the bounds of the declared
90    type, but kept valid in the wider mode.  The signedness of the
91    extension may differ from that of the type.  */
92 #define PROMOTE_MODE(MODE, UNSIGNEDP, TYPE)     \
93   if (GET_MODE_CLASS (MODE) == MODE_INT         \
94       && GET_MODE_SIZE (MODE) < UNITS_PER_WORD) \
95     (MODE) = SImode;
96
97 /* Allocation boundary (in *bits*) for storing arguments in argument list.  */
98 #define PARM_BOUNDARY                  BITS_PER_WORD
99 #define STACK_BOUNDARY                 64
100
101 /* Allocation boundary (in *bits*) for the code of a function.  */
102 #define FUNCTION_BOUNDARY              BITS_PER_WORD
103
104 /* There is no point aligning anything to a rounder boundary than this.  */
105 #define BIGGEST_ALIGNMENT              LONG_DOUBLE_TYPE_SIZE
106
107 /* If defined, a C expression to compute the alignment for a static
108    variable.  TYPE is the data type, and ALIGN is the alignment that
109    the object would ordinarily have.  The value of this macro is used
110    instead of that alignment to align the object.
111
112    If this macro is not defined, then ALIGN is used.
113
114    One use of this macro is to increase alignment of medium-size
115    data to make it all fit in fewer cache lines.  Another is to
116    cause character arrays to be word-aligned so that `strcpy' calls
117    that copy constants to character arrays can be done inline.  */
118 #define DATA_ALIGNMENT(TYPE, ALIGN)                                     \
119   ((((ALIGN) < BITS_PER_WORD)                                           \
120     && (TREE_CODE (TYPE) == ARRAY_TYPE                                  \
121         || TREE_CODE (TYPE) == UNION_TYPE                               \
122         || TREE_CODE (TYPE) == RECORD_TYPE)) ? BITS_PER_WORD : (ALIGN))
123
124 /* Alignment of field after `int : 0' in a structure.  */
125 #define EMPTY_FIELD_BOUNDARY           32
126
127 /* All accesses must be aligned.  */
128 #define STRICT_ALIGNMENT               1
129
130 /* Score requires that structure alignment is affected by bitfields.  */
131 #define PCC_BITFIELD_TYPE_MATTERS      1
132
133 /* long double is not a fixed mode, but the idea is that, if we
134    support long double, we also want a 128-bit integer type.  */
135 #define MAX_FIXED_MODE_SIZE            LONG_DOUBLE_TYPE_SIZE
136
137 #define TARGET_FLOAT_FORMAT            IEEE_FLOAT_FORMAT
138
139 /* Layout of Data Type.  */
140 /* Set the sizes of the core types.  */
141 #define INT_TYPE_SIZE                   32
142 #define SHORT_TYPE_SIZE                 16
143 #define LONG_TYPE_SIZE                  32
144 #define LONG_LONG_TYPE_SIZE             64
145 #define CHAR_TYPE_SIZE                  8
146 #define FLOAT_TYPE_SIZE                 32
147 #define DOUBLE_TYPE_SIZE                64
148 #define LONG_DOUBLE_TYPE_SIZE           64
149
150 /* Define this as 1 if `char' should by default be signed; else as 0.  */
151 #undef DEFAULT_SIGNED_CHAR
152 #define DEFAULT_SIGNED_CHAR             1
153
154 /* Default definitions for size_t and ptrdiff_t.  */
155 #define SIZE_TYPE                       "unsigned int"
156
157 /* Register Usage
158
159    S+core have:
160    - 32 integer registers
161    - 16 control registers (cond)
162    - 16 special registers (ceh/cel/cnt/lcr/scr/arg/fp)
163    - 32 coprocessors 1 registers
164    - 32 coprocessors 2 registers
165    - 32 coprocessors 3 registers.  */
166 #define FIRST_PSEUDO_REGISTER           160
167
168 /* By default, fix the kernel registers (r30 and r31), the global
169    pointer (r28) and the stack pointer (r0).  This can change
170    depending on the command-line options.
171
172    Regarding coprocessor registers: without evidence to the contrary,
173    it's best to assume that each coprocessor register has a unique
174    use.  This can be overridden, in, e.g., override_options() or
175    CONDITIONAL_REGISTER_USAGE should the assumption be inappropriate
176    for a particular target.  */
177
178 /* Control Registers, use mfcr/mtcr insn
179     32        cr0         PSR
180     33        cr1         Condition
181     34        cr2         ECR
182     35        cr3         EXCPVec
183     36        cr4         CCR
184     37        cr5         EPC
185     38        cr6         EMA
186     39        cr7         TLBLock
187     40        cr8         TLBPT
188     41        cr8         PEADDR
189     42        cr10        TLBRPT
190     43        cr11        PEVN
191     44        cr12        PECTX
192     45        cr13
193     46        cr14
194     47        cr15
195
196     Custom Engine Register, use mfce/mtce
197     48        CEH        CEH
198     49        CEL        CEL
199
200     Special-Purpose Register, use mfsr/mtsr
201     50        sr0        CNT
202     51        sr1        LCR
203     52        sr2        SCR
204
205     53        ARG_POINTER_REGNUM
206     54        FRAME_POINTER_REGNUM
207     but Control register have 32 registers, cr16-cr31.  */
208 #define FIXED_REGISTERS                                  \
209 {                                                        \
210   /* General Purpose Registers */                        \
211   1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,        \
212   0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 1,        \
213   /* Control Registers */                                \
214   1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,        \
215   /* CEH/ CEL/ CNT/ LCR/ SCR / ARG_POINTER_REGNUM/ FRAME_POINTER_REGNUM */\
216   0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,        \
217   /* CP 1 Registers  */                                  \
218   1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,        \
219   1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,        \
220   /* CP 2 Registers  */                                  \
221   1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,        \
222   1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,        \
223   /* CP 3 Registers*/                                    \
224   1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,        \
225   1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,        \
226 }
227
228 #define CALL_USED_REGISTERS                              \
229 {                                                        \
230   /* General purpose register */                         \
231   1, 1, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0,        \
232   0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,        \
233   /* Control Registers */                                \
234   1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,        \
235   1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,        \
236   /* CP 1 Registers  */                                  \
237   1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,        \
238   1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,        \
239   /* CP 2 Registers  */                                  \
240   1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,        \
241   1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,        \
242   /* CP 3 Registers  */                                  \
243   1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,        \
244   1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,        \
245 }
246
247 #define REG_ALLOC_ORDER                                                   \
248 {   0,  1,  4,  5,  6,  7,  8,  9, 10, 11, 12, 13, 14, 15, 16, 17,        \
249    18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31,  2,  3,        \
250    32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47,        \
251    48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63,        \
252    64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79,        \
253    80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95,        \
254    96, 97, 98, 99,100,101,102,103,104,105,106,107,108,109,110,111,        \
255   112,113,114,115,116,117,118,119,120,121,122,123,124,125,126,127,        \
256   128,129,130,131,132,133,134,135,136,137,138,139,140,141,142,143,        \
257   144,145,146,147,148,149,150,151,152,153,154,155,156,157,158,159        }
258
259 #define HARD_REGNO_NREGS(REGNO, MODE) \
260   ((GET_MODE_SIZE (MODE) + UNITS_PER_WORD - 1) / UNITS_PER_WORD)
261
262 /* Return true if REGNO is suitable for holding a quantity of type MODE.  */
263 #define HARD_REGNO_MODE_OK(REGNO, MODE) score_hard_regno_mode_ok (REGNO, MODE)
264
265 /* Value is 1 if it is a good idea to tie two pseudo registers
266    when one has mode MODE1 and one has mode MODE2.
267    If HARD_REGNO_MODE_OK could produce different values for MODE1 and MODE2,
268    for any hard reg, then this must be 0 for correct output.  */
269 #define MODES_TIEABLE_P(MODE1, MODE2)                             \
270   ((GET_MODE_CLASS (MODE1) == MODE_FLOAT                          \
271     || GET_MODE_CLASS (MODE1) == MODE_COMPLEX_FLOAT)              \
272    == (GET_MODE_CLASS (MODE2) == MODE_FLOAT                       \
273        || GET_MODE_CLASS (MODE2) == MODE_COMPLEX_FLOAT))
274
275 /* Register Classes.  */
276 /* Define the classes of registers for register constraints in the
277    machine description.  Also define ranges of constants.  */
278 enum reg_class
279 {
280   NO_REGS,
281   G16_REGS,    /* r0 ~ r15 */
282   G32_REGS,    /* r0 ~ r31 */
283   T32_REGS,    /* r8 ~ r11 | r22 ~ r27 */
284
285   HI_REG,      /* hi                 */
286   LO_REG,      /* lo                 */
287   CE_REGS,     /* hi + lo            */
288
289   CN_REG,      /* cnt                */
290   LC_REG,      /* lcb                */
291   SC_REG,      /* scb                */
292   SP_REGS,     /* cnt + lcb + scb    */
293
294   CR_REGS,     /* cr0 - cr15         */
295
296   CP1_REGS,    /* cp1                */
297   CP2_REGS,    /* cp2                */
298   CP3_REGS,    /* cp3                */
299   CPA_REGS,    /* cp1 + cp2 + cp3    */
300
301   ALL_REGS,
302   LIM_REG_CLASSES
303 };
304
305 #define N_REG_CLASSES                  ((int) LIM_REG_CLASSES)
306
307 #define GENERAL_REGS                   G32_REGS
308
309 /* Give names of register classes as strings for dump file.  */
310 #define REG_CLASS_NAMES           \
311 {                                 \
312   "NO_REGS",                      \
313   "G16_REGS",                     \
314   "G32_REGS",                     \
315   "T32_REGS",                     \
316                                   \
317   "HI_REG",                       \
318   "LO_REG",                       \
319   "CE_REGS",                      \
320                                   \
321   "CN_REG",                       \
322   "LC_REG",                       \
323   "SC_REG",                       \
324   "SP_REGS",                      \
325                                   \
326   "CR_REGS",                      \
327                                   \
328   "CP1_REGS",                     \
329   "CP2_REGS",                     \
330   "CP3_REGS",                     \
331   "CPA_REGS",                     \
332                                   \
333   "ALL_REGS",                     \
334 }
335
336 /* Define which registers fit in which classes.  */
337 #define REG_CLASS_CONTENTS                                        \
338 {                                                                 \
339   /* NO_REGS/G16/G32/T32  */                                      \
340   { 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000},  \
341   { 0x0000ffff, 0x00000000, 0x00000000, 0x00000000, 0x00000000},  \
342   { 0xffffffff, 0x00000000, 0x00000000, 0x00000000, 0x00000000},  \
343   { 0x0fc00f00, 0x00000000, 0x00000000, 0x00000000, 0x00000000},  \
344   /* HI/LO/CE  */                                                 \
345   { 0x00000000, 0x00010000, 0x00000000, 0x00000000, 0x00000000},  \
346   { 0x00000000, 0x00020000, 0x00000000, 0x00000000, 0x00000000},  \
347   { 0x00000000, 0x00030000, 0x00000000, 0x00000000, 0x00000000},  \
348   /* CN/LC/SC/SP/CR  */                                           \
349   { 0x00000000, 0x00040000, 0x00000000, 0x00000000, 0x00000000},  \
350   { 0x00000000, 0x00080000, 0x00000000, 0x00000000, 0x00000000},  \
351   { 0x00000000, 0x00100000, 0x00000000, 0x00000000, 0x00000000},  \
352   { 0x00000000, 0x001c0000, 0x00000000, 0x00000000, 0x00000000},  \
353   { 0x00000000, 0x0000ffff, 0x00000000, 0x00000000, 0x00000000},  \
354   /* CP1/CP2/CP3/CPA  */                                          \
355   { 0x00000000, 0x00000000, 0xffffffff, 0x00000000, 0x00000000},  \
356   { 0x00000000, 0x00000000, 0x00000000, 0xffffffff, 0x00000000},  \
357   { 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xffffffff},  \
358   { 0x00000000, 0x00000000, 0xffffffff, 0xffffffff, 0xffffffff},  \
359   /* ALL_REGS        */                                           \
360   { 0xffffffff, 0x001fffff, 0xffffffff, 0xffffffff, 0xffffffff},  \
361 }
362
363 /* A C expression whose value is a register class containing hard
364    register REGNO.  In general there is more that one such class;
365    choose a class which is "minimal", meaning that no smaller class
366    also contains the register.  */
367 #define REGNO_REG_CLASS(REGNO)         score_reg_class (REGNO)
368
369 /* A macro whose definition is the name of the class to which a
370    valid base register must belong.  A base register is one used in
371    an address which is the register value plus a displacement.  */
372 #define BASE_REG_CLASS                 G16_REGS
373
374 /* The class value for index registers.  */
375 #define INDEX_REG_CLASS                NO_REGS
376
377 #define REG_CLASS_FROM_LETTER(C)       score_char_to_class[(unsigned char) (C)]
378
379 /* Addressing modes, and classification of registers for them.  */
380 #define REGNO_MODE_OK_FOR_BASE_P(REGNO, MODE) \
381   score_regno_mode_ok_for_base_p (REGNO, 1)
382
383 #define REGNO_OK_FOR_INDEX_P(NUM)       0
384
385 #define PREFERRED_RELOAD_CLASS(X, CLASS) \
386   score_preferred_reload_class (X, CLASS)
387
388 /* If we need to load shorts byte-at-a-time, then we need a scratch.  */
389 #define SECONDARY_INPUT_RELOAD_CLASS(CLASS, MODE, X)        \
390   score_secondary_reload_class (CLASS, MODE, X)
391
392 /* Return the register class of a scratch register needed to copy IN into
393    or out of a register in CLASS in MODE.  If it can be done directly,
394    NO_REGS is returned.  */
395 #define SECONDARY_OUTPUT_RELOAD_CLASS(CLASS, MODE, X)       \
396   score_secondary_reload_class (CLASS, MODE, X)
397
398 /* Return the maximum number of consecutive registers
399    needed to represent mode MODE in a register of class CLASS.  */
400 #define CLASS_MAX_NREGS(CLASS, MODE)    \
401   ((GET_MODE_SIZE (MODE) + UNITS_PER_WORD - 1) / UNITS_PER_WORD)
402
403 #define CANNOT_CHANGE_MODE_CLASS(FROM, TO, CLASS)    \
404   (GET_MODE_SIZE (FROM) != GET_MODE_SIZE (TO)        \
405    ? reg_classes_intersect_p (HI_REG, (CLASS)) : 0)
406
407 /* The letters I, J, K, L, M, N, O, and P in a register constraint
408    string can be used to stand for particular ranges of immediate
409    operands.  This macro defines what the ranges are.  C is the
410    letter, and VALUE is a constant value.  Return 1 if VALUE is
411    in the range specified by C.  */
412 #define CONST_OK_FOR_LETTER_P(VALUE, C) score_const_ok_for_letter_p (VALUE, C)
413
414 /* Similar, but for floating constants, and defining letters G and H.
415    Here VALUE is the CONST_DOUBLE rtx itself.  */
416
417 #define CONST_DOUBLE_OK_FOR_LETTER_P(VALUE, C)        \
418   ((C) == 'G' && (VALUE) == CONST0_RTX (GET_MODE (VALUE)))
419
420 /* Letters in the range `Q' through `U' may be defined in a
421    machine-dependent fashion to stand for arbitrary operand types.
422    The machine description macro `EXTRA_CONSTRAINT' is passed the
423    operand as its first argument and the constraint letter as its
424    second operand.  */
425 #define EXTRA_CONSTRAINT(VALUE, C)      score_extra_constraint (VALUE, C)
426
427 /* Basic Stack Layout.  */
428 /* Stack layout; function entry, exit and calling.  */
429 #define STACK_GROWS_DOWNWARD
430
431 #define STACK_PUSH_CODE                 PRE_DEC
432 #define STACK_POP_CODE                  POST_INC
433
434 /* The offset of the first local variable from the beginning of the frame.
435    See compute_frame_size for details about the frame layout.  */
436 #define STARTING_FRAME_OFFSET           current_function_outgoing_args_size
437
438 /* The argument pointer always points to the first argument.  */
439 #define FIRST_PARM_OFFSET(FUNDECL)      0
440
441 /* A C expression whose value is RTL representing the value of the return
442    address for the frame COUNT steps up from the current frame.  */
443 #define RETURN_ADDR_RTX(count, frame)   score_return_addr (count, frame)
444
445 /* Pick up the return address upon entry to a procedure.  */
446 #define INCOMING_RETURN_ADDR_RTX        gen_rtx_REG (VOIDmode, RA_REGNUM)
447
448 /* Exception handling Support.  */
449 /* Use r0 to r3 to pass exception handling information.  */
450 #define EH_RETURN_DATA_REGNO(N) \
451   ((N) < 4 ? (N) + ARG_REG_FIRST : INVALID_REGNUM)
452
453 /* The register that holds the return address in exception handlers.  */
454 #define EH_RETURN_STACKADJ_RTX          gen_rtx_REG (Pmode, EH_REGNUM)
455
456 /* Registers That Address the Stack Frame.  */
457 /* Register to use for pushing function arguments.  */
458 #define STACK_POINTER_REGNUM            SP_REGNUM
459
460 /* These two registers don't really exist: they get eliminated to either
461    the stack or hard frame pointer.  */
462 #define FRAME_POINTER_REGNUM            53
463
464 /*  we use r2 as the frame pointer.  */
465 #define HARD_FRAME_POINTER_REGNUM       FP_REGNUM
466
467 #define ARG_POINTER_REGNUM              54
468
469 /* Register in which static-chain is passed to a function.  */
470 #define STATIC_CHAIN_REGNUM             23
471
472 /* Elimination Frame Pointer and Arg Pointer  */
473 /* Value should be nonzero if functions must have frame pointers.
474    Zero means the frame pointer need not be set up (and parms
475    may be accessed via the stack pointer) in functions that seem suitable.
476    This is computed in `reload', in reload1.c.  */
477 #define FRAME_POINTER_REQUIRED          current_function_calls_alloca
478
479 #define ELIMINABLE_REGS                                \
480   {{ ARG_POINTER_REGNUM, STACK_POINTER_REGNUM},        \
481    { ARG_POINTER_REGNUM, HARD_FRAME_POINTER_REGNUM},   \
482    { FRAME_POINTER_REGNUM, STACK_POINTER_REGNUM},      \
483    { FRAME_POINTER_REGNUM, HARD_FRAME_POINTER_REGNUM}}
484
485 /* We can always eliminate to the hard frame pointer.  We can eliminate
486    to the stack pointer unless a frame pointer is needed.  */
487 #define CAN_ELIMINATE(FROM, TO)        \
488   (((TO) == HARD_FRAME_POINTER_REGNUM) \
489    || ((TO) == STACK_POINTER_REGNUM    \
490        && !frame_pointer_needed))
491
492 #define INITIAL_ELIMINATION_OFFSET(FROM, TO, OFFSET) \
493   (OFFSET) = score_initial_elimination_offset ((FROM), (TO))
494
495 /* Passing Function Arguments on the Stack.  */
496 /* Allocate stack space for arguments at the beginning of each function.  */
497 #define ACCUMULATE_OUTGOING_ARGS        1
498
499 /* reserve stack space for all argument registers.  */
500 #define REG_PARM_STACK_SPACE(FNDECL)    UNITS_PER_WORD
501
502 /* Define this if it is the responsibility of the caller to
503    allocate the area reserved for arguments passed in registers.
504    If `ACCUMULATE_OUTGOING_ARGS' is also defined, the only effect
505    of this macro is to determine whether the space is included in
506    `current_function_outgoing_args_size'.  */
507 #define OUTGOING_REG_PARM_STACK_SPACE
508
509 #define RETURN_POPS_ARGS(FUNDECL, FUNTYPE, STACK_SIZE) 0
510
511 /* Passing Arguments in Registers  */
512 /* Determine where to put an argument to a function.
513    Value is zero to push the argument on the stack,
514    or a hard register in which to store the argument.
515
516    MODE is the argument's machine mode.
517    TYPE is the data type of the argument (as a tree).
518     This is null for libcalls where that information may
519     not be available.
520    CUM is a variable of type CUMULATIVE_ARGS which gives info about
521     the preceding args and about the function being called.
522    NAMED is nonzero if this argument is a named parameter
523     (otherwise it is an extra parameter matching an ellipsis).  */
524 #define FUNCTION_ARG(CUM, MODE, TYPE, NAMED) \
525   score_function_arg (&CUM, MODE, TYPE, NAMED)
526
527 /* A C type for declaring a variable that is used as the first argument of
528    `FUNCTION_ARG' and other related values.  For some target machines, the
529    type `int' suffices and can hold the number of bytes of argument so far.  */
530 typedef struct score_args
531 {
532   unsigned int arg_number;             /* how many arguments have been seen  */
533   unsigned int num_gprs;               /* number of gprs in use  */
534   unsigned int stack_words;            /* number of words in stack  */
535 } score_args_t;
536
537 #define CUMULATIVE_ARGS                score_args_t
538
539 /* Initialize a variable CUM of type CUMULATIVE_ARGS
540    for a call to a function whose data type is FNTYPE.
541    For a library call, FNTYPE is 0.  */
542 #define INIT_CUMULATIVE_ARGS(CUM, FNTYPE, LIBNAME, INDIRECT, n_named_args) \
543   score_init_cumulative_args (&CUM, FNTYPE, LIBNAME)
544
545 /* Update the data in CUM to advance over an argument
546    of mode MODE and data type TYPE.
547    (TYPE is null for libcalls where that information may not be available.)  */
548 #define FUNCTION_ARG_ADVANCE(CUM, MODE, TYPE, NAMED) \
549   score_function_arg_advance (&CUM, MODE, TYPE, NAMED)
550
551 /* 1 if N is a possible register number for function argument passing.
552    We have no FP argument registers when soft-float.  When FP registers
553    are 32 bits, we can't directly reference the odd numbered ones.  */
554 #define FUNCTION_ARG_REGNO_P(REGNO) \
555   REG_CONTAIN (REGNO, ARG_REG_FIRST, ARG_REG_NUM)
556
557 /* How Scalar Function Values Are Returned.  */
558 #define FUNCTION_VALUE(VALTYPE, FUNC) \
559   score_function_value ((VALTYPE), (FUNC), VOIDmode)
560
561 #define LIBCALL_VALUE(MODE)  score_function_value (NULL_TREE, NULL, (MODE))
562
563 /* 1 if N is a possible register number for a function value.  */
564 #define FUNCTION_VALUE_REGNO_P(REGNO)   ((REGNO) == (ARG_REG_FIRST))
565
566 #define PIC_FUNCTION_ADDR_REGNUM        (GP_REG_FIRST + 25)
567
568 /* How Large Values Are Returned.  */
569 #define STRUCT_VALUE                    0
570
571 /* Function Entry and Exit  */
572 /* EXIT_IGNORE_STACK should be nonzero if, when returning from a function,
573    the stack pointer does not matter.  The value is tested only in
574    functions that have frame pointers.
575    No definition is equivalent to always zero.  */
576 #define EXIT_IGNORE_STACK               1
577
578 /* Generating Code for Profiling  */
579 /* Output assembler code to FILE to increment profiler label # LABELNO
580    for profiling a function entry.  */
581 #define FUNCTION_PROFILER(FILE, LABELNO)                           \
582 {                                                                  \
583   fprintf (FILE, " .set r1  \n");                                  \
584   fprintf (FILE, " mv   r%d,r%d \n", AT_REGNUM, RA_REGNUM);        \
585   fprintf (FILE, " subi r%d, %d \n", STACK_POINTER_REGNUM, 8);     \
586   fprintf (FILE, " jl   _mcount \n");                              \
587   fprintf (FILE, " .set nor1 \n");                                 \
588 }
589
590 /* Trampolines for Nested Functions.  */
591 #define TRAMPOLINE_INSNS                8
592
593 /* A C expression for the size in bytes of the trampoline, as an integer.  */
594 #define TRAMPOLINE_SIZE \
595   (TRAMPOLINE_INSNS * GET_MODE_SIZE (SImode) + GET_MODE_SIZE (ptr_mode) * 2)
596
597 /* A C statement to initialize the variable parts of a trampoline.
598    ADDR is an RTX for the address of the trampoline; FNADDR is an
599    RTX for the address of the nested function; STATIC_CHAIN is an
600    RTX for the static chain value that should be passed to the
601    function when it is called.  */
602
603 #define INITIALIZE_TRAMPOLINE(ADDR, FUNC, CHAIN) \
604   score_initialize_trampoline (ADDR, FUNC, CHAIN)
605
606 #define HAVE_PRE_INCREMENT              1
607 #define HAVE_PRE_DECREMENT              1
608 #define HAVE_POST_INCREMENT             1
609 #define HAVE_POST_DECREMENT             1
610 #define HAVE_PRE_MODIFY_DISP            0
611 #define HAVE_POST_MODIFY_DISP           0
612 #define HAVE_PRE_MODIFY_REG             0
613 #define HAVE_POST_MODIFY_REG            0
614
615 /* Recognize any constant value that is a valid address.  */
616 #define CONSTANT_ADDRESS_P(X)           CONSTANT_P (X)
617
618 /* Maximum number of registers that can appear in a valid memory address.  */
619 #define MAX_REGS_PER_ADDRESS            1
620
621 #ifdef REG_OK_STRICT
622 #define GO_IF_LEGITIMATE_ADDRESS(MODE, X, LABEL)   \
623   if (score_address_p (MODE, X, 1))                \
624     goto LABEL;
625 #else
626 #define GO_IF_LEGITIMATE_ADDRESS(MODE, X, LABEL)   \
627   if (score_address_p (MODE, X, 0))                \
628     goto LABEL;
629 #endif
630
631 /* The macros REG_OK_FOR..._P assume that the arg is a REG rtx
632    and check its validity for a certain class.
633    We have two alternate definitions for each of them.
634    The usual definition accepts all pseudo regs; the other rejects them all.
635    The symbol REG_OK_STRICT causes the latter definition to be used.
636
637    Most source files want to accept pseudo regs in the hope that
638    they will get allocated to the class that the insn wants them to be in.
639    Some source files that are used after register allocation
640    need to be strict.  */
641 #ifndef REG_OK_STRICT
642 #define REG_MODE_OK_FOR_BASE_P(X, MODE) \
643   score_regno_mode_ok_for_base_p (REGNO (X), 0)
644 #else
645 #define REG_MODE_OK_FOR_BASE_P(X, MODE) \
646   score_regno_mode_ok_for_base_p (REGNO (X), 1)
647 #endif
648
649 #define REG_OK_FOR_INDEX_P(X) 0
650
651 #define LEGITIMIZE_ADDRESS(X, OLDX, MODE, WIN)   \
652   do {                                           \
653     if (score_legitimize_address (&(X)))         \
654       goto WIN;                                  \
655   } while (0)
656
657 /* Go to LABEL if ADDR (a legitimate address expression)
658    has an effect that depends on the machine mode it is used for.  */
659 #define GO_IF_MODE_DEPENDENT_ADDRESS(ADDR, LABEL)       {}
660
661 #define LEGITIMATE_CONSTANT_P(X)        1
662
663 /* Describing Relative Costs of Operations  */
664 /* Compute extra cost of moving data between one register class and another.  */
665 #define REGISTER_MOVE_COST(MODE, FROM, TO) \
666   score_register_move_cost (MODE, FROM, TO)
667
668 /* Moves to and from memory are quite expensive */
669 #define MEMORY_MOVE_COST(MODE, CLASS, TO_P) \
670   (4 + memory_move_secondary_cost ((MODE), (CLASS), (TO_P)))
671
672 /* Try to generate sequences that don't involve branches.  */
673 #define BRANCH_COST                     2
674
675 /* Nonzero if access to memory by bytes is slow and undesirable.  */
676 #define SLOW_BYTE_ACCESS                1
677
678 /* Define this macro if it is as good or better to call a constant
679    function address than to call an address kept in a register.  */
680 #define NO_FUNCTION_CSE                 1
681
682 /* Dividing the Output into Sections (Texts, Data, ...).  */
683 /* Define the strings to put out for each section in the object file.  */
684 #define TEXT_SECTION_ASM_OP             "\t.text"
685 #define DATA_SECTION_ASM_OP             "\t.data"
686 #define SDATA_SECTION_ASM_OP            "\t.sdata"
687
688 #undef  READONLY_DATA_SECTION_ASM_OP
689 #define READONLY_DATA_SECTION_ASM_OP    "\t.rdata"
690
691 /* The Overall Framework of an Assembler File  */
692 /* How to start an assembler comment.
693    The leading space is important.  */
694 #define ASM_COMMENT_START               "#"
695
696 /* Output to assembler file text saying following lines
697    may contain character constants, extra white space, comments, etc.  */
698 #define ASM_APP_ON                     "#APP\n\t.set volatile\n"
699
700 /* Output to assembler file text saying following lines
701    no longer contain unusual constructs.  */
702 #define ASM_APP_OFF                     "#NO_APP\n\t.set optimize\n"
703
704 /* Output of Uninitialized Variables.  */
705 /* This says how to define a global common symbol.  */
706 #define ASM_OUTPUT_ALIGNED_DECL_COMMON(STREAM, DECL, NAME, SIZE, ALIGN)     \
707   score_declare_object (STREAM, NAME, "\n\t.comm\t",                        \
708                         ","HOST_WIDE_INT_PRINT_UNSIGNED",%u\n",             \
709                         SIZE, ALIGN / BITS_PER_UNIT);
710
711 /* This says how to define a local common symbol (i.e., not visible to
712    linker).  */
713 #undef ASM_OUTPUT_ALIGNED_LOCAL
714 #define ASM_OUTPUT_ALIGNED_LOCAL(STREAM, NAME, SIZE, ALIGN)            \
715   score_declare_object (STREAM, NAME, "\n\t.lcomm\t",                  \
716                         ","HOST_WIDE_INT_PRINT_UNSIGNED",%u\n",        \
717                         SIZE, ALIGN / BITS_PER_UNIT);
718
719 /* Globalizing directive for a label.  */
720 #define GLOBAL_ASM_OP                   "\t.globl\t"
721
722 /* Output and Generation of Labels  */
723 /* This is how to declare a function name.  The actual work of
724    emitting the label is moved to function_prologue, so that we can
725    get the line number correctly emitted before the .ent directive,
726    and after any .file directives.  Define as empty so that the function
727    is not declared before the .ent directive elsewhere.  */
728 #undef ASM_DECLARE_FUNCTION_NAME
729 #define ASM_DECLARE_FUNCTION_NAME(FILE, NAME, DECL)
730
731 #undef ASM_DECLARE_OBJECT_NAME
732 #define ASM_DECLARE_OBJECT_NAME(STREAM, NAME, DECL) \
733   score_declare_object (STREAM, NAME, "", ":\n", 0)
734
735 /* This says how to output an external.  It would be possible not to
736    output anything and let undefined symbol become external. However
737    the assembler uses length information on externals to allocate in
738    data/sdata bss/sbss, thereby saving exec time.  */
739 #define ASM_OUTPUT_EXTERNAL(STREAM, DECL, NAME) \
740   score_output_external (STREAM, DECL, NAME)
741
742 /* This handles the magic '..CURRENT_FUNCTION' symbol, which means
743    'the start of the function that this code is output in'.  */
744 #define ASM_OUTPUT_LABELREF(STREAM, NAME) \
745   fprintf ((STREAM), "%s", (NAME))
746
747 /* Local compiler-generated symbols must have a prefix that the assembler
748    understands.  */
749 #define LOCAL_LABEL_PREFIX              "."
750
751 #undef ASM_GENERATE_INTERNAL_LABEL
752 #define ASM_GENERATE_INTERNAL_LABEL(LABEL, PREFIX, NUM) \
753   sprintf ((LABEL), "*%s%s%ld", (LOCAL_LABEL_PREFIX), (PREFIX), (long) (NUM))
754
755 /* Output of Assembler Instructions.  */
756 #define REGISTER_NAMES                                                   \
757 { "r0", "r1", "r2", "r3", "r4", "r5", "r6", "r7",                        \
758   "r8", "r9", "r10", "r11", "r12", "r13", "r14", "r15",                  \
759   "r16", "r17", "r18", "r19", "r20", "r21", "r22", "r23",                \
760   "r24", "r25", "r26", "r27", "r28", "r29", "r30", "r31",                \
761                                                                          \
762   "cr0", "cr1", "cr2", "cr3", "cr4", "cr5", "cr6", "cr7",                \
763   "cr8", "cr9", "cr10", "cr11", "cr12", "cr13", "cr14", "cr15",          \
764                                                                          \
765   "ceh", "cel", "sr0", "sr1", "sr2", "_arg", "_frame", "",               \
766   "cr24", "cr25", "cr26", "cr27", "cr28", "cr29", "cr30", "cr31",        \
767                                                                          \
768   "c1r0", "c1r1", "c1r2", "c1r3", "c1r4", "c1r5", "c1r6", "c1r7",        \
769   "c1r8", "c1r9", "c1r10", "c1r11", "c1r12", "c1r13", "c1r14", "c1r15",  \
770   "c1r16", "c1r17", "c1r18", "c1r19", "c1r20", "c1r21", "c1r22", "c1r23",\
771   "c1r24", "c1r25", "c1r26", "c1r27", "c1r28", "c1r29", "c1r30", "c1r31",\
772                                                                          \
773   "c2r0", "c2r1", "c2r2", "c2r3", "c2r4", "c2r5", "c2r6", "c2r7",        \
774   "c2r8", "c2r9", "c2r10", "c2r11", "c2r12", "c2r13", "c2r14", "c2r15",  \
775   "c2r16", "c2r17", "c2r18", "c2r19", "c2r20", "c2r21", "c2r22", "c2r23",\
776   "c2r24", "c2r25", "c2r26", "c2r27", "c2r28", "c2r29", "c2r30", "c2r31",\
777                                                                          \
778   "c3r0", "c3r1", "c3r2", "c3r3", "c3r4", "c3r5", "c3r6", "c3r7",        \
779   "c3r8", "c3r9", "c3r10", "c3r11", "c3r12", "c3r13", "c3r14", "c3r15",  \
780   "c3r16", "c3r17", "c3r18", "c3r19", "c3r20", "c3r21", "c3r22", "c3r23",\
781   "c3r24", "c3r25", "c3r26", "c3r27", "c3r28", "c3r29", "c3r30", "c3r31",\
782 }
783
784 /* Print operand X (an rtx) in assembler syntax to file FILE.  */
785 #define PRINT_OPERAND(STREAM, X, CODE)  score_print_operand (STREAM, X, CODE)
786
787 /* A C expression which evaluates to true if CODE is a valid
788    punctuation character for use in the `PRINT_OPERAND' macro.  */
789 #define PRINT_OPERAND_PUNCT_VALID_P(C)  ((C) == '[' || (C) == ']')
790
791 /* Print a memory address as an operand to reference that memory location.  */
792 #define PRINT_OPERAND_ADDRESS(STREAM, X) \
793   score_print_operand_address (STREAM, X)
794
795 /* By default on the S+core, external symbols do not have an underscore
796    prepended.  */
797 #define USER_LABEL_PREFIX        ""
798
799 /* This is how to output an insn to push a register on the stack.  */
800 #define ASM_OUTPUT_REG_PUSH(STREAM, REGNO)       \
801   do {                                           \
802     fprintf (STREAM, "\tpush! %s,[%s]\n",        \
803              reg_names[REGNO],                   \
804              reg_names[STACK_POINTER_REGNUM]);   \
805   } while (0)
806
807 /* This is how to output an insn to pop a register from the stack.  */
808 #define ASM_OUTPUT_REG_POP(STREAM, REGNO)        \
809   do {                                           \
810     fprintf (STREAM, "\tpop! %s,[%s]\n",         \
811              reg_names[REGNO],                   \
812              reg_names[STACK_POINTER_REGNUM]);   \
813   } while (0)
814
815 /* Output of Dispatch Tables.  */
816 /* This is how to output an element of a case-vector.  We can make the
817    entries PC-relative in GP-relative when .gp(d)word is supported.  */
818 #define ASM_OUTPUT_ADDR_DIFF_ELT(STREAM, BODY, VALUE, REL)              \
819   do {                                                                  \
820     if (flag_pic)                                                       \
821       fprintf (STREAM, "\t.gpword %sL%d\n", LOCAL_LABEL_PREFIX, VALUE); \
822     else                                                                \
823       fprintf (STREAM, "\t.word %sL%d\n", LOCAL_LABEL_PREFIX, VALUE);   \
824   } while (0)
825
826 /* This is how to output an element of a case-vector that is absolute.  */
827 #define ASM_OUTPUT_ADDR_VEC_ELT(STREAM, VALUE) \
828   fprintf (STREAM, "\t.word %sL%d\n", LOCAL_LABEL_PREFIX, VALUE)
829
830 /* Assembler Commands for Exception Regions  */
831 /* Since the S+core is encoded in the least-significant bit
832    of the address, mask it off return addresses for purposes of
833    finding exception handling regions.  */
834 #define MASK_RETURN_ADDR               constm1_rtx
835
836 /* Assembler Commands for Alignment  */
837 /* This is how to output an assembler line to advance the location
838    counter by SIZE bytes.  */
839 #undef ASM_OUTPUT_SKIP
840 #define ASM_OUTPUT_SKIP(STREAM, SIZE) \
841   fprintf (STREAM, "\t.space\t"HOST_WIDE_INT_PRINT_UNSIGNED"\n", (SIZE))
842
843 /* This is how to output an assembler line
844    that says to advance the location counter
845    to a multiple of 2**LOG bytes.  */
846 #define ASM_OUTPUT_ALIGN(STREAM, LOG) \
847   fprintf (STREAM, "\t.align\t%d\n", (LOG))
848
849 /* Macros Affecting All Debugging Formats.  */
850 #ifndef PREFERRED_DEBUGGING_TYPE
851 #define PREFERRED_DEBUGGING_TYPE         DWARF2_DEBUG
852 #endif
853
854 /* Specific Options for DBX Output.  */
855 #define DBX_DEBUGGING_INFO              1
856
857 /* By default, turn on GDB extensions.  */
858 #define DEFAULT_GDB_EXTENSIONS          1
859
860 #define DBX_CONTIN_LENGTH               0
861
862 /* File Names in DBX Format.  */
863 #define DWARF2_DEBUGGING_INFO           1
864
865 /* The DWARF 2 CFA column which tracks the return address.  */
866 #define DWARF_FRAME_RETURN_COLUMN       3
867
868 /* Specify the machine mode that this machine uses
869    for the index in the tablejump instruction.  */
870 #define CASE_VECTOR_MODE                SImode
871
872 /* Define if operations between registers always perform the operation
873    on the full register even if a narrower mode is specified.  */
874 #define WORD_REGISTER_OPERATIONS
875
876 /*  All references are zero extended.  */
877 #define LOAD_EXTEND_OP(MODE)            ZERO_EXTEND
878
879 /* Define if loading short immediate values into registers sign extends.  */
880 #define SHORT_IMMEDIATES_SIGN_EXTEND
881
882 /* Max number of bytes we can move from memory to memory
883    in one reasonably fast instruction.  */
884 #define MOVE_MAX                        4
885
886 /* Define this to be nonzero if shift instructions ignore all but the low-order
887    few bits.  */
888 #define SHIFT_COUNT_TRUNCATED           1
889
890 /* Value is 1 if truncating an integer of INPREC bits to OUTPREC bits
891    is done just by pretending it is already truncated.  */
892 #define TRULY_NOOP_TRUNCATION(OUTPREC, INPREC) 1
893
894 /* Specify the machine mode that pointers have.
895    After generation of rtl, the compiler makes no further distinction
896    between pointers and any other objects of this machine mode.  */
897 #define Pmode                           SImode
898
899 /* Give call MEMs SImode since it is the "most permissive" mode
900    for 32-bit targets.  */
901 #define FUNCTION_MODE                   Pmode
902
903 struct extern_list GTY ((chain_next ("%h.next")))
904 {
905   struct extern_list *next;             /* next external  */
906   const char *name;                     /* name of the external  */
907   int size;                             /* size in bytes  */
908 };
909
910 extern GTY (()) struct extern_list      *extern_head ;