OSDN Git Service

PR c/448
[pf3gnuchains/gcc-fork.git] / gcc / config / score / score.h
1 /* score.h for Sunplus S+CORE processor
2    Copyright (C) 2005, 2007, 2008, 2009 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 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 #include "score-conv.h"
22
23 /* Controlling the Compilation Driver.  */
24 #undef SWITCH_TAKES_ARG
25 #define SWITCH_TAKES_ARG(CHAR) \
26   (DEFAULT_SWITCH_TAKES_ARG (CHAR) || (CHAR) == 'G')
27
28 #undef CPP_SPEC
29 #define CPP_SPEC                 "%{mscore3:-D__score3__} %{G*}"
30
31 #undef CC1_SPEC
32 #define CC1_SPEC                 "%{!mel:-meb} %{mel:-mel } \
33 %{!mscore*:-mscore7}    \
34 %{mscore3:-mscore3}     \
35 %{mscore3d:-mscore3d}   \
36 %{mscore7:-mscore7}     \
37 %{mscore7d:-mscore7d}   \
38 %{G*}"
39
40 #undef ASM_SPEC
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}    \
53 %{G*}"
54
55 #undef LINK_SPEC
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}     \
68 %{G*}"
69
70 /* Run-time Target Specification.  */
71 #define TARGET_CPU_CPP_BUILTINS()               \
72   do {                                          \
73     builtin_define ("SUNPLUS");                 \
74     builtin_define ("__SCORE__");               \
75     builtin_define ("__score__");               \
76     if (TARGET_LITTLE_ENDIAN)                   \
77       builtin_define ("__scorele__");           \
78     else                                        \
79       builtin_define ("__scorebe__");           \
80     if (TARGET_SCORE5)                          \
81       builtin_define ("__score5__");            \
82     if (TARGET_SCORE5U)                         \
83       builtin_define ("__score5u__");           \
84     if (TARGET_SCORE7)                          \
85       builtin_define ("__score7__");            \
86     if (TARGET_SCORE7D)                         \
87       builtin_define ("__score7d__");           \
88     if (TARGET_SCORE3)                          \
89       builtin_define ("__score3__");            \
90     if (TARGET_SCORE3D)                         \
91       builtin_define ("__score3d__");           \
92   } while (0)
93
94 #define TARGET_DEFAULT         0
95
96 #define SCORE_GCC_VERSION      "1.6"
97
98 #define TARGET_VERSION \
99       fprintf (stderr, "Sunplus S+core rev=%s", SCORE_GCC_VERSION);
100
101 #define OVERRIDE_OPTIONS       score_override_options ()
102
103 /* Show we can debug even without a frame pointer.  */
104 #define CAN_DEBUG_WITHOUT_FP
105
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)
110
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
115 #else
116 #define LIBGCC2_WORDS_BIG_ENDIAN       1
117 #endif
118
119 /* Width of a word, in units (bytes).  */
120 #define UNITS_PER_WORD                 4
121
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) \
130     (MODE) = SImode;
131
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
135
136 /* Allocation boundary (in *bits*) for the code of a function.  */
137 #define FUNCTION_BOUNDARY              BITS_PER_WORD
138
139 /* There is no point aligning anything to a rounder boundary than this.  */
140 #define BIGGEST_ALIGNMENT              LONG_DOUBLE_TYPE_SIZE
141
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.
146
147    If this macro is not defined, then ALIGN is used.
148
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))
158
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
163    the object.
164
165    If this macro is not defined, then ALIGN is used.
166
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))
173
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.
178
179    If this macro is not defined, then ALIGN is used.
180
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))
187
188 /* Alignment of field after `int : 0' in a structure.  */
189 #define EMPTY_FIELD_BOUNDARY           32
190
191 /* All accesses must be aligned.  */
192 #define STRICT_ALIGNMENT               1
193
194 /* Score requires that structure alignment is affected by bitfields.  */
195 #define PCC_BITFIELD_TYPE_MATTERS      1
196
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
200
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
211
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
215
216 /* Default definitions for size_t and ptrdiff_t.  */
217 #define SIZE_TYPE                       "unsigned int"
218
219 #define UINTPTR_TYPE                    "long unsigned int"
220
221 /* Register Usage
222
223    S+core have:
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
231
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.
235
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.  */
241
242 /* Control Registers, use mfcr/mtcr insn
243     32        cr0         PSR
244     33        cr1         Condition
245     34        cr2         ECR
246     35        cr3         EXCPVec
247     36        cr4         CCR
248     37        cr5         EPC
249     38        cr6         EMA
250     39        cr7         TLBLock
251     40        cr8         TLBPT
252     41        cr8         PEADDR
253     42        cr10        TLBRPT
254     43        cr11        PEVN
255     44        cr12        PECTX
256     45        cr13
257     46        cr14
258     47        cr15
259
260     Custom Engine Register, use mfce/mtce
261     48        CEH        CEH
262     49        CEL        CEL
263
264     Special-Purpose Register, use mfsr/mtsr
265     50        sr0        CNT
266     51        sr1        LCR
267     52        sr2        SCR
268
269     53        ARG_POINTER_REGNUM
270     54        FRAME_POINTER_REGNUM
271     but Control register have 32 registers, cr16-cr31.  */
272 #define FIXED_REGISTERS                                  \
273 {                                                        \
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,        \
290 }
291
292 #define CALL_USED_REGISTERS                              \
293 {                                                        \
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,        \
309 }
310
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        }
322
323 /* Macro to conditionally modify fixed_regs/call_used_regs.  */
324 #define PIC_OFFSET_TABLE_REGNUM          29
325
326 #define CONDITIONAL_REGISTER_USAGE                     \
327 {                                                      \
328    if (!flag_pic)                                      \
329      fixed_regs[PIC_OFFSET_TABLE_REGNUM] =             \
330      call_used_regs[PIC_OFFSET_TABLE_REGNUM] = 0;      \
331 }
332
333 #define HARD_REGNO_NREGS(REGNO, MODE) \
334   ((GET_MODE_SIZE (MODE) + UNITS_PER_WORD - 1) / UNITS_PER_WORD)
335
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)
338
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))
348
349 /* Register Classes.  */
350 /* Define the classes of registers for register constraints in the
351    machine description.  Also define ranges of constants.  */
352 enum reg_class
353 {
354   NO_REGS,
355   G16_REGS,    /* r0 ~ r15 */
356   G32_REGS,    /* r0 ~ r31 */
357   T32_REGS,    /* r8 ~ r11 | r22 ~ r27 */
358
359   HI_REG,      /* hi                 */
360   LO_REG,      /* lo                 */
361   CE_REGS,     /* hi + lo            */
362
363   CN_REG,      /* cnt                */
364   LC_REG,      /* lcb                */
365   SC_REG,      /* scb                */
366   SP_REGS,     /* cnt + lcb + scb    */
367
368   CR_REGS,     /* cr0 - cr15         */
369
370   CP1_REGS,    /* cp1                */
371   CP2_REGS,    /* cp2                */
372   CP3_REGS,    /* cp3                */
373   CPA_REGS,    /* cp1 + cp2 + cp3    */
374
375   ALL_REGS,
376   LIM_REG_CLASSES
377 };
378
379 #define N_REG_CLASSES                  ((int) LIM_REG_CLASSES)
380
381 #define GENERAL_REGS                   G32_REGS
382
383 /* Give names of register classes as strings for dump file.  */
384 #define REG_CLASS_NAMES           \
385 {                                 \
386   "NO_REGS",                      \
387   "G16_REGS",                     \
388   "G32_REGS",                     \
389   "T32_REGS",                     \
390                                   \
391   "HI_REG",                       \
392   "LO_REG",                       \
393   "CE_REGS",                      \
394                                   \
395   "CN_REG",                       \
396   "LC_REG",                       \
397   "SC_REG",                       \
398   "SP_REGS",                      \
399                                   \
400   "CR_REGS",                      \
401                                   \
402   "CP1_REGS",                     \
403   "CP2_REGS",                     \
404   "CP3_REGS",                     \
405   "CPA_REGS",                     \
406                                   \
407   "ALL_REGS",                     \
408 }
409
410 /* Define which registers fit in which classes.  */
411 #define REG_CLASS_CONTENTS                                        \
412 {                                                                 \
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},  \
418   /* HI/LO/CE  */                                                 \
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},  \
433   /* ALL_REGS  */                                                 \
434   { 0xffffffff, 0x001fffff, 0xffffffff, 0xffffffff, 0xffffffff},  \
435 }
436
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)
442
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
449    marker.  */
450 #define IRA_COVER_CLASSES                                       \
451 {                                                               \
452   G32_REGS, CE_REGS, SP_REGS, LIM_REG_CLASSES                   \
453 }
454
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
459
460 /* The class value for index registers.  */
461 #define INDEX_REG_CLASS                NO_REGS
462
463 extern enum reg_class score_char_to_class[256];
464 #define REG_CLASS_FROM_LETTER(C)       score_char_to_class[(unsigned char) (C)]
465
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)
469
470 #define REGNO_OK_FOR_INDEX_P(NUM)       0
471
472 #define PREFERRED_RELOAD_CLASS(X, CLASS) \
473   score_preferred_reload_class (X, CLASS)
474
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)
478
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)
484
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)
489
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)
493
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)
500
501 /* Similar, but for floating constants, and defining letters G and H.
502    Here VALUE is the CONST_DOUBLE rtx itself.  */
503
504 #define CONST_DOUBLE_OK_FOR_LETTER_P(VALUE, C)        \
505   ((C) == 'G' && (VALUE) == CONST0_RTX (GET_MODE (VALUE)))
506
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
511    second operand.  */
512 #define EXTRA_CONSTRAINT(VALUE, C)      score_extra_constraint (VALUE, C)
513
514 /* Basic Stack Layout.  */
515 /* Stack layout; function entry, exit and calling.  */
516 #define STACK_GROWS_DOWNWARD
517
518 #define STACK_PUSH_CODE                 PRE_DEC
519 #define STACK_POP_CODE                  POST_INC
520
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
524
525 /* The argument pointer always points to the first argument.  */
526 #define FIRST_PARM_OFFSET(FUNDECL)      0
527
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)
531
532 /* Pick up the return address upon entry to a procedure.  */
533 #define INCOMING_RETURN_ADDR_RTX        gen_rtx_REG (VOIDmode, RA_REGNUM)
534
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)
539
540 /* The register that holds the return address in exception handlers.  */
541 #define EH_RETURN_STACKADJ_RTX          gen_rtx_REG (Pmode, EH_REGNUM)
542
543 /* Registers That Address the Stack Frame.  */
544 /* Register to use for pushing function arguments.  */
545 #define STACK_POINTER_REGNUM            SP_REGNUM
546
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
550
551 /*  we use r2 as the frame pointer.  */
552 #define HARD_FRAME_POINTER_REGNUM       FP_REGNUM
553
554 #define ARG_POINTER_REGNUM              54
555
556 /* Register in which static-chain is passed to a function.  */
557 #define STATIC_CHAIN_REGNUM             23
558
559 /* Elimination Frame Pointer and Arg Pointer  */
560 /* Value should be nonzero if functions must have frame pointers.
561    Zero means the frame pointer need not be set up (and parms
562    may be accessed via the stack pointer) in functions that seem suitable.
563    This is computed in `reload', in reload1.c.  */
564 #define FRAME_POINTER_REQUIRED          cfun->calls_alloca
565
566 #define ELIMINABLE_REGS                                \
567   {{ ARG_POINTER_REGNUM, STACK_POINTER_REGNUM},        \
568    { ARG_POINTER_REGNUM, HARD_FRAME_POINTER_REGNUM},   \
569    { FRAME_POINTER_REGNUM, STACK_POINTER_REGNUM},      \
570    { FRAME_POINTER_REGNUM, HARD_FRAME_POINTER_REGNUM}}
571
572 /* We can always eliminate to the hard frame pointer.  We can eliminate
573    to the stack pointer unless a frame pointer is needed.  */
574 #define CAN_ELIMINATE(FROM, TO)        \
575   (((TO) == HARD_FRAME_POINTER_REGNUM) \
576    || ((TO) == STACK_POINTER_REGNUM    \
577        && !frame_pointer_needed))
578
579 #define INITIAL_ELIMINATION_OFFSET(FROM, TO, OFFSET) \
580   (OFFSET) = score_initial_elimination_offset ((FROM), (TO))
581
582 /* Passing Function Arguments on the Stack.  */
583 /* Allocate stack space for arguments at the beginning of each function.  */
584 #define ACCUMULATE_OUTGOING_ARGS        1
585
586 /* reserve stack space for all argument registers.  */
587 #define REG_PARM_STACK_SPACE(FNDECL)    UNITS_PER_WORD
588
589 /* Define this if it is the responsibility of the caller to
590    allocate the area reserved for arguments passed in registers.
591    If `ACCUMULATE_OUTGOING_ARGS' is also defined, the only effect
592    of this macro is to determine whether the space is included in
593    `crtl->outgoing_args_size'.  */
594 #define OUTGOING_REG_PARM_STACK_SPACE(FNTYPE) 1
595
596 #define RETURN_POPS_ARGS(FUNDECL, FUNTYPE, STACK_SIZE) 0
597
598 /* Passing Arguments in Registers  */
599 /* Determine where to put an argument to a function.
600    Value is zero to push the argument on the stack,
601    or a hard register in which to store the argument.
602
603    MODE is the argument's machine mode.
604    TYPE is the data type of the argument (as a tree).
605     This is null for libcalls where that information may
606     not be available.
607    CUM is a variable of type CUMULATIVE_ARGS which gives info about
608     the preceding args and about the function being called.
609    NAMED is nonzero if this argument is a named parameter
610     (otherwise it is an extra parameter matching an ellipsis).  */
611 #define FUNCTION_ARG(CUM, MODE, TYPE, NAMED) \
612   score_function_arg (&CUM, MODE, TYPE, NAMED)
613
614 /* A C type for declaring a variable that is used as the first argument of
615    `FUNCTION_ARG' and other related values.  For some target machines, the
616    type `int' suffices and can hold the number of bytes of argument so far.  */
617 typedef struct score_args
618 {
619   unsigned int arg_number;             /* how many arguments have been seen  */
620   unsigned int num_gprs;               /* number of gprs in use  */
621   unsigned int stack_words;            /* number of words in stack  */
622 } score_args_t;
623
624 #define CUMULATIVE_ARGS                score_args_t
625
626 /* Initialize a variable CUM of type CUMULATIVE_ARGS
627    for a call to a function whose data type is FNTYPE.
628    For a library call, FNTYPE is 0.  */
629 #define INIT_CUMULATIVE_ARGS(CUM, FNTYPE, LIBNAME, INDIRECT, n_named_args) \
630   score_init_cumulative_args (&CUM, FNTYPE, LIBNAME)
631
632 /* Update the data in CUM to advance over an argument
633    of mode MODE and data type TYPE.
634    (TYPE is null for libcalls where that information may not be available.)  */
635 #define FUNCTION_ARG_ADVANCE(CUM, MODE, TYPE, NAMED) \
636   score_function_arg_advance (&CUM, MODE, TYPE, NAMED)
637
638 /* 1 if N is a possible register number for function argument passing.
639    We have no FP argument registers when soft-float.  When FP registers
640    are 32 bits, we can't directly reference the odd numbered ones.  */
641 #define FUNCTION_ARG_REGNO_P(REGNO) \
642   REG_CONTAIN (REGNO, ARG_REG_FIRST, ARG_REG_NUM)
643
644 /* How Scalar Function Values Are Returned.  */
645 #define FUNCTION_VALUE(VALTYPE, FUNC) \
646   score_function_value ((VALTYPE), (FUNC), VOIDmode)
647
648 #define LIBCALL_VALUE(MODE)  score_function_value (NULL_TREE, NULL, (MODE))
649
650 /* 1 if N is a possible register number for a function value.  */
651 #define FUNCTION_VALUE_REGNO_P(REGNO)   ((REGNO) == (ARG_REG_FIRST))
652
653 #define PIC_FUNCTION_ADDR_REGNUM        (GP_REG_FIRST + 25)
654
655 /* How Large Values Are Returned.  */
656 #define STRUCT_VALUE                    0
657
658 /* Function Entry and Exit  */
659 /* EXIT_IGNORE_STACK should be nonzero if, when returning from a function,
660    the stack pointer does not matter.  The value is tested only in
661    functions that have frame pointers.
662    No definition is equivalent to always zero.  */
663 #define EXIT_IGNORE_STACK               1
664
665 /* Generating Code for Profiling  */
666 /* Output assembler code to FILE to increment profiler label # LABELNO
667    for profiling a function entry.  */
668 #define FUNCTION_PROFILER(FILE, LABELNO)                              \
669   do {                                                                \
670     if (TARGET_SCORE7)                                                \
671       {                                                               \
672         fprintf (FILE, " .set r1  \n");                               \
673         fprintf (FILE, " mv   r%d,r%d \n", AT_REGNUM, RA_REGNUM);     \
674         fprintf (FILE, " subi r%d, %d \n", STACK_POINTER_REGNUM, 8);  \
675         fprintf (FILE, " jl   _mcount \n");                           \
676         fprintf (FILE, " .set nor1 \n");                              \
677       }                                                               \
678     else if (TARGET_SCORE3)                                           \
679       {                                                               \
680         fprintf (FILE, " .set r1  \n");                               \
681         fprintf (FILE, " mv!   r%d,r%d \n", AT_REGNUM, RA_REGNUM);    \
682         fprintf (FILE, " addi! r%d, %d \n", STACK_POINTER_REGNUM, -8);\
683         fprintf (FILE, " jl   _mcount \n");                           \
684         fprintf (FILE, " .set nor1 \n");                              \
685       }                                                               \
686   } while (0)
687
688 #define TRAMPOLINE_TEMPLATE(STREAM)                                   \
689   do {                                                                \
690     if (TARGET_SCORE7)                                                \
691       {                                                               \
692         fprintf (STREAM, "\t.set r1\n");                              \
693         fprintf (STREAM, "\tmv r31, r3\n");                           \
694         fprintf (STREAM, "\tbl nextinsn\n");                          \
695         fprintf (STREAM, "nextinsn:\n");                              \
696         fprintf (STREAM, "\tlw r1, [r3, 6*4-8]\n");                   \
697         fprintf (STREAM, "\tlw r23, [r3, 6*4-4]\n");                  \
698         fprintf (STREAM, "\tmv r3, r31\n");                           \
699         fprintf (STREAM, "\tbr! r1\n");                               \
700         fprintf (STREAM, "\tnop!\n");                                 \
701         fprintf (STREAM, "\t.set nor1\n");                            \
702       }                                                               \
703     else if (TARGET_SCORE3)                                           \
704       {                                                               \
705         fprintf (STREAM, "\t.set r1\n");                              \
706         fprintf (STREAM, "\tmv! r31, r3\n");                          \
707         fprintf (STREAM, "\tnop!\n");                                 \
708         fprintf (STREAM, "\tbl nextinsn\n");                          \
709         fprintf (STREAM, "nextinsn:\n");                              \
710         fprintf (STREAM, "\tlw! r1, [r3, 6*4-8]\n");                  \
711         fprintf (STREAM, "\tnop!\n");                                 \
712         fprintf (STREAM, "\tlw r23, [r3, 6*4-4]\n");                  \
713         fprintf (STREAM, "\tmv! r3, r31\n");                          \
714         fprintf (STREAM, "\tnop!\n");                                 \
715         fprintf (STREAM, "\tbr! r1\n");                               \
716         fprintf (STREAM, "\tnop!\n");                                 \
717         fprintf (STREAM, "\t.set nor1\n");                            \
718       }                                                               \
719   } while (0)
720
721 /* Trampolines for Nested Functions.  */
722 #define TRAMPOLINE_INSNS                6
723
724 /* A C expression for the size in bytes of the trampoline, as an integer.  */
725 #define TRAMPOLINE_SIZE                (24 + GET_MODE_SIZE (ptr_mode) * 2)
726
727 /* A C statement to initialize the variable parts of a trampoline.
728    ADDR is an RTX for the address of the trampoline; FNADDR is an
729    RTX for the address of the nested function; STATIC_CHAIN is an
730    RTX for the static chain value that should be passed to the
731    function when it is called.  */
732
733 #define INITIALIZE_TRAMPOLINE(ADDR, FUNC, CHAIN) \
734   score_initialize_trampoline (ADDR, FUNC, CHAIN)
735
736 #define HAVE_PRE_INCREMENT              1
737 #define HAVE_PRE_DECREMENT              1
738 #define HAVE_POST_INCREMENT             1
739 #define HAVE_POST_DECREMENT             1
740 #define HAVE_PRE_MODIFY_DISP            1
741 #define HAVE_POST_MODIFY_DISP           1
742 #define HAVE_PRE_MODIFY_REG             0
743 #define HAVE_POST_MODIFY_REG            0
744
745 /* Recognize any constant value that is a valid address.  */
746 #define CONSTANT_ADDRESS_P(X)           CONSTANT_P (X)
747
748 /* Maximum number of registers that can appear in a valid memory address.  */
749 #define MAX_REGS_PER_ADDRESS            1
750
751 #ifdef REG_OK_STRICT
752 #define GO_IF_LEGITIMATE_ADDRESS(MODE, X, LABEL)   \
753   if (score_address_p (MODE, X, 1))                \
754     goto LABEL;
755 #else
756 #define GO_IF_LEGITIMATE_ADDRESS(MODE, X, LABEL)   \
757   if (score_address_p (MODE, X, 0))                \
758     goto LABEL;
759 #endif
760
761 /* The macros REG_OK_FOR..._P assume that the arg is a REG rtx
762    and check its validity for a certain class.
763    We have two alternate definitions for each of them.
764    The usual definition accepts all pseudo regs; the other rejects them all.
765    The symbol REG_OK_STRICT causes the latter definition to be used.
766
767    Most source files want to accept pseudo regs in the hope that
768    they will get allocated to the class that the insn wants them to be in.
769    Some source files that are used after register allocation
770    need to be strict.  */
771 #ifndef REG_OK_STRICT
772 #define REG_MODE_OK_FOR_BASE_P(X, MODE) \
773   score_regno_mode_ok_for_base_p (REGNO (X), 0)
774 #else
775 #define REG_MODE_OK_FOR_BASE_P(X, MODE) \
776   score_regno_mode_ok_for_base_p (REGNO (X), 1)
777 #endif
778
779 #define REG_OK_FOR_INDEX_P(X) 0
780
781 #define LEGITIMIZE_ADDRESS(X, OLDX, MODE, WIN)   \
782   do {                                           \
783     if (score_legitimize_address (&(X)))         \
784       goto WIN;                                  \
785   } while (0)
786
787 /* Go to LABEL if ADDR (a legitimate address expression)
788    has an effect that depends on the machine mode it is used for.  */
789 #define GO_IF_MODE_DEPENDENT_ADDRESS(ADDR, LABEL)       {}
790
791 #define LEGITIMATE_CONSTANT_P(X)        1
792
793 /* Condition Code Status.  */
794 #define SELECT_CC_MODE(OP, X, Y)        score_select_cc_mode (OP, X, Y)
795
796 /* Return nonzero if SELECT_CC_MODE will never return MODE for a
797    floating point inequality comparison.  */
798 #define REVERSIBLE_CC_MODE(MODE)        1
799
800 /* Describing Relative Costs of Operations  */
801 /* Compute extra cost of moving data between one register class and another.  */
802 #define REGISTER_MOVE_COST(MODE, FROM, TO) \
803   score_register_move_cost (MODE, FROM, TO)
804
805 /* Moves to and from memory are quite expensive */
806 #define MEMORY_MOVE_COST(MODE, CLASS, TO_P) \
807   (4 + memory_move_secondary_cost ((MODE), (CLASS), (TO_P)))
808
809 /* Try to generate sequences that don't involve branches.  */
810 #define BRANCH_COST(speed_p, predictable_p) 2
811
812 /* Nonzero if access to memory by bytes is slow and undesirable.  */
813 #define SLOW_BYTE_ACCESS                1
814
815 /* Define this macro if it is as good or better to call a constant
816    function address than to call an address kept in a register.  */
817 #define NO_FUNCTION_CSE                 1
818
819 /* Dividing the Output into Sections (Texts, Data, ...).  */
820 /* Define the strings to put out for each section in the object file.  */
821 #define TEXT_SECTION_ASM_OP             "\t.text"
822 #define DATA_SECTION_ASM_OP             "\t.data"
823 #define SDATA_SECTION_ASM_OP            "\t.sdata"
824
825 #undef  READONLY_DATA_SECTION_ASM_OP
826 #define READONLY_DATA_SECTION_ASM_OP    "\t.rdata"
827
828 /* The Overall Framework of an Assembler File  */
829 /* How to start an assembler comment.
830    The leading space is important.  */
831 #define ASM_COMMENT_START               "#"
832
833 /* Output to assembler file text saying following lines
834    may contain character constants, extra white space, comments, etc.  */
835 #define ASM_APP_ON                     "#APP\n\t.set volatile\n"
836
837 /* Output to assembler file text saying following lines
838    no longer contain unusual constructs.  */
839 #define ASM_APP_OFF                     "#NO_APP\n\t.set optimize\n"
840
841 /* Output of Uninitialized Variables.  */
842 /* This says how to define a global common symbol.  */
843 #define ASM_OUTPUT_ALIGNED_DECL_COMMON(STREAM, DECL, NAME, SIZE, ALIGN)     \
844   do {                                                                      \
845     fputs ("\n\t.comm\t", STREAM);                                          \
846     assemble_name (STREAM, NAME);                                           \
847     fprintf (STREAM, " , " HOST_WIDE_INT_PRINT_UNSIGNED ", %u\n",           \
848              SIZE, ALIGN / BITS_PER_UNIT);                                  \
849   } while (0)
850
851 /* This says how to define a local common symbol (i.e., not visible to
852    linker).  */
853 #undef ASM_OUTPUT_ALIGNED_LOCAL
854 #define ASM_OUTPUT_ALIGNED_LOCAL(STREAM, NAME, SIZE, ALIGN)                 \
855   do {                                                                      \
856     fputs ("\n\t.lcomm\t", STREAM);                                         \
857     assemble_name (STREAM, NAME);                                           \
858     fprintf (STREAM, " , " HOST_WIDE_INT_PRINT_UNSIGNED ", %u\n",           \
859              SIZE, ALIGN / BITS_PER_UNIT);                                  \
860   } while (0)
861
862 /* Globalizing directive for a label.  */
863 #define GLOBAL_ASM_OP                   "\t.globl\t"
864
865 /* Output and Generation of Labels  */
866 /* This is how to declare a function name.  The actual work of
867    emitting the label is moved to function_prologue, so that we can
868    get the line number correctly emitted before the .ent directive,
869    and after any .file directives.  Define as empty so that the function
870    is not declared before the .ent directive elsewhere.  */
871 #undef ASM_DECLARE_FUNCTION_NAME
872 #define ASM_DECLARE_FUNCTION_NAME(FILE, NAME, DECL)
873
874 #undef ASM_DECLARE_OBJECT_NAME
875 #define ASM_DECLARE_OBJECT_NAME(STREAM, NAME, DECL)   \
876   do {                                                \
877     assemble_name (STREAM, NAME);                     \
878     fprintf (STREAM, ":\n");                          \
879   } while (0)
880
881 /* This says how to output an external.  It would be possible not to
882    output anything and let undefined symbol become external. However
883    the assembler uses length information on externals to allocate in
884    data/sdata bss/sbss, thereby saving exec time.  */
885 #undef ASM_OUTPUT_EXTERNAL
886 #define ASM_OUTPUT_EXTERNAL(STREAM, DECL, NAME) \
887   score_output_external (STREAM, DECL, NAME)
888
889 /* This handles the magic '..CURRENT_FUNCTION' symbol, which means
890    'the start of the function that this code is output in'.  */
891 #define ASM_OUTPUT_LABELREF(STREAM, NAME) \
892   fprintf ((STREAM), "%s", (NAME))
893
894 /* Local compiler-generated symbols must have a prefix that the assembler
895    understands.  */
896 #define LOCAL_LABEL_PREFIX              (TARGET_SCORE7 ? "." : "$")
897
898 #undef ASM_GENERATE_INTERNAL_LABEL
899 #define ASM_GENERATE_INTERNAL_LABEL(LABEL, PREFIX, NUM) \
900   sprintf ((LABEL), "*%s%s%ld", (LOCAL_LABEL_PREFIX), (PREFIX), (long) (NUM))
901
902 /* Output of Assembler Instructions.  */
903 #define REGISTER_NAMES                                                    \
904 { "r0", "r1", "r2", "r3", "r4", "r5", "r6", "r7",                         \
905   "r8", "r9", "r10", "r11", "r12", "r13", "r14", "r15",                   \
906   "r16", "r17", "r18", "r19", "r20", "r21", "r22", "r23",                 \
907   "r24", "r25", "r26", "r27", "r28", "r29", "r30", "r31",                 \
908                                                                           \
909   "cr0", "cr1", "cr2", "cr3", "cr4", "cr5", "cr6", "cr7",                 \
910   "cr8", "cr9", "cr10", "cr11", "cr12", "cr13", "cr14", "cr15",           \
911                                                                           \
912   "ceh", "cel", "sr0", "sr1", "sr2", "_arg", "_frame", "",                \
913   "cr24", "cr25", "cr26", "cr27", "cr28", "cr29", "cr30", "cr31",         \
914                                                                           \
915   "c1r0", "c1r1", "c1r2", "c1r3", "c1r4", "c1r5", "c1r6", "c1r7",         \
916   "c1r8", "c1r9", "c1r10", "c1r11", "c1r12", "c1r13", "c1r14", "c1r15",   \
917   "c1r16", "c1r17", "c1r18", "c1r19", "c1r20", "c1r21", "c1r22", "c1r23", \
918   "c1r24", "c1r25", "c1r26", "c1r27", "c1r28", "c1r29", "c1r30", "c1r31", \
919                                                                           \
920   "c2r0", "c2r1", "c2r2", "c2r3", "c2r4", "c2r5", "c2r6", "c2r7",         \
921   "c2r8", "c2r9", "c2r10", "c2r11", "c2r12", "c2r13", "c2r14", "c2r15",   \
922   "c2r16", "c2r17", "c2r18", "c2r19", "c2r20", "c2r21", "c2r22", "c2r23", \
923   "c2r24", "c2r25", "c2r26", "c2r27", "c2r28", "c2r29", "c2r30", "c2r31", \
924                                                                           \
925   "c3r0", "c3r1", "c3r2", "c3r3", "c3r4", "c3r5", "c3r6", "c3r7",         \
926   "c3r8", "c3r9", "c3r10", "c3r11", "c3r12", "c3r13", "c3r14", "c3r15",   \
927   "c3r16", "c3r17", "c3r18", "c3r19", "c3r20", "c3r21", "c3r22", "c3r23", \
928   "c3r24", "c3r25", "c3r26", "c3r27", "c3r28", "c3r29", "c3r30", "c3r31", \
929 }
930
931 /* Print operand X (an rtx) in assembler syntax to file FILE.  */
932 #define PRINT_OPERAND(STREAM, X, CODE)  score_print_operand (STREAM, X, CODE)
933
934 /* A C expression which evaluates to true if CODE is a valid
935    punctuation character for use in the `PRINT_OPERAND' macro.  */
936 #define PRINT_OPERAND_PUNCT_VALID_P(C)  ((C) == '[' || (C) == ']')
937
938 /* Print a memory address as an operand to reference that memory location.  */
939 #define PRINT_OPERAND_ADDRESS(STREAM, X) \
940   score_print_operand_address (STREAM, X)
941
942 /* By default on the S+core, external symbols do not have an underscore
943    prepended.  */
944 #define USER_LABEL_PREFIX        ""
945
946 /* This is how to output an insn to push a register on the stack.  */
947 #define ASM_OUTPUT_REG_PUSH(STREAM, REGNO)           \
948   do {                                               \
949     if (TARGET_SCORE7)                               \
950         fprintf (STREAM, "\tpush! %s,[%s]\n",        \
951                  reg_names[REGNO],                   \
952                  reg_names[STACK_POINTER_REGNUM]);   \
953     else if (TARGET_SCORE3)                          \
954         fprintf (STREAM, "\tpush!\t%s\n",            \
955                  reg_names[REGNO]);                  \
956   } while (0)
957
958 /* This is how to output an insn to pop a register from the stack.  */
959 #define ASM_OUTPUT_REG_POP(STREAM, REGNO)            \
960   do {                                               \
961     if (TARGET_SCORE7)                               \
962       fprintf (STREAM, "\tpop! %s,[%s]\n",           \
963                reg_names[REGNO],                     \
964                reg_names[STACK_POINTER_REGNUM]);     \
965     else if (TARGET_SCORE3)                          \
966       fprintf (STREAM, "\tpop!\t%s\n",               \
967                reg_names[REGNO]);                    \
968   } while (0)
969
970 /* Output of Dispatch Tables.  */
971 /* This is how to output an element of a case-vector.  We can make the
972    entries PC-relative in GP-relative when .gp(d)word is supported.  */
973 #define ASM_OUTPUT_ADDR_DIFF_ELT(STREAM, BODY, VALUE, REL)                \
974   do {                                                                    \
975     if (TARGET_SCORE7)                                                    \
976       if (flag_pic)                                                       \
977         fprintf (STREAM, "\t.gpword %sL%d\n", LOCAL_LABEL_PREFIX, VALUE); \
978       else                                                                \
979         fprintf (STREAM, "\t.word %sL%d\n", LOCAL_LABEL_PREFIX, VALUE);   \
980     else if (TARGET_SCORE3)                                               \
981       {                                                                   \
982         switch (GET_MODE(BODY))                                           \
983           {                                                               \
984           case QImode: /* TBB */                                          \
985             asm_fprintf (STREAM, "\t.byte\t(%LL%d-%LL%d_tbb)/2\n",        \
986                          VALUE, REL);                                     \
987             break;                                                        \
988           case HImode: /* TBH */                                          \
989             asm_fprintf (STREAM, "\t.2byte\t(%LL%d-%LL%d_tbb)/2\n",       \
990                          VALUE, REL);                                     \
991             break;                                                        \
992           case SImode:                                                    \
993             if (flag_pic)                                                 \
994               fprintf (STREAM, "\t.gpword %sL%d\n", LOCAL_LABEL_PREFIX, VALUE); \
995             else                                                          \
996               fprintf (STREAM, "\t.word %sL%d\n", LOCAL_LABEL_PREFIX, VALUE);   \
997             break;                                                        \
998           default:                                                        \
999             gcc_unreachable();                                            \
1000           }                                                               \
1001       }                                                                   \
1002   } while (0)
1003
1004 /* Jump table alignment is explicit in ASM_OUTPUT_CASE_LABEL.  */
1005 #define ADDR_VEC_ALIGN(JUMPTABLE) (GET_MODE (PATTERN (JUMPTABLE)) == SImode ? 2 \
1006                                    : GET_MODE (PATTERN (JUMPTABLE)) == HImode ? 1 : 0)
1007
1008 /* This is how to output a label which precedes a jumptable.  Since
1009    Score3 instructions are 2 bytes, we may need explicit alignment here.  */
1010 #undef  ASM_OUTPUT_CASE_LABEL
1011 #define ASM_OUTPUT_CASE_LABEL(FILE, PREFIX, NUM, JUMPTABLE)             \
1012   do {                                                                  \
1013       if ((TARGET_SCORE7) && GET_MODE (PATTERN (JUMPTABLE)) == SImode)  \
1014         ASM_OUTPUT_ALIGN (FILE, 2);                                     \
1015       (*targetm.asm_out.internal_label) (FILE, PREFIX, NUM);            \
1016   } while (0)
1017
1018 /* Specify the machine mode that this machine uses
1019    for the index in the tablejump instruction.  */
1020 #define CASE_VECTOR_MODE                SImode
1021
1022 #define CASE_VECTOR_PC_RELATIVE         (TARGET_SCORE3)
1023
1024 #define CASE_VECTOR_SHORTEN_MODE(min, max, body)                \
1025    ((min < 0 || max >= 0x2000 || TARGET_SCORE7) ? SImode        \
1026    : (max >= 0x200) ? HImode                                    \
1027    : QImode)
1028
1029 /* This is how to output an element of a case-vector that is absolute.  */
1030 #define ASM_OUTPUT_ADDR_VEC_ELT(STREAM, VALUE) \
1031   fprintf (STREAM, "\t.word %sL%d\n", LOCAL_LABEL_PREFIX, VALUE)
1032
1033 /* Assembler Commands for Exception Regions  */
1034 /* Since the S+core is encoded in the least-significant bit
1035    of the address, mask it off return addresses for purposes of
1036    finding exception handling regions.  */
1037 #define MASK_RETURN_ADDR               constm1_rtx
1038
1039 /* Assembler Commands for Alignment  */
1040 /* This is how to output an assembler line to advance the location
1041    counter by SIZE bytes.  */
1042 #undef ASM_OUTPUT_SKIP
1043 #define ASM_OUTPUT_SKIP(STREAM, SIZE) \
1044   fprintf (STREAM, "\t.space\t"HOST_WIDE_INT_PRINT_UNSIGNED"\n", (SIZE))
1045
1046 /* This is how to output an assembler line
1047    that says to advance the location counter
1048    to a multiple of 2**LOG bytes.  */
1049 #define ASM_OUTPUT_ALIGN(STREAM, LOG) \
1050   fprintf (STREAM, "\t.align\t%d\n", (LOG))
1051
1052 /* Macros Affecting All Debugging Formats.  */
1053 #ifndef PREFERRED_DEBUGGING_TYPE
1054 #define PREFERRED_DEBUGGING_TYPE         DWARF2_DEBUG
1055 #endif
1056
1057 /* Specific Options for DBX Output.  */
1058 #define DBX_DEBUGGING_INFO              1
1059
1060 /* By default, turn on GDB extensions.  */
1061 #define DEFAULT_GDB_EXTENSIONS          1
1062
1063 #define DBX_CONTIN_LENGTH               0
1064
1065 /* File Names in DBX Format.  */
1066 #define DWARF2_DEBUGGING_INFO           1
1067
1068 /* The DWARF 2 CFA column which tracks the return address.  */
1069 #define DWARF_FRAME_RETURN_COLUMN       3
1070
1071 /* Define if operations between registers always perform the operation
1072    on the full register even if a narrower mode is specified.  */
1073 #define WORD_REGISTER_OPERATIONS
1074
1075 /*  All references are zero extended.  */
1076 #define LOAD_EXTEND_OP(MODE)            ZERO_EXTEND
1077
1078 /* Define if loading short immediate values into registers sign extends.  */
1079 #define SHORT_IMMEDIATES_SIGN_EXTEND
1080
1081 /* Max number of bytes we can move from memory to memory
1082    in one reasonably fast instruction.  */
1083 #define MOVE_MAX                        4
1084
1085 /* Define this to be nonzero if shift instructions ignore all but the low-order
1086    few bits.  */
1087 #define SHIFT_COUNT_TRUNCATED           1
1088
1089 /* Value is 1 if truncating an integer of INPREC bits to OUTPREC bits
1090    is done just by pretending it is already truncated.  */
1091 #define TRULY_NOOP_TRUNCATION(OUTPREC, INPREC) 1
1092
1093 /* Specify the machine mode that pointers have.
1094    After generation of rtl, the compiler makes no further distinction
1095    between pointers and any other objects of this machine mode.  */
1096 #define Pmode                           SImode
1097
1098 /* Give call MEMs SImode since it is the "most permissive" mode
1099    for 32-bit targets.  */
1100 #define FUNCTION_MODE                   Pmode
1101
1102 struct extern_list GTY ((chain_next ("%h.next")))
1103 {
1104   struct extern_list *next;             /* next external  */
1105   const char *name;                     /* name of the external  */
1106   int size;                             /* size in bytes  */
1107 };
1108
1109 extern GTY (()) struct extern_list      *extern_head;