mep.md (eh_epilogue): Defer until after epilogue is emitted.
[platform/upstream/gcc.git] / gcc / config / mep / mep.h
1 /* Definitions for Toshiba Media Processor
2    Copyright (C) 2001, 2003, 2004, 2005, 2007, 2008, 2009
3    Free Software Foundation, Inc.
4    Contributed by Red Hat, Inc.
5
6 This file is part of GCC.
7
8 GCC is free software; you can redistribute it and/or modify it under
9 the terms of the GNU General Public License as published by the Free
10 Software Foundation; either version 3, or (at your option) any later
11 version.
12
13 GCC is distributed in the hope that it will be useful, but WITHOUT ANY
14 WARRANTY; without even the implied warranty of MERCHANTABILITY or
15 FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
16 for more details.
17
18 You should have received a copy of the GNU General Public License
19 along with GCC; see the file COPYING3.  If not see
20 <http://www.gnu.org/licenses/>.  */
21 \f
22
23 #undef  CPP_SPEC
24 #define CPP_SPEC "\
25 -D__MEP__ -D__MeP__ \
26 -D__section(_x)=__attribute__((section(_x))) \
27 -D__align(_x)=__attribute__((aligned(_x))) \
28 -D__io(_x)=__attribute__((io(_x))) \
29 -D__cb(_x)=__attribute__((cb(_x))) \
30 -D__based=__attribute__((based)) \
31 -D__tiny=__attribute__((tiny)) \
32 -D__near=__attribute__((near)) \
33 -D__far=__attribute__((far)) \
34 -D__vliw=__attribute__((vliw)) \
35 -D__interrupt=__attribute__((interrupt)) \
36 -D__disinterrupt=__attribute__((disinterrupt)) \
37 %{!meb:%{!mel:-D__BIG_ENDIAN__}} \
38 %{meb:-U__LITTLE_ENDIAN__ -D__BIG_ENDIAN__} \
39 %{mel:-U__BIG_ENDIAN__ -D__LITTLE_ENDIAN__} \
40 %{mconfig=*:-D__MEP_CONFIG_%*} \
41 %{mivc2:-D__MEP_CONFIG_CP_DATA_BUS_WIDTH=64} \
42 "
43
44 #undef  CC1_SPEC
45 #define CC1_SPEC "%{!mlibrary:%(config_cc_spec)} \
46 %{!.cc:%{O2:%{!funroll*:--param max-completely-peeled-insns=6 \
47                         --param max-unrolled-insns=6 -funroll-loops}}}"
48
49 #undef  CC1PLUS_SPEC
50 #define CC1PLUS_SPEC "%{!mlibrary:%(config_cc_spec)}"
51
52 #undef  ASM_SPEC
53 #define ASM_SPEC "%{mconfig=*} %{meb:-EB} %{mel:-EL} \
54 %{mno-satur} %{msatur} %{mno-clip} %{mclip} %{mno-minmax} %{mminmax} \
55 %{mno-absdiff} %{mabsdiff} %{mno-leadz} %{mleadz} %{mno-bitops} %{mbitops} \
56 %{mno-div} %{mdiv} %{mno-mult} %{mmult} %{mno-average} %{maverage} \
57 %{mcop32} %{mno-debug} %{mdebug} %{mlibrary}"
58
59 /* The MeP config tool will edit this spec.  */
60 #undef  STARTFILE_SPEC
61 #define STARTFILE_SPEC "%{msdram:%{msim:simsdram-crt0.o%s}} \
62 %{mno-sdram:%{msim:sim-crt0.o%s}} \
63 %{msdram:%{!msim*:sdram-crt0.o%s}} \
64 %{mno-sdram:%{!msim*:crt0.o%s}} \
65 %(config_start_spec) \
66 %{msimnovec:simnovec-crt0.o%s} \
67 crtbegin.o%s"
68
69 #undef  LIB_SPEC
70 #define LIB_SPEC "-( -lc %{msim*:-lsim}%{!msim*:-lnosys} -) %(config_link_spec)"
71
72 #undef  LINK_SPEC
73 #define LINK_SPEC "%{meb:-EB} %{mel:-EL}"
74
75 #undef  ENDFILE_SPEC
76 #define ENDFILE_SPEC "crtend.o%s %{msim*:sim-crtn.o%s}%{!msim*:crtn.o%s}"
77
78 /* The MeP config tool will edit this spec.  */
79 #define CONFIG_CC_SPEC "\
80 %{mconfig=default: -mbitops -mleadz -mabsdiff -maverage -mminmax -mclip -msatur -mvl64 -mvliw -mcop64 -D__MEP_CONFIG_CP_DATA_BUS_WIDTH=64 -mivc2}\
81 "
82 /* end-config-cc-spec */
83
84 /* The MeP config tool will edit this spec.  */
85 #define CONFIG_LINK_SPEC "\
86 %{mconfig=default: %{!T*:-Tdefault.ld}}\
87 "
88 /* end-config-link-spec */
89
90 /* The MeP config tool will edit this spec.  */
91 #define CONFIG_START_SPEC "\
92 %{!msdram:%{!mno-sdram:%{!msim*:crt0.o%s}}} \
93 %{!msdram:%{!mno-sdram:%{msim:sim-crt0.o%s}}} \
94 "
95 /* end-config-start-spec */
96
97 #define EXTRA_SPECS \
98   { "config_cc_spec",  CONFIG_CC_SPEC }, \
99   { "config_link_spec",  CONFIG_LINK_SPEC }, \
100   { "config_start_spec",  CONFIG_START_SPEC },
101 \f
102
103 #define TARGET_CPU_CPP_BUILTINS()               \
104   do                                            \
105     {                                           \
106       builtin_define_std ("mep");               \
107       builtin_assert ("machine=mep");           \
108     }                                           \
109   while (0)
110
111 extern int target_flags;
112
113 /* Controlled by MeP-Integrator.  */
114 #define TARGET_H1               0
115
116 #define MEP_ALL_OPTS    (MASK_OPT_AVERAGE       \
117                          | MASK_OPT_MULT        \
118                          | MASK_OPT_DIV         \
119                          | MASK_OPT_BITOPS      \
120                          | MASK_OPT_LEADZ       \
121                          | MASK_OPT_ABSDIFF     \
122                          | MASK_OPT_MINMAX      \
123                          | MASK_OPT_CLIP        \
124                          | MASK_OPT_SATUR )
125
126 #define TARGET_DEFAULT          (MASK_IO_VOLATILE | MASK_OPT_REPEAT | MEP_ALL_OPTS | MASK_LITTLE_ENDIAN)
127
128 #define TARGET_IO_NO_VOLATILE   (! (target_flags & MASK_IO_VOLATILE))
129 #define TARGET_OPT_NOREPEAT     (! (target_flags & MASK_OPT_REPEAT))
130 #define TARGET_32BIT_CR_REGS    (! (target_flags & MASK_64BIT_CR_REGS))
131 #define TARGET_BIG_ENDIAN       (! (target_flags & MASK_LITTLE_ENDIAN))
132
133 #define TARGET_COPRO_MULT       0
134
135 #define TARGET_VERSION fprintf (stderr, " (Toshiba Media Processor (MeP))");
136
137 #define OVERRIDE_OPTIONS mep_override_options ();
138
139 /* The MeP config tool will add TARGET_OPTION_TRANSLATE_TABLE here.  */
140 #define TARGET_OPTION_TRANSLATE_TABLE \
141   {"-mall-opts", "-maverage -mmult -mdiv -mbitops -mleadz \
142                   -mabsdiff -mminmax -mclip -msatur -mdebug" }, \
143   {"-mno-opts", "-mno-average -mno-mult -mno-div -mno-bitops -mno-leadz \
144                   -mno-absdiff -mno-minmax -mno-clip -mno-satur -mno-debug" }, \
145   {"-mfar", "-ml -mtf -mc=far" } \
146 /* start-target-option-table */ \
147 , {"-mconfig=default", "-mconfig=default -mmult -mdiv -D__MEP_CONFIG_ISA=1" } \
148 /* end-target-option-table */
149
150 /* The MeP config tool will replace this as appropriate.  */
151 #define DEFAULT_ENDIAN_SPEC "%{!meb: -mel}"
152
153 /* The MeP config tool will replace this with an -mconfig= switch.  */
154 #define LIBRARY_CONFIG_SPEC "-mconfig=default"
155
156 /* Don't add an endian option when building the libraries.  */
157 #define DRIVER_SELF_SPECS \
158   "%{!mlibrary:" DEFAULT_ENDIAN_SPEC "}", \
159   "%{mlibrary: " LIBRARY_CONFIG_SPEC " %{!mel:-meb}}"
160
161 /* The MeP config tool will add COPROC_SELECTION_TABLE here.  */
162 /* start-coproc-selection-table */
163 #define COPROC_SELECTION_TABLE \
164 {"default", ISA_EXT1}
165 /* end-coproc-selection-table */
166
167 #define CAN_DEBUG_WITHOUT_FP
168
169 #define OPTIMIZATION_OPTIONS(LEVEL, FOR_SIZE) mep_optimization_options ()
170 \f
171
172 #define BITS_BIG_ENDIAN 0
173 #define BYTES_BIG_ENDIAN (TARGET_LITTLE_ENDIAN ? 0 : 1)
174 #define WORDS_BIG_ENDIAN (TARGET_LITTLE_ENDIAN ? 0 : 1)
175
176 #ifdef __LITTLE_ENDIAN__
177 #define LIBGCC2_WORDS_BIG_ENDIAN 0
178 #else
179 #define LIBGCC2_WORDS_BIG_ENDIAN 1
180 #endif
181
182 #define UNITS_PER_WORD 4
183
184 #define PROMOTE_MODE(MODE, UNSIGNEDP, TYPE)     \
185   do                                            \
186     {                                           \
187       if (GET_MODE_CLASS (MODE) == MODE_INT     \
188           && GET_MODE_SIZE (MODE) < 4)          \
189         (MODE) = SImode;                \
190     }                                           \
191   while (0)
192
193 #define PARM_BOUNDARY 32
194 #define STACK_BOUNDARY 32
195 #define PREFERRED_STACK_BOUNDARY 64
196 #define FUNCTION_BOUNDARY 16
197 #define BIGGEST_ALIGNMENT 64
198
199 #define DATA_ALIGNMENT(TYPE, ALIGN)             \
200   (TREE_CODE (TYPE) == ARRAY_TYPE               \
201    && TYPE_MODE (TREE_TYPE (TYPE)) == QImode    \
202    && (ALIGN) < BITS_PER_WORD ? BITS_PER_WORD : (ALIGN))
203
204 #define CONSTANT_ALIGNMENT(EXP, ALIGN)  \
205   (TREE_CODE (EXP) == STRING_CST        \
206    && (ALIGN) < BITS_PER_WORD ? BITS_PER_WORD : (ALIGN))
207
208 #define STRICT_ALIGNMENT 1
209
210 #define PCC_BITFIELD_TYPE_MATTERS 1
211
212 #define DEFAULT_VTABLE_THUNKS 1
213
214 \f
215 #define INT_TYPE_SIZE         32
216 #define SHORT_TYPE_SIZE       16
217 #define LONG_TYPE_SIZE        32
218 #define LONG_LONG_TYPE_SIZE   64
219 #define CHAR_TYPE_SIZE         8
220 #define FLOAT_TYPE_SIZE       32
221 #define DOUBLE_TYPE_SIZE      64
222 #define LONG_DOUBLE_TYPE_SIZE 64
223 #define DEFAULT_SIGNED_CHAR    1
224 \f
225 /* Register numbers:
226         0..15   core registers
227         16..47  control registers
228         48..79  coprocessor registers
229         80..111 coprocessor control registers
230         112     virtual arg pointer register  */
231
232 #define FIRST_PSEUDO_REGISTER (LAST_SHADOW_REGISTER + 1)
233
234   /* R12 is optionally FP.  R13 is TP, R14 is GP, R15 is SP. */
235   /* hi and lo can be used as general registers.  Others have
236      immutable bits.  */
237 /* A "1" here means the register is generally not available to gcc,
238    and is assumed to remain unchanged or unused throughout.  */
239 #define FIXED_REGISTERS {                               \
240   /* core registers */                                  \
241   0, 0, 0, 0,  0, 0, 0, 0,  0, 0, 0, 0,  0, 0, 0, 1,    \
242   /* control registers */                               \
243   1, 1, 1, 1,  1, 1, 1, 0,  0, 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   /* coprocessor registers */                           \
246   1, 1, 1, 1,  1, 1, 1, 1,  1, 1, 1, 1,  1, 1, 1, 1,    \
247   1, 1, 1, 1,  1, 1, 1, 1,  1, 1, 1, 1,  1, 1, 1, 1,    \
248   /* coprocessor control registers */                   \
249   1, 1, 1, 1,  1, 1, 1, 1,  1, 1, 1, 1,  1, 1, 1, 1,    \
250   1, 1, 1, 1,  1, 1, 1, 1,  1, 1, 1, 1,  1, 1, 1, 1,    \
251   /* virtual arg pointer */                             \
252   1, FIXED_SHADOW_REGISTERS                             \
253   }
254
255 /* This is a call-clobbered reg not used for args or return value,
256    that we use as a temp for saving control registers in the prolog
257    and restoring them in the epilog. */
258 #define REGSAVE_CONTROL_TEMP    11
259
260 /* A "1" here means a register may be changed by a function without
261    needing to preserve its previous value.  */
262 #define CALL_USED_REGISTERS {                           \
263   /* core registers */                                  \
264   1, 1, 1, 1,  1, 0, 0, 0,  0, 1, 1, 1,  1, 0, 0, 1,    \
265   /* control registers */                               \
266   1, 1, 1, 1,  1, 1, 1, 1,  1, 1, 1, 1,  1, 1, 1, 1,    \
267   1, 1, 1, 1,  1, 1, 1, 1,  1, 1, 1, 1,  1, 1, 1, 1,    \
268   /* coprocessor registers */                           \
269   1, 1, 1, 1,  1, 1, 1, 1,  1, 1, 1, 1,  1, 1, 1, 1,    \
270   1, 1, 1, 1,  1, 1, 1, 1,  1, 1, 1, 1,  1, 1, 1, 1,    \
271   /* coprocessor control registers */                   \
272   1, 1, 1, 1,  1, 1, 1, 1,  1, 1, 1, 1,  1, 1, 1, 1,    \
273   1, 1, 1, 1,  1, 1, 1, 1,  1, 1, 1, 1,  1, 1, 1, 1,    \
274   /* virtual arg pointer */                             \
275   1, CALL_USED_SHADOW_REGISTERS                         \
276   }
277
278 #define CONDITIONAL_REGISTER_USAGE \
279         mep_conditional_register_usage (fixed_regs, call_used_regs);
280
281 #define REG_ALLOC_ORDER {                                               \
282   /* core registers */                                                  \
283   3, 2, 1, 0, 9, 10, 11, 12, 4, 5, 6, 7, 8, 13, 14, 15,                 \
284   /* control registers */                                               \
285   16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31,       \
286   32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47,       \
287   /* coprocessor registers */                                           \
288   /* Prefer to use the non-loadable registers when looking for a        \
289      member of CR_REGS (as opposed to LOADABLE_CR_REGS).  */            \
290   64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 48, 49, 50, 51, 52, 58,       \
291   59, 60, 61, 62, 63, 53, 54, 55, 56, 57, 74, 75, 76, 77, 78, 79,       \
292   /* coprocessor control registers */                                   \
293   80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95,       \
294   96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, \
295   /* virtual arg pointer */                                             \
296   112, SHADOW_REG_ALLOC_ORDER                                           \
297   }
298
299 /* We must somehow disable register remapping for interrupt functions.  */
300 extern char mep_leaf_registers[];
301 #define LEAF_REGISTERS mep_leaf_registers
302 #define LEAF_REG_REMAP(REG) (REG)
303
304 \f
305 #define FIRST_GR_REGNO 0
306 #define FIRST_CONTROL_REGNO (FIRST_GR_REGNO + 16)
307 #define FIRST_CR_REGNO (FIRST_CONTROL_REGNO + 32)
308 #define FIRST_CCR_REGNO (FIRST_CR_REGNO + 32)
309
310 #define GR_REGNO_P(REGNO) \
311   ((unsigned) ((REGNO) - FIRST_GR_REGNO) < 16)
312
313 #define CONTROL_REGNO_P(REGNO) \
314   ((unsigned) ((REGNO) - FIRST_CONTROL_REGNO) < 32)
315
316 #define LOADABLE_CR_REGNO_P(REGNO) \
317   ((unsigned) ((REGNO) - FIRST_CR_REGNO) < 16)
318
319 #define CR_REGNO_P(REGNO) \
320   ((unsigned) ((REGNO) - FIRST_CR_REGNO) < 32)
321
322 #define CCR_REGNO_P(REGNO) \
323   ((unsigned) ((REGNO) - FIRST_CCR_REGNO) < 32)
324
325 #define ANY_CONTROL_REGNO_P(REGNO) \
326   (CONTROL_REGNO_P (REGNO) || CCR_REGNO_P (REGNO))
327
328 #define HARD_REGNO_NREGS(REGNO, MODE)           \
329   ((CR_REGNO_P (REGNO) && TARGET_64BIT_CR_REGS) \
330    ? (GET_MODE_SIZE (MODE) + 8 - 1) / 8         \
331    : (GET_MODE_SIZE (MODE) + 4 - 1) / 4)
332
333 #define HARD_REGNO_MODE_OK(REGNO, MODE) 1
334
335 #define MODES_TIEABLE_P(MODE1, MODE2) 1
336
337 #define CANNOT_CHANGE_MODE_CLASS(FROM, TO, CLASS) \
338   mep_cannot_change_mode_class (FROM, TO, CLASS)
339 \f
340 enum reg_class
341 {
342   NO_REGS,
343   SP_REGS,
344   TP_REGS,
345   GP_REGS,
346   R0_REGS,
347   RPC_REGS,
348   HI_REGS,
349   LO_REGS,
350   HILO_REGS,
351   TPREL_REGS,
352   GENERAL_NOT_R0_REGS,
353   GENERAL_REGS,
354   CONTROL_REGS,
355   CONTROL_OR_GENERAL_REGS,
356   USER0_REGS,
357   USER1_REGS,
358   USER2_REGS,
359   USER3_REGS,
360   LOADABLE_CR_REGS,
361   CR_REGS,
362   CCR_REGS,
363   ALL_REGS,
364   LIM_REG_CLASSES
365 };
366
367 #define N_REG_CLASSES ((int) LIM_REG_CLASSES)
368
369 #define REG_CLASS_NAMES { \
370   "NO_REGS", \
371   "SP_REGS", \
372   "TP_REGS", \
373   "GP_REGS", \
374   "R0_REGS", \
375   "RPC_REGS", \
376   "HI_REGS", \
377   "LO_REGS", \
378   "HILO_REGS", \
379   "TPREL_REGS", \
380   "GENERAL_NOT_R0_REGS", \
381   "GENERAL_REGS", \
382   "CONTROL_REGS", \
383   "CONTROL_OR_GENERAL_REGS", \
384   "USER0_REGS", \
385   "USER1_REGS", \
386   "USER2_REGS", \
387   "USER3_REGS", \
388   "LOADABLE_CR_REGS", \
389   "CR_REGS", \
390   "CCR_REGS", \
391   "ALL_REGS" }
392
393 #define REG_CLASS_CONTENTS { \
394   { 0x00000000, 0x00000000, 0x00000000, 0x00000000 }, /* NO_REGS */ \
395   { 0x00008000, 0x00000000, 0x00000000, 0x00000000 }, /* SP_REGS */ \
396   { 0x00002000, 0x00000000, 0x00000000, 0x00000000 }, /* TP_REGS */ \
397   { 0x00004000, 0x00000000, 0x00000000, 0x00000000 }, /* GP_REGS */ \
398   { 0x00000001, 0x00000000, 0x00000000, 0x00000000 }, /* R0_REGS */ \
399   { 0x00400000, 0x00000000, 0x00000000, 0x00000000 }, /* RPC_REGS */ \
400   { 0x00800000, 0x00000000, 0x00000000, 0x00000000 }, /* HI_REGS */ \
401   { 0x01000000, 0x00000000, 0x00000000, 0x00000000 }, /* LO_REGS */ \
402   { 0x01800000, 0x00000000, 0x00000000, 0x00000000 }, /* HILO_REGS */ \
403   { 0x000000ff, 0x00000000, 0x00000000, 0x00000000 }, /* TPREL_REGS */ \
404   { 0x0000fffe, 0x00000000, 0x00000000, 0x00000000 }, /* GENERAL_NOT_R0_REGS */ \
405   { 0x0000ffff, 0x00000000, 0x00000000, 0x00010000 }, /* GENERAL_REGS */ \
406   { 0xffff0000, 0x0000ffff, 0x00000000, 0x00000000 }, /* CONTROL_REGS */ \
407   { 0xffffffff, 0x0000ffff, 0x00000000, 0x00000000 }, /* CONTROL_OR_GENERAL_REGS */ \
408   { 0x00000000, 0x00000000, 0x00000000, 0x00000000 }, /* USER0_REGS */ \
409   { 0x00000000, 0x00000000, 0x00000000, 0x00000000 }, /* USER1_REGS */ \
410   { 0x00000000, 0x00000000, 0x00000000, 0x00000000 }, /* USER2_REGS */ \
411   { 0x00000000, 0x00000000, 0x00000000, 0x00000000 }, /* USER3_REGS */ \
412   { 0x00000000, 0xffff0000, 0x00000000, 0x00000000 }, /* LOADABLE_CR_REGS */ \
413   { 0x00000000, 0xffff0000, 0x0000ffff, 0x00000000 }, /* CR_REGS */ \
414   { 0x00000000, 0x00000000, 0xffff0000, 0x0000ffff }, /* CCR_REGS */ \
415   { 0xffffffff, 0xffffffff, 0xffffffff, 0x0001ffff }, /* ALL_REGS */ \
416   }
417
418 #define REGNO_REG_CLASS(REGNO) mep_regno_reg_class (REGNO)
419
420 #define IRA_COVER_CLASSES { GENERAL_REGS, CONTROL_REGS, CR_REGS, CCR_REGS, LIM_REG_CLASSES }
421
422 #define BASE_REG_CLASS GENERAL_REGS
423 #define INDEX_REG_CLASS GENERAL_REGS
424
425 #if 0
426 #define REG_CLASS_FROM_CONSTRAINT(CHAR, STRING) \
427         mep_reg_class_from_constraint (CHAR, STRING)
428 #endif
429
430 #define REGNO_OK_FOR_BASE_P(NUM) (GR_REGNO_P (NUM) \
431         || (NUM) == ARG_POINTER_REGNUM \
432         || (NUM) >= FIRST_PSEUDO_REGISTER)
433
434 #define REGNO_OK_FOR_INDEX_P(NUM) REGNO_OK_FOR_BASE_P (NUM)
435
436 #define PREFERRED_RELOAD_CLASS(X, CLASS) mep_preferred_reload_class (X, CLASS)
437
438 #define SECONDARY_INPUT_RELOAD_CLASS(CLASS, MODE, X) \
439         mep_secondary_input_reload_class (CLASS, MODE, X)
440 #define SECONDARY_OUTPUT_RELOAD_CLASS(CLASS, MODE, X) \
441         mep_secondary_output_reload_class (CLASS, MODE, X)
442 #define SECONDARY_MEMORY_NEEDED(CLASS1, CLASS2, MODE) \
443         mep_secondary_memory_needed (CLASS1, CLASS2, MODE)
444
445 #define CLASS_MAX_NREGS(CLASS, MODE) \
446   ((GET_MODE_SIZE (MODE) + UNITS_PER_WORD - 1) / UNITS_PER_WORD)
447
448 #if 0
449 #define CONST_OK_FOR_LETTER_P(VALUE, C) mep_const_ok_for_letter_p (VALUE, C)
450
451 #define CONST_DOUBLE_OK_FOR_LETTER_P(VALUE, C) 0
452
453 #define CONSTRAINT_LEN(C, STR) \
454         ((C) == 'e' ? 2 : DEFAULT_CONSTRAINT_LEN (C, STR))
455 #define EXTRA_CONSTRAINT(VALUE, C) mep_extra_constraint (VALUE, C)
456 #endif
457
458 #define WANT_GCC_DECLARATIONS
459 #include "mep-intrin.h"
460 #undef WANT_GCC_DECLARATIONS
461
462 extern int mep_intrinsic_insn[];
463 extern unsigned int mep_selected_isa;
464
465 /* True if intrinsic X is available.  X is a mep_* value declared
466    in mep-intrin.h.  */
467 #define MEP_INTRINSIC_AVAILABLE_P(X) (mep_intrinsic_insn[X] >= 0)
468
469 /* Used to define CGEN_ENABLE_INTRINSIC_P in mep-intrin.h.  */
470 #define CGEN_CURRENT_ISAS mep_selected_isa
471 #define CGEN_CURRENT_GROUP \
472   (mep_vliw_function_p (cfun->decl) ? GROUP_VLIW : GROUP_NORMAL)
473
474 \f
475
476 #define STACK_GROWS_DOWNWARD       1
477 #define FRAME_GROWS_DOWNWARD       1
478 #define STARTING_FRAME_OFFSET      0
479 #define FIRST_PARM_OFFSET(FUNDECL) 0
480 #define INCOMING_FRAME_SP_OFFSET   0
481
482 #define RETURN_ADDR_RTX(COUNT, FRAMEADDR) mep_return_addr_rtx (COUNT)
483 #define INCOMING_RETURN_ADDR_RTX          gen_rtx_REG (SImode, LP_REGNO)
484 #define DWARF_FRAME_RETURN_COLUMN         LP_REGNO
485
486 #define STACK_POINTER_REGNUM          15
487 #define FRAME_POINTER_REGNUM           8
488 #define ARG_POINTER_REGNUM            112
489 #define RETURN_ADDRESS_POINTER_REGNUM 17
490 #define STATIC_CHAIN_REGNUM            0
491
492 \f
493
494 #define ELIMINABLE_REGS                                         \
495 {                                                               \
496   {ARG_POINTER_REGNUM,   STACK_POINTER_REGNUM},                 \
497   {ARG_POINTER_REGNUM,   FRAME_POINTER_REGNUM},                 \
498   {FRAME_POINTER_REGNUM, STACK_POINTER_REGNUM}                  \
499 }
500
501 #define INITIAL_ELIMINATION_OFFSET(FROM, TO, OFFSET) \
502         (OFFSET) = mep_elimination_offset (FROM, TO)
503
504 #define ACCUMULATE_OUTGOING_ARGS 1
505
506 #define RETURN_POPS_ARGS(FUNDECL, FUNTYPE, STACK_SIZE) 0
507
508 \f
509
510 /* The ABI is thus: Arguments are in $1, $2, $3, $4, stack.  Arguments
511    larger than 4 bytes are passed indirectly.  Return value in 0,
512    unless bigger than 4 bytes, then the caller passes a pointer as the
513    first arg.  For varargs, we copy $1..$4 to the stack.  */
514
515 #define FUNCTION_ARG(CUM, MODE, TYPE, NAMED) \
516         mep_function_arg (CUM, MODE, TYPE, NAMED)
517
518 #define FUNCTION_ARG_CALLEE_COPIES(CUM, MODE, TYPE, NAMED) 1
519
520 typedef struct
521 {
522   int nregs;
523   int vliw;
524 } CUMULATIVE_ARGS;
525
526 #define INIT_CUMULATIVE_ARGS(CUM, FNTYPE, LIBNAME, FNDECL, N_NAMED_ARGS) \
527         mep_init_cumulative_args (& (CUM), FNTYPE, LIBNAME, FNDECL)
528
529 #define FUNCTION_ARG_ADVANCE(CUM, MODE, TYPE, NAMED)            \
530         mep_arg_advance (& (CUM), MODE, TYPE, NAMED)
531
532 #define FUNCTION_ARG_REGNO_P(REGNO) \
533         (((REGNO) >= 1 && (REGNO) <= 4) \
534          || ((REGNO) >= FIRST_CR_REGNO + 1 \
535              && (REGNO) <= FIRST_CR_REGNO + 4 \
536              && TARGET_COP))
537
538 #define RETURN_VALUE_REGNUM      0
539
540 #define FUNCTION_VALUE(VALTYPE, FUNC) mep_function_value (VALTYPE, FUNC)
541 #define LIBCALL_VALUE(MODE) mep_libcall_value (MODE)
542
543 #define FUNCTION_VALUE_REGNO_P(REGNO)                           \
544   ((REGNO) == RETURN_VALUE_REGNUM)
545
546 #define DEFAULT_PCC_STRUCT_RETURN 0
547
548 #define STRUCT_VALUE 0
549
550 #define FUNCTION_OK_FOR_SIBCALL(DECL) mep_function_ok_for_sibcall(DECL)
551 \f
552 /* Prologue and epilogues are all handled via RTL.  */
553
554 #define EXIT_IGNORE_STACK 1
555
556 #define EPILOGUE_USES(REGNO)  mep_epilogue_uses (REGNO)
557
558 /* Profiling is supported.  */
559      
560 #define FUNCTION_PROFILER(FILE, LABELNO) mep_function_profiler (FILE);
561 #undef TARGET_HAS_F_SETLKW
562 #define NO_PROFILE_COUNTERS 1
563 \f
564 /* Trampolines are built at run-time.  The cache is invalidated at
565    run-time also.  */
566
567 #define TRAMPOLINE_SIZE 20
568
569 #define INITIALIZE_TRAMPOLINE(ADDR, FNADDR, STATIC_CHAIN) \
570         mep_init_trampoline (ADDR, FNADDR, STATIC_CHAIN)
571
572 \f
573
574 #define CONSTANT_ADDRESS_P(X) CONSTANT_P (X)
575
576 #define MAX_REGS_PER_ADDRESS 1
577
578 #ifdef REG_OK_STRICT
579 #define GO_IF_LEGITIMATE_ADDRESS(MODE, X, LABEL)                \
580         if (mep_legitimate_address ((MODE), (X), 1)) goto LABEL
581 #else
582 #define GO_IF_LEGITIMATE_ADDRESS(MODE, X, LABEL)                \
583         if (mep_legitimate_address ((MODE), (X), 0)) goto LABEL
584 #endif
585
586 #ifdef REG_OK_STRICT
587 #define REG_OK_FOR_BASE_P(X) GR_REGNO_P (REGNO (X))
588 #else
589 #define REG_OK_FOR_BASE_P(X) (GR_REGNO_P (REGNO (X)) \
590                                 || REGNO (X) == ARG_POINTER_REGNUM \
591                                 || REGNO (X) >= FIRST_PSEUDO_REGISTER)
592 #endif
593
594 #define REG_OK_FOR_INDEX_P(X) REG_OK_FOR_BASE_P (X)
595
596 #define LEGITIMIZE_RELOAD_ADDRESS(X, MODE, OPNUM, TYPE, IND_LEVELS, WIN) \
597   if (mep_legitimize_reload_address (&(X), (MODE), (OPNUM), (TYPE), (IND_LEVELS))) \
598     goto WIN
599
600 #define GO_IF_MODE_DEPENDENT_ADDRESS(ADDR, LABEL)
601
602 #define LEGITIMATE_CONSTANT_P(X) \
603   mep_legitimate_constant_p(X)
604
605 #define SELECT_CC_MODE(OP, X, Y)  CCmode
606 \f
607
608 /* Moves between control regs need a scratch.  */
609 #define REGISTER_MOVE_COST(MODE, FROM, TO) mep_register_move_cost (MODE, FROM, TO)
610
611 #define SLOW_BYTE_ACCESS 1
612
613 /* Define this macro if it is as good or better to call a constant function
614    address than to call an address kept in a register.  */
615 #define NO_FUNCTION_CSE 
616
617 \f
618 #define TEXT_SECTION_ASM_OP "\t.text\n\t.core"
619 #define DATA_SECTION_ASM_OP "\t.data"
620 #define BSS_SECTION_ASM_OP  ".bss"
621
622 #define USE_SELECT_SECTION_FOR_FUNCTIONS 1
623
624 #define TARGET_ASM_FILE_END mep_file_cleanups
625
626 #define ASM_APP_ON "#APP\n"
627 #define ASM_APP_OFF "#NO_APP\n"
628
629 #define ASM_OUTPUT_DOUBLE(FILE, VALUE)                          \
630   do                                                            \
631     {                                                           \
632       long l[2];                                                \
633                                                                 \
634       REAL_VALUE_TO_TARGET_DOUBLE (VALUE, l);                   \
635       fprintf (FILE, "\t.long\t0x%lx,0x%lx\n", l[0], l[1]);     \
636     }                                                           \
637   while (0)
638
639 #define ASM_OUTPUT_FLOAT(FILE, VALUE)           \
640   do                                            \
641     {                                           \
642       long l;                                   \
643                                                 \
644       REAL_VALUE_TO_TARGET_SINGLE (VALUE, l);   \
645       fprintf ((FILE), "\t.long\t0x%lx\n", l);  \
646     }                                           \
647   while (0)
648
649 #define ASM_OUTPUT_CHAR(FILE, VALUE)            \
650   do                                            \
651     {                                           \
652       fprintf (FILE, "\t.byte\t");              \
653       output_addr_const (FILE, (VALUE));        \
654       fprintf (FILE, "\n");                     \
655     }                                           \
656   while (0)
657
658 #define ASM_OUTPUT_SHORT(FILE, VALUE)           \
659   do                                            \
660     {                                           \
661       fprintf (FILE, "\t.hword\t");             \
662       output_addr_const (FILE, (VALUE));        \
663       fprintf (FILE, "\n");                     \
664     }                                           \
665   while (0)
666
667 #define ASM_OUTPUT_INT(FILE, VALUE)             \
668   do                                            \
669     {                                           \
670       fprintf (FILE, "\t.word\t");              \
671       output_addr_const (FILE, (VALUE));        \
672       fprintf (FILE, "\n");                     \
673     }                                           \
674   while (0)
675
676 #define ASM_OUTPUT_BYTE(STREAM, VALUE) \
677   fprintf (STREAM, "\t%s\t0x%x\n", ASM_BYTE_OP, (VALUE))
678
679 /* Most of these are here to support based/tiny/far/io attributes.  */
680
681 #define ASM_OUTPUT_ALIGNED_DECL_COMMON(STREAM, DECL, NAME, SIZE, ALIGNMENT) \
682         mep_output_aligned_common (STREAM, DECL, NAME, SIZE, ALIGNMENT, 1)
683
684 #define ASM_OUTPUT_ALIGNED_DECL_LOCAL(STREAM, DECL, NAME, SIZE, ALIGNMENT) \
685         mep_output_aligned_common (STREAM, DECL, NAME, SIZE, ALIGNMENT, 0)
686
687 #define ASM_OUTPUT_LABEL(STREAM, NAME)          \
688   do                                            \
689     {                                           \
690       assemble_name (STREAM, NAME);             \
691       fputs (":\n", STREAM);                    \
692     }                                           \
693   while (0)
694
695 /* Globalizing directive for a label.  */
696 #define GLOBAL_ASM_OP "\t.globl "
697
698 #define ASM_OUTPUT_LABELREF(STREAM, NAME) \
699   asm_fprintf ((STREAM), "%U%s", mep_strip_name_encoding (NAME))
700
701 #define ASM_FORMAT_PRIVATE_NAME(OUTVAR, NAME, NUMBER)           \
702   do                                                            \
703     {                                                           \
704       (OUTVAR) = (char *) alloca (strlen ((NAME)) + 12);        \
705       sprintf ((OUTVAR), "%s.%ld", (NAME), (long)(NUMBER));     \
706     }                                                           \
707   while (0)
708 \f
709
710 #define REGISTER_NAMES                                                  \
711 {                                                                       \
712   /* Core registers.  */                                                \
713   "$0", "$1", "$2", "$3", "$4", "$5", "$6", "$7",                       \
714   "$8", "$9", "$10", "$11", "$12", "$tp", "$gp", "$sp",                 \
715   /* Control registers.  */                                             \
716   "$pc", "$lp", "$sar", "3", "$rpb", "$rpe", "$rpc", "$hi",             \
717   "$lo", "9", "10", "11", "$mb0", "$me0", "$mb1", "$me1",               \
718   "$psw", "$id", "$tmp", "$epc", "$exc", "$cfg", "22", "$npc",          \
719   "$dbg", "$depc", "$opt", "$rcfg", "$ccfg", "29", "30", "31",          \
720   /* Coprocessor registers.  */                                         \
721   "$c0", "$c1", "$c2", "$c3", "$c4", "$c5", "$c6", "$c7",               \
722   "$c8", "$c9", "$c10", "$c11", "$c12", "$c13", "$c14", "$c15",         \
723   "$c16", "$c17", "$c18", "$c19", "$c20", "$c21", "$c22", "$c23",       \
724   "$c24", "$c25", "$c26", "$c27", "$c28", "$c29", "$c30", "$c31",       \
725   /* Coprocessor control registers.  */                                 \
726   "$ccr0", "$ccr1", "$ccr2", "$ccr3", "$ccr4", "$ccr5", "$ccr6",        \
727   "$ccr7", "$ccr8", "$ccr9", "$ccr10", "$ccr11", "$ccr12", "$ccr13",    \
728   "$ccr14", "$ccr15", "$ccr16", "$ccr17", "$ccr18", "$ccr19", "$ccr20", \
729   "$ccr21", "$ccr22", "$ccr23", "$ccr24", "$ccr25", "$ccr26", "$ccr27", \
730   "$ccr28", "$ccr29", "$ccr30", "$ccr31",                               \
731   /* Virtual arg pointer.  */                                           \
732   "$argp", SHADOW_REGISTER_NAMES                                        \
733 }
734
735 /* We duplicate some of the above because we twiddle the above
736    according to *how* the registers are used.  Likewise, we include
737    the standard names for coprocessor control registers so that
738    coprocessor options can rename them in the default table.  Note
739    that these are compared to stripped names (see REGISTER_PREFIX
740    below).  */
741 #define ADDITIONAL_REGISTER_NAMES               \
742 {                                               \
743   {  "8",  8 }, { "fp",  8 },                   \
744   { "13", 13 }, { "tp", 13 },                   \
745   { "14", 14 }, { "gp", 14 },                   \
746   { "15", 15 }, { "sp", 15 },                   \
747   { "ccr0", FIRST_CCR_REGNO + 0 },              \
748   { "ccr1", FIRST_CCR_REGNO + 1 },              \
749   { "ccr2", FIRST_CCR_REGNO + 2 },              \
750   { "ccr3", FIRST_CCR_REGNO + 3 },              \
751   { "ccr4", FIRST_CCR_REGNO + 4 },              \
752   { "ccr5", FIRST_CCR_REGNO + 5 },              \
753   { "ccr6", FIRST_CCR_REGNO + 6 },              \
754   { "ccr7", FIRST_CCR_REGNO + 7 },              \
755   { "ccr8", FIRST_CCR_REGNO + 8 },              \
756   { "ccr9", FIRST_CCR_REGNO + 9 },              \
757   { "ccr10", FIRST_CCR_REGNO + 10 },            \
758   { "ccr11", FIRST_CCR_REGNO + 11 },            \
759   { "ccr12", FIRST_CCR_REGNO + 12 },            \
760   { "ccr13", FIRST_CCR_REGNO + 13 },            \
761   { "ccr14", FIRST_CCR_REGNO + 14 },            \
762   { "ccr15", FIRST_CCR_REGNO + 15 },            \
763   { "ccr16", FIRST_CCR_REGNO + 16 },            \
764   { "ccr17", FIRST_CCR_REGNO + 17 },            \
765   { "ccr18", FIRST_CCR_REGNO + 18 },            \
766   { "ccr19", FIRST_CCR_REGNO + 19 },            \
767   { "ccr20", FIRST_CCR_REGNO + 20 },            \
768   { "ccr21", FIRST_CCR_REGNO + 21 },            \
769   { "ccr22", FIRST_CCR_REGNO + 22 },            \
770   { "ccr23", FIRST_CCR_REGNO + 23 },            \
771   { "ccr24", FIRST_CCR_REGNO + 24 },            \
772   { "ccr25", FIRST_CCR_REGNO + 25 },            \
773   { "ccr26", FIRST_CCR_REGNO + 26 },            \
774   { "ccr27", FIRST_CCR_REGNO + 27 },            \
775   { "ccr28", FIRST_CCR_REGNO + 28 },            \
776   { "ccr29", FIRST_CCR_REGNO + 29 },            \
777   { "ccr30", FIRST_CCR_REGNO + 30 },            \
778   { "ccr31", FIRST_CCR_REGNO + 31 }             \
779 }
780
781 /* We watch for pipeline hazards with these */
782 #define ASM_OUTPUT_OPCODE(STREAM, PTR) mep_asm_output_opcode (STREAM, PTR)
783 #define FINAL_PRESCAN_INSN(INSN, OPVEC, NOPERANDS) mep_final_prescan_insn (INSN, OPVEC, NOPERANDS)
784
785 #define PRINT_OPERAND(STREAM, X, CODE) mep_print_operand (STREAM, X, CODE)
786
787 #define PRINT_OPERAND_PUNCT_VALID_P(CODE) ((CODE) == '!' || (CODE) == '<')
788
789 #define PRINT_OPERAND_ADDRESS(STREAM, X) mep_print_operand_address (STREAM, X)
790
791 #define REGISTER_PREFIX    "$"
792 #define LOCAL_LABEL_PREFIX "."
793 #define USER_LABEL_PREFIX  ""
794 #define IMMEDIATE_PREFIX   ""
795
796 \f
797
798 #define ASM_OUTPUT_ADDR_VEC_ELT(STREAM, VALUE) \
799   fprintf (STREAM, "\t.word .L%d\n", VALUE)
800
801 \f
802
803 #undef  PREFERRED_DEBUGGING_TYPE
804 #define PREFERRED_DEBUGGING_TYPE  DWARF2_DEBUG
805 #define DWARF2_DEBUGGING_INFO     1
806 #define DWARF2_UNWIND_INFO        1
807
808 #define EH_RETURN_DATA_REGNO(N) ((N) < 2 ? (N) + 10 : INVALID_REGNUM)
809
810 #define EH_RETURN_STACKADJ_RTX mep_return_stackadj_rtx ()
811 #define EH_RETURN_HANDLER_RTX  mep_return_handler_rtx ()
812
813 #define DBX_REGISTER_NUMBER(REGNO) (REGNO)
814
815 \f
816
817 #define ASM_OUTPUT_ALIGN(STREAM, POWER) \
818   fprintf ((STREAM), "\t.p2align %d\n", (POWER))
819
820 \f
821
822 #define CASE_VECTOR_MODE SImode
823
824 #define WORD_REGISTER_OPERATIONS
825 #define LOAD_EXTEND_OP(MODE) SIGN_EXTEND
826
827 #define SHORT_IMMEDIATES_SIGN_EXTEND
828
829 #define MOVE_MAX 4
830
831 #define SHIFT_COUNT_TRUNCATED 1
832
833 #define TRULY_NOOP_TRUNCATION(OUTPREC, INPREC) 1
834
835 #define STORE_FLAG_VALUE 1
836
837 #define Pmode SImode
838
839 #define FUNCTION_MODE SImode
840
841 #define REGISTER_TARGET_PRAGMAS()        mep_register_pragmas ()
842
843 #define HANDLE_PRAGMA_PACK_PUSH_POP 1
844    
845 /* If defined, a C expression to determine the base term of address X.
846    This macro is used in only one place: `find_base_term' in alias.c.
847
848    It is always safe for this macro to not be defined.  It exists so
849    that alias analysis can understand machine-dependent addresses.
850
851    The typical use of this macro is to handle addresses containing
852    a label_ref or symbol_ref within an UNSPEC.  */
853 #define FIND_BASE_TERM(X) mep_find_base_term (X)