comparison gcc/config/h8300/h8300.h @ 0:a06113de4d67

first commit
author kent <kent@cr.ie.u-ryukyu.ac.jp>
date Fri, 17 Jul 2009 14:47:48 +0900
parents
children 77e2b8dfacca
comparison
equal deleted inserted replaced
-1:000000000000 0:a06113de4d67
1 /* Definitions of target machine for GNU compiler.
2 Renesas H8/300 (generic)
3 Copyright (C) 1992, 1993, 1994, 1995, 1996, 1996, 1997, 1998, 1999,
4 2000, 2001, 2002, 2003, 2004, 2005, 2007, 2008
5 Free Software Foundation, Inc.
6 Contributed by Steve Chamberlain (sac@cygnus.com),
7 Jim Wilson (wilson@cygnus.com), and Doug Evans (dje@cygnus.com).
8
9 This file is part of GCC.
10
11 GCC is free software; you can redistribute it and/or modify
12 it under the terms of the GNU General Public License as published by
13 the Free Software Foundation; either version 3, or (at your option)
14 any later version.
15
16 GCC is distributed in the hope that it will be useful,
17 but WITHOUT ANY WARRANTY; without even the implied warranty of
18 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
19 GNU General Public License for more details.
20
21 You should have received a copy of the GNU General Public License
22 along with GCC; see the file COPYING3. If not see
23 <http://www.gnu.org/licenses/>. */
24
25 #ifndef GCC_H8300_H
26 #define GCC_H8300_H
27
28 /* Which CPU to compile for.
29 We use int for CPU_TYPE to avoid lots of casts. */
30 #if 0 /* defined in insn-attr.h, here for documentation */
31 enum attr_cpu { CPU_H8300, CPU_H8300H };
32 #endif
33 extern int cpu_type;
34
35 /* Various globals defined in h8300.c. */
36
37 extern const char *h8_push_op, *h8_pop_op, *h8_mov_op;
38 extern const char * const *h8_reg_names;
39
40 /* Target CPU builtins. */
41 #define TARGET_CPU_CPP_BUILTINS() \
42 do \
43 { \
44 if (TARGET_H8300H) \
45 { \
46 builtin_define ("__H8300H__"); \
47 builtin_assert ("cpu=h8300h"); \
48 builtin_assert ("machine=h8300h"); \
49 if (TARGET_NORMAL_MODE) \
50 { \
51 builtin_define ("__NORMAL_MODE__"); \
52 } \
53 } \
54 else if (TARGET_H8300SX) \
55 { \
56 builtin_define ("__H8300SX__"); \
57 if (TARGET_NORMAL_MODE) \
58 { \
59 builtin_define ("__NORMAL_MODE__"); \
60 } \
61 } \
62 else if (TARGET_H8300S) \
63 { \
64 builtin_define ("__H8300S__"); \
65 builtin_assert ("cpu=h8300s"); \
66 builtin_assert ("machine=h8300s"); \
67 if (TARGET_NORMAL_MODE) \
68 { \
69 builtin_define ("__NORMAL_MODE__"); \
70 } \
71 } \
72 else \
73 { \
74 builtin_define ("__H8300__"); \
75 builtin_assert ("cpu=h8300"); \
76 builtin_assert ("machine=h8300"); \
77 } \
78 } \
79 while (0)
80
81 #define LINK_SPEC "%{mh:%{mn:-m h8300hn}} %{mh:%{!mn:-m h8300h}} %{ms:%{mn:-m h8300sn}} %{ms:%{!mn:-m h8300s}}"
82
83 #define LIB_SPEC "%{mrelax:-relax} %{g:-lg} %{!p:%{!pg:-lc}}%{p:-lc_p}%{pg:-lc_p}"
84
85 #define OPTIMIZATION_OPTIONS(LEVEL, SIZE) \
86 do \
87 { \
88 /* Basic block reordering is only beneficial on targets with cache \
89 and/or variable-cycle branches where (cycle count taken != \
90 cycle count not taken). */ \
91 flag_reorder_blocks = 0; \
92 } \
93 while (0)
94
95 /* Print subsidiary information on the compiler version in use. */
96
97 #define TARGET_VERSION fprintf (stderr, " (Renesas H8/300)");
98
99 /* Macros used in the machine description to test the flags. */
100
101 /* Select between the H8/300 and H8/300H CPUs. */
102 #define TARGET_H8300 (! TARGET_H8300H && ! TARGET_H8300S)
103 #define TARGET_H8300S (TARGET_H8300S_1 || TARGET_H8300SX)
104 /* Some multiply instructions are not available in all H8SX variants.
105 Use this macro instead of TARGET_H8300SX to indicate this, even
106 though we don't actually generate different code for now. */
107 #define TARGET_H8300SXMUL TARGET_H8300SX
108
109 #ifdef IN_LIBGCC2
110 #undef TARGET_H8300H
111 #undef TARGET_H8300S
112 #undef TARGET_NORMAL_MODE
113 /* If compiling libgcc2, make these compile time constants based on what
114 flags are we actually compiling with. */
115 #ifdef __H8300H__
116 #define TARGET_H8300H 1
117 #else
118 #define TARGET_H8300H 0
119 #endif
120 #ifdef __H8300S__
121 #define TARGET_H8300S 1
122 #else
123 #define TARGET_H8300S 0
124 #endif
125 #ifdef __NORMAL_MODE__
126 #define TARGET_NORMAL_MODE 1
127 #else
128 #define TARGET_NORMAL_MODE 0
129 #endif
130 #endif /* !IN_LIBGCC2 */
131
132 /* Do things that must be done once at start up. */
133
134 #define OVERRIDE_OPTIONS \
135 do \
136 { \
137 h8300_init_once (); \
138 } \
139 while (0)
140
141 /* Default target_flags if no switches specified. */
142
143 #ifndef TARGET_DEFAULT
144 #define TARGET_DEFAULT (MASK_QUICKCALL)
145 #endif
146
147 /* Show we can debug even without a frame pointer. */
148 /* #define CAN_DEBUG_WITHOUT_FP */
149
150 /* Define this if addresses of constant functions
151 shouldn't be put through pseudo regs where they can be cse'd.
152 Desirable on machines where ordinary constants are expensive
153 but a CALL with constant address is cheap.
154
155 Calls through a register are cheaper than calls to named
156 functions; however, the register pressure this causes makes
157 CSEing of function addresses generally a lose. */
158 #define NO_FUNCTION_CSE
159
160 /* Target machine storage layout */
161
162 /* Define this if most significant bit is lowest numbered
163 in instructions that operate on numbered bit-fields.
164 This is not true on the H8/300. */
165 #define BITS_BIG_ENDIAN 0
166
167 /* Define this if most significant byte of a word is the lowest numbered. */
168 /* That is true on the H8/300. */
169 #define BYTES_BIG_ENDIAN 1
170
171 /* Define this if most significant word of a multiword number is lowest
172 numbered. */
173 #define WORDS_BIG_ENDIAN 1
174
175 #define MAX_BITS_PER_WORD 32
176
177 /* Width of a word, in units (bytes). */
178 #define UNITS_PER_WORD (TARGET_H8300H || TARGET_H8300S ? 4 : 2)
179 #define MIN_UNITS_PER_WORD 2
180
181 #define SHORT_TYPE_SIZE 16
182 #define INT_TYPE_SIZE (TARGET_INT32 ? 32 : 16)
183 #define LONG_TYPE_SIZE 32
184 #define LONG_LONG_TYPE_SIZE 64
185 #define FLOAT_TYPE_SIZE 32
186 #define DOUBLE_TYPE_SIZE 32
187 #define LONG_DOUBLE_TYPE_SIZE DOUBLE_TYPE_SIZE
188
189 #define MAX_FIXED_MODE_SIZE 32
190
191 /* Allocation boundary (in *bits*) for storing arguments in argument list. */
192 #define PARM_BOUNDARY (TARGET_H8300H || TARGET_H8300S ? 32 : 16)
193
194 /* Allocation boundary (in *bits*) for the code of a function. */
195 #define FUNCTION_BOUNDARY 16
196
197 /* Alignment of field after `int : 0' in a structure. */
198 /* One can argue this should be 32 for -mint32, but since 32-bit ints only
199 need 16-bit alignment, this is left as is so that -mint32 doesn't change
200 structure layouts. */
201 #define EMPTY_FIELD_BOUNDARY 16
202
203 /* No data type wants to be aligned rounder than this.
204 32-bit values are aligned as such on the H8/300H and H8S for speed. */
205 #define BIGGEST_ALIGNMENT \
206 (((TARGET_H8300H || TARGET_H8300S) && ! TARGET_ALIGN_300) ? 32 : 16)
207
208 /* The stack goes in 16/32 bit lumps. */
209 #define STACK_BOUNDARY (TARGET_H8300 ? 16 : 32)
210
211 /* Define this if move instructions will actually fail to work
212 when given unaligned data. */
213 /* On the H8/300, longs can be aligned on halfword boundaries, but not
214 byte boundaries. */
215 #define STRICT_ALIGNMENT 1
216
217 /* Standard register usage. */
218
219 /* Number of actual hardware registers.
220 The hardware registers are assigned numbers for the compiler
221 from 0 to just below FIRST_PSEUDO_REGISTER.
222
223 All registers that the compiler knows about must be given numbers,
224 even those that are not normally considered general registers.
225
226 Reg 9 does not correspond to any hardware register, but instead
227 appears in the RTL as an argument pointer prior to reload, and is
228 eliminated during reloading in favor of either the stack or frame
229 pointer. */
230
231 #define FIRST_PSEUDO_REGISTER 12
232
233 /* 1 for registers that have pervasive standard uses
234 and are not available for the register allocator. */
235
236 #define FIXED_REGISTERS \
237 /* r0 r1 r2 r3 r4 r5 r6 r7 mac ap rap fp */ \
238 { 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 1, 1 }
239
240 /* 1 for registers not available across function calls.
241 These must include the FIXED_REGISTERS and also any
242 registers that can be used without being saved.
243 The latter must include the registers where values are returned
244 and the register where structure-value addresses are passed.
245 Aside from that, you can include as many other registers as you
246 like.
247
248 H8 destroys r0,r1,r2,r3. */
249
250 #define CALL_USED_REGISTERS \
251 /* r0 r1 r2 r3 r4 r5 r6 r7 mac ap rap fp */ \
252 { 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 1 }
253
254 #define REG_ALLOC_ORDER \
255 /* r0 r1 r2 r3 r4 r5 r6 r7 mac ap rap fp */ \
256 { 2, 3, 0, 1, 4, 5, 6, 8, 7, 9, 10, 11 }
257
258 #define CONDITIONAL_REGISTER_USAGE \
259 { \
260 if (!TARGET_MAC) \
261 fixed_regs[MAC_REG] = call_used_regs[MAC_REG] = 1; \
262 }
263
264 #define HARD_REGNO_NREGS(REGNO, MODE) \
265 h8300_hard_regno_nregs ((REGNO), (MODE))
266
267 #define HARD_REGNO_MODE_OK(REGNO, MODE) \
268 h8300_hard_regno_mode_ok ((REGNO), (MODE))
269
270 /* Value is 1 if it is a good idea to tie two pseudo registers
271 when one has mode MODE1 and one has mode MODE2.
272 If HARD_REGNO_MODE_OK could produce different values for MODE1 and MODE2,
273 for any hard reg, then this must be 0 for correct output. */
274 #define MODES_TIEABLE_P(MODE1, MODE2) \
275 ((MODE1) == (MODE2) \
276 || (((MODE1) == QImode || (MODE1) == HImode \
277 || ((TARGET_H8300H || TARGET_H8300S) && (MODE1) == SImode)) \
278 && ((MODE2) == QImode || (MODE2) == HImode \
279 || ((TARGET_H8300H || TARGET_H8300S) && (MODE2) == SImode))))
280
281 /* A C expression that is nonzero if hard register NEW_REG can be
282 considered for use as a rename register for OLD_REG register */
283
284 #define HARD_REGNO_RENAME_OK(OLD_REG, NEW_REG) \
285 h8300_hard_regno_rename_ok (OLD_REG, NEW_REG)
286
287 /* Specify the registers used for certain standard purposes.
288 The values of these macros are register numbers. */
289
290 /* H8/300 pc is not overloaded on a register. */
291
292 /*#define PC_REGNUM 15*/
293
294 /* Register to use for pushing function arguments. */
295 #define STACK_POINTER_REGNUM SP_REG
296
297 /* Base register for access to local variables of the function. */
298 #define HARD_FRAME_POINTER_REGNUM HFP_REG
299
300 /* Base register for access to local variables of the function. */
301 #define FRAME_POINTER_REGNUM FP_REG
302
303 /* Value should be nonzero if functions must have frame pointers.
304 Zero means the frame pointer need not be set up (and parms
305 may be accessed via the stack pointer) in functions that seem suitable.
306 This is computed in `reload', in reload1.c. */
307 #define FRAME_POINTER_REQUIRED 0
308
309 /* Base register for access to arguments of the function. */
310 #define ARG_POINTER_REGNUM AP_REG
311
312 /* Register in which static-chain is passed to a function. */
313 #define STATIC_CHAIN_REGNUM SC_REG
314
315 /* Fake register that holds the address on the stack of the
316 current function's return address. */
317 #define RETURN_ADDRESS_POINTER_REGNUM RAP_REG
318
319 /* A C expression whose value is RTL representing the value of the return
320 address for the frame COUNT steps up from the current frame.
321 FRAMEADDR is already the frame pointer of the COUNT frame, assuming
322 a stack layout with the frame pointer as the first saved register. */
323 #define RETURN_ADDR_RTX(COUNT, FRAME) h8300_return_addr_rtx ((COUNT), (FRAME))
324
325 /* Define the classes of registers for register constraints in the
326 machine description. Also define ranges of constants.
327
328 One of the classes must always be named ALL_REGS and include all hard regs.
329 If there is more than one class, another class must be named NO_REGS
330 and contain no registers.
331
332 The name GENERAL_REGS must be the name of a class (or an alias for
333 another name such as ALL_REGS). This is the class of registers
334 that is allowed by "g" or "r" in a register constraint.
335 Also, registers outside this class are allocated only when
336 instructions express preferences for them.
337
338 The classes must be numbered in nondecreasing order; that is,
339 a larger-numbered class must never be contained completely
340 in a smaller-numbered class.
341
342 For any two classes, it is very desirable that there be another
343 class that represents their union. */
344
345 enum reg_class {
346 NO_REGS, COUNTER_REGS, SOURCE_REGS, DESTINATION_REGS,
347 GENERAL_REGS, MAC_REGS, ALL_REGS, LIM_REG_CLASSES
348 };
349
350 #define N_REG_CLASSES ((int) LIM_REG_CLASSES)
351
352 /* Give names of register classes as strings for dump file. */
353
354 #define REG_CLASS_NAMES \
355 { "NO_REGS", "COUNTER_REGS", "SOURCE_REGS", "DESTINATION_REGS", \
356 "GENERAL_REGS", "MAC_REGS", "ALL_REGS", "LIM_REGS" }
357
358 /* The following macro defines cover classes for Integrated Register
359 Allocator. Cover classes is a set of non-intersected register
360 classes covering all hard registers used for register allocation
361 purpose. Any move between two registers of a cover class should be
362 cheaper than load or store of the registers. The macro value is
363 array of register classes with LIM_REG_CLASSES used as the end
364 marker. */
365
366 #define IRA_COVER_CLASSES \
367 { \
368 GENERAL_REGS, MAC_REGS, LIM_REG_CLASSES \
369 }
370
371 /* Define which registers fit in which classes.
372 This is an initializer for a vector of HARD_REG_SET
373 of length N_REG_CLASSES. */
374
375 #define REG_CLASS_CONTENTS \
376 { {0}, /* No regs */ \
377 {0x010}, /* COUNTER_REGS */ \
378 {0x020}, /* SOURCE_REGS */ \
379 {0x040}, /* DESTINATION_REGS */ \
380 {0xeff}, /* GENERAL_REGS */ \
381 {0x100}, /* MAC_REGS */ \
382 {0xfff}, /* ALL_REGS */ \
383 }
384
385 /* The same information, inverted:
386 Return the class number of the smallest class containing
387 reg number REGNO. This could be a conditional expression
388 or could index an array. */
389
390 #define REGNO_REG_CLASS(REGNO) \
391 ((REGNO) == MAC_REG ? MAC_REGS \
392 : (REGNO) == COUNTER_REG ? COUNTER_REGS \
393 : (REGNO) == SOURCE_REG ? SOURCE_REGS \
394 : (REGNO) == DESTINATION_REG ? DESTINATION_REGS \
395 : GENERAL_REGS)
396
397 /* The class value for index registers, and the one for base regs. */
398
399 #define INDEX_REG_CLASS (TARGET_H8300SX ? GENERAL_REGS : NO_REGS)
400 #define BASE_REG_CLASS GENERAL_REGS
401
402 /* Get reg_class from a letter such as appears in the machine description.
403
404 'a' is the MAC register. */
405
406 #define REG_CLASS_FROM_LETTER(C) (h8300_reg_class_from_letter (C))
407
408 /* The letters I, J, K, L, M, N, O, P in a register constraint string
409 can be used to stand for particular ranges of immediate operands.
410 This macro defines what the ranges are.
411 C is the letter, and VALUE is a constant value.
412 Return 1 if VALUE is in the range specified by C. */
413
414 #define CONST_OK_FOR_I(VALUE) ((VALUE) == 0)
415 #define CONST_OK_FOR_J(VALUE) (((VALUE) & 0xff) == 0)
416 #define CONST_OK_FOR_L(VALUE) \
417 (TARGET_H8300H || TARGET_H8300S \
418 ? (VALUE) == 1 || (VALUE) == 2 || (VALUE) == 4 \
419 : (VALUE) == 1 || (VALUE) == 2)
420 #define CONST_OK_FOR_M(VALUE) \
421 ((VALUE) == 1 || (VALUE) == 2)
422 #define CONST_OK_FOR_N(VALUE) \
423 (TARGET_H8300H || TARGET_H8300S \
424 ? (VALUE) == -1 || (VALUE) == -2 || (VALUE) == -4 \
425 : (VALUE) == -1 || (VALUE) == -2)
426 #define CONST_OK_FOR_O(VALUE) \
427 ((VALUE) == -1 || (VALUE) == -2)
428
429 /* Multi-letter constraints for constant are always started with P
430 (just because it was the only letter in the range left. New
431 constraints for constants should be added here. */
432 #define CONST_OK_FOR_Ppositive(VALUE, NBITS) \
433 ((VALUE) > 0 && (VALUE) < (1 << (NBITS)))
434 #define CONST_OK_FOR_Pnegative(VALUE, NBITS) \
435 ((VALUE) < 0 && (VALUE) > -(1 << (NBITS)))
436 #define CONST_OK_FOR_P(VALUE, STR) \
437 ((STR)[1] >= '1' && (STR)[1] <= '9' && (STR)[2] == '<' \
438 ? (((STR)[3] == '0' || ((STR)[3] == 'X' && TARGET_H8300SX)) \
439 && CONST_OK_FOR_Pnegative ((VALUE), (STR)[1] - '0')) \
440 : ((STR)[1] >= '1' && (STR)[1] <= '9' && (STR)[2] == '>') \
441 ? (((STR)[3] == '0' || ((STR)[3] == 'X' && TARGET_H8300SX)) \
442 && CONST_OK_FOR_Ppositive ((VALUE), (STR)[1] - '0')) \
443 : 0)
444 #define CONSTRAINT_LEN_FOR_P(STR) \
445 ((((STR)[1] >= '1' && (STR)[1] <= '9') \
446 && ((STR)[2] == '<' || (STR)[2] == '>') \
447 && ((STR)[3] == 'X' || (STR)[3] == '0')) ? 4 \
448 : 0)
449
450 #define CONST_OK_FOR_CONSTRAINT_P(VALUE, C, STR) \
451 ((C) == 'P' ? CONST_OK_FOR_P ((VALUE), (STR)) \
452 : CONST_OK_FOR_LETTER_P ((VALUE), (C)))
453
454 #define CONST_OK_FOR_LETTER_P(VALUE, C) \
455 ((C) == 'I' ? CONST_OK_FOR_I (VALUE) : \
456 (C) == 'J' ? CONST_OK_FOR_J (VALUE) : \
457 (C) == 'L' ? CONST_OK_FOR_L (VALUE) : \
458 (C) == 'M' ? CONST_OK_FOR_M (VALUE) : \
459 (C) == 'N' ? CONST_OK_FOR_N (VALUE) : \
460 (C) == 'O' ? CONST_OK_FOR_O (VALUE) : \
461 0)
462
463 /* Similar, but for floating constants, and defining letters G and H.
464 Here VALUE is the CONST_DOUBLE rtx itself.
465
466 `G' is a floating-point zero. */
467
468 #define CONST_DOUBLE_OK_FOR_LETTER_P(VALUE, C) \
469 ((C) == 'G' ? (VALUE) == CONST0_RTX (SFmode) \
470 : 0)
471
472 /* Given an rtx X being reloaded into a reg required to be
473 in class CLASS, return the class of reg to actually use.
474 In general this is just CLASS; but on some machines
475 in some cases it is preferable to use a more restrictive class. */
476
477 #define PREFERRED_RELOAD_CLASS(X, CLASS) (CLASS)
478
479 /* Return the maximum number of consecutive registers
480 needed to represent mode MODE in a register of class CLASS. */
481
482 /* On the H8, this is the size of MODE in words. */
483
484 #define CLASS_MAX_NREGS(CLASS, MODE) \
485 ((GET_MODE_SIZE (MODE) + UNITS_PER_WORD - 1) / UNITS_PER_WORD)
486
487 /* Any SI register-to-register move may need to be reloaded,
488 so define REGISTER_MOVE_COST to be > 2 so that reload never
489 shortcuts. */
490
491 #define REGISTER_MOVE_COST(MODE, CLASS1, CLASS2) \
492 (CLASS1 == MAC_REGS || CLASS2 == MAC_REGS ? 6 : 3)
493
494 /* Stack layout; function entry, exit and calling. */
495
496 /* Define this if pushing a word on the stack
497 makes the stack pointer a smaller address. */
498
499 #define STACK_GROWS_DOWNWARD
500
501 /* Define this to nonzero if the nominal address of the stack frame
502 is at the high-address end of the local variables;
503 that is, each additional local variable allocated
504 goes at a more negative offset in the frame. */
505
506 #define FRAME_GROWS_DOWNWARD 1
507
508 /* Offset within stack frame to start allocating local variables at.
509 If FRAME_GROWS_DOWNWARD, this is the offset to the END of the
510 first local allocated. Otherwise, it is the offset to the BEGINNING
511 of the first local allocated. */
512
513 #define STARTING_FRAME_OFFSET 0
514
515 /* If we generate an insn to push BYTES bytes,
516 this says how many the stack pointer really advances by.
517
518 On the H8/300, @-sp really pushes a byte if you ask it to - but that's
519 dangerous, so we claim that it always pushes a word, then we catch
520 the mov.b rx,@-sp and turn it into a mov.w rx,@-sp on output.
521
522 On the H8/300H, we simplify TARGET_QUICKCALL by setting this to 4
523 and doing a similar thing. */
524
525 #define PUSH_ROUNDING(BYTES) \
526 (((BYTES) + PARM_BOUNDARY / 8 - 1) & -PARM_BOUNDARY / 8)
527
528 /* Offset of first parameter from the argument pointer register value. */
529 /* Is equal to the size of the saved fp + pc, even if an fp isn't
530 saved since the value is used before we know. */
531
532 #define FIRST_PARM_OFFSET(FNDECL) 0
533
534 /* Value is the number of bytes of arguments automatically
535 popped when returning from a subroutine call.
536 FUNDECL is the declaration node of the function (as a tree),
537 FUNTYPE is the data type of the function (as a tree),
538 or for a library call it is an identifier node for the subroutine name.
539 SIZE is the number of bytes of arguments passed on the stack.
540
541 On the H8 the return does not pop anything. */
542
543 #define RETURN_POPS_ARGS(FUNDECL, FUNTYPE, SIZE) 0
544
545 /* Definitions for register eliminations.
546
547 This is an array of structures. Each structure initializes one pair
548 of eliminable registers. The "from" register number is given first,
549 followed by "to". Eliminations of the same "from" register are listed
550 in order of preference.
551
552 We have three registers that can be eliminated on the h8300.
553 First, the frame pointer register can often be eliminated in favor
554 of the stack pointer register. Secondly, the argument pointer
555 register and the return address pointer register are always
556 eliminated; they are replaced with either the stack or frame
557 pointer. */
558
559 #define ELIMINABLE_REGS \
560 {{ ARG_POINTER_REGNUM, STACK_POINTER_REGNUM}, \
561 { ARG_POINTER_REGNUM, HARD_FRAME_POINTER_REGNUM}, \
562 { RETURN_ADDRESS_POINTER_REGNUM, STACK_POINTER_REGNUM}, \
563 { RETURN_ADDRESS_POINTER_REGNUM, HARD_FRAME_POINTER_REGNUM}, \
564 { FRAME_POINTER_REGNUM, STACK_POINTER_REGNUM}, \
565 { FRAME_POINTER_REGNUM, HARD_FRAME_POINTER_REGNUM}}
566
567 /* Given FROM and TO register numbers, say whether this elimination is allowed.
568 Frame pointer elimination is automatically handled.
569
570 For the h8300, if frame pointer elimination is being done, we would like to
571 convert ap and rp into sp, not fp.
572
573 All other eliminations are valid. */
574
575 #define CAN_ELIMINATE(FROM, TO) \
576 ((TO) == STACK_POINTER_REGNUM ? ! frame_pointer_needed : 1)
577
578 /* Define the offset between two registers, one to be eliminated, and the other
579 its replacement, at the start of a routine. */
580
581 #define INITIAL_ELIMINATION_OFFSET(FROM, TO, OFFSET) \
582 ((OFFSET) = h8300_initial_elimination_offset ((FROM), (TO)))
583
584 /* Define how to find the value returned by a function.
585 VALTYPE is the data type of the value (as a tree).
586 If the precise function being called is known, FUNC is its FUNCTION_DECL;
587 otherwise, FUNC is 0.
588
589 On the H8 the return value is in R0/R1. */
590
591 #define FUNCTION_VALUE(VALTYPE, FUNC) \
592 gen_rtx_REG (TYPE_MODE (VALTYPE), R0_REG)
593
594 /* Define how to find the value returned by a library function
595 assuming the value has mode MODE. */
596
597 /* On the H8 the return value is in R0/R1. */
598
599 #define LIBCALL_VALUE(MODE) \
600 gen_rtx_REG (MODE, R0_REG)
601
602 /* 1 if N is a possible register number for a function value.
603 On the H8, R0 is the only register thus used. */
604
605 #define FUNCTION_VALUE_REGNO_P(N) ((N) == R0_REG)
606
607 /* Define this if PCC uses the nonreentrant convention for returning
608 structure and union values. */
609
610 /*#define PCC_STATIC_STRUCT_RETURN*/
611
612 /* 1 if N is a possible register number for function argument passing.
613 On the H8, no registers are used in this way. */
614
615 #define FUNCTION_ARG_REGNO_P(N) (TARGET_QUICKCALL ? N < 3 : 0)
616
617 /* When defined, the compiler allows registers explicitly used in the
618 rtl to be used as spill registers but prevents the compiler from
619 extending the lifetime of these registers. */
620
621 #define SMALL_REGISTER_CLASSES 1
622
623 /* Define a data type for recording info about an argument list
624 during the scan of that argument list. This data type should
625 hold all necessary information about the function itself
626 and about the args processed so far, enough to enable macros
627 such as FUNCTION_ARG to determine where the next arg should go.
628
629 On the H8/300, this is a two item struct, the first is the number
630 of bytes scanned so far and the second is the rtx of the called
631 library function if any. */
632
633 #define CUMULATIVE_ARGS struct cum_arg
634 struct cum_arg
635 {
636 int nbytes;
637 struct rtx_def *libcall;
638 };
639
640 /* Initialize a variable CUM of type CUMULATIVE_ARGS
641 for a call to a function whose data type is FNTYPE.
642 For a library call, FNTYPE is 0.
643
644 On the H8/300, the offset starts at 0. */
645
646 #define INIT_CUMULATIVE_ARGS(CUM, FNTYPE, LIBNAME, INDIRECT, N_NAMED_ARGS) \
647 ((CUM).nbytes = 0, (CUM).libcall = LIBNAME)
648
649 /* Update the data in CUM to advance over an argument
650 of mode MODE and data type TYPE.
651 (TYPE is null for libcalls where that information may not be available.) */
652
653 #define FUNCTION_ARG_ADVANCE(CUM, MODE, TYPE, NAMED) \
654 ((CUM).nbytes += ((MODE) != BLKmode \
655 ? (GET_MODE_SIZE (MODE) + UNITS_PER_WORD - 1) & -UNITS_PER_WORD \
656 : (int_size_in_bytes (TYPE) + UNITS_PER_WORD - 1) & -UNITS_PER_WORD))
657
658 /* Define where to put the arguments to a function.
659 Value is zero to push the argument on the stack,
660 or a hard register in which to store the argument.
661
662 MODE is the argument's machine mode.
663 TYPE is the data type of the argument (as a tree).
664 This is null for libcalls where that information may
665 not be available.
666 CUM is a variable of type CUMULATIVE_ARGS which gives info about
667 the preceding args and about the function being called.
668 NAMED is nonzero if this argument is a named parameter
669 (otherwise it is an extra parameter matching an ellipsis). */
670
671 /* On the H8/300 all normal args are pushed, unless -mquickcall in which
672 case the first 3 arguments are passed in registers.
673 See function `function_arg'. */
674
675 #define FUNCTION_ARG(CUM, MODE, TYPE, NAMED) \
676 function_arg (&CUM, MODE, TYPE, NAMED)
677
678 /* Output assembler code to FILE to increment profiler label # LABELNO
679 for profiling a function entry. */
680
681 #define FUNCTION_PROFILER(FILE, LABELNO) \
682 fprintf (FILE, "\t%s\t#LP%d,%s\n\tjsr @mcount\n", \
683 h8_mov_op, (LABELNO), h8_reg_names[0]);
684
685 /* EXIT_IGNORE_STACK should be nonzero if, when returning from a function,
686 the stack pointer does not matter. The value is tested only in
687 functions that have frame pointers.
688 No definition is equivalent to always zero. */
689
690 #define EXIT_IGNORE_STACK 0
691
692 /* We emit the entire trampoline with INITIALIZE_TRAMPOLINE.
693 Depending on the pointer size, we use a different trampoline.
694
695 Pmode == HImode
696 vvvv context
697 1 0000 7903xxxx mov.w #0x1234,r3
698 2 0004 5A00xxxx jmp @0x1234
699 ^^^^ function
700
701 Pmode == SImode
702 vvvvvvvv context
703 2 0000 7A03xxxxxxxx mov.l #0x12345678,er3
704 3 0006 5Axxxxxx jmp @0x123456
705 ^^^^^^ function
706 */
707
708 /* Length in units of the trampoline for entering a nested function. */
709
710 #define TRAMPOLINE_SIZE ((Pmode == HImode) ? 8 : 12)
711
712 /* Emit RTL insns to build a trampoline.
713 FNADDR is an RTX for the address of the function's pure code.
714 CXT is an RTX for the static chain value for the function. */
715
716 #define INITIALIZE_TRAMPOLINE(TRAMP, FNADDR, CXT) \
717 do \
718 { \
719 if (Pmode == HImode) \
720 { \
721 emit_move_insn (gen_rtx_MEM (HImode, (TRAMP)), GEN_INT (0x7903)); \
722 emit_move_insn (gen_rtx_MEM (Pmode, plus_constant ((TRAMP), 2)), \
723 (CXT)); \
724 emit_move_insn (gen_rtx_MEM (Pmode, plus_constant ((TRAMP), 4)), \
725 GEN_INT (0x5a00)); \
726 emit_move_insn (gen_rtx_MEM (Pmode, plus_constant ((TRAMP), 6)), \
727 (FNADDR)); \
728 } \
729 else \
730 { \
731 rtx tem = gen_reg_rtx (Pmode); \
732 \
733 emit_move_insn (gen_rtx_MEM (HImode, (TRAMP)), GEN_INT (0x7a03)); \
734 emit_move_insn (gen_rtx_MEM (Pmode, plus_constant ((TRAMP), 2)), \
735 (CXT)); \
736 emit_move_insn (tem, (FNADDR)); \
737 emit_insn (gen_andsi3 (tem, tem, GEN_INT (0x00ffffff))); \
738 emit_insn (gen_iorsi3 (tem, tem, GEN_INT (0x5a000000))); \
739 emit_move_insn (gen_rtx_MEM (Pmode, plus_constant ((TRAMP), 6)), \
740 tem); \
741 } \
742 } \
743 while (0)
744
745 /* Addressing modes, and classification of registers for them. */
746
747 #define HAVE_POST_INCREMENT 1
748 #define HAVE_PRE_DECREMENT 1
749 #define HAVE_POST_DECREMENT TARGET_H8300SX
750 #define HAVE_PRE_INCREMENT TARGET_H8300SX
751
752 /* Macros to check register numbers against specific register classes. */
753
754 /* These assume that REGNO is a hard or pseudo reg number.
755 They give nonzero only if REGNO is a hard reg of the suitable class
756 or a pseudo reg currently allocated to a suitable hard reg.
757 Since they use reg_renumber, they are safe only once reg_renumber
758 has been allocated, which happens in local-alloc.c. */
759
760 #define REGNO_OK_FOR_INDEX_P(regno) 0
761
762 #define REGNO_OK_FOR_BASE_P(regno) \
763 (((regno) < FIRST_PSEUDO_REGISTER && regno != MAC_REG) \
764 || reg_renumber[regno] >= 0)
765
766 /* Maximum number of registers that can appear in a valid memory address. */
767
768 #define MAX_REGS_PER_ADDRESS 1
769
770 /* 1 if X is an rtx for a constant that is a valid address. */
771
772 #define CONSTANT_ADDRESS_P(X) \
773 (GET_CODE (X) == LABEL_REF || GET_CODE (X) == SYMBOL_REF \
774 || (GET_CODE (X) == CONST_INT \
775 /* We handle signed and unsigned offsets here. */ \
776 && INTVAL (X) > (TARGET_H8300 ? -0x10000 : -0x1000000) \
777 && INTVAL (X) < (TARGET_H8300 ? 0x10000 : 0x1000000)) \
778 || (GET_CODE (X) == HIGH || GET_CODE (X) == CONST))
779
780 /* Nonzero if the constant value X is a legitimate general operand.
781 It is given that X satisfies CONSTANT_P or is a CONST_DOUBLE. */
782
783 #define LEGITIMATE_CONSTANT_P(X) (h8300_legitimate_constant_p (X))
784
785 /* The macros REG_OK_FOR..._P assume that the arg is a REG rtx
786 and check its validity for a certain class.
787 We have two alternate definitions for each of them.
788 The usual definition accepts all pseudo regs; the other rejects
789 them unless they have been allocated suitable hard regs.
790 The symbol REG_OK_STRICT causes the latter definition to be used.
791
792 Most source files want to accept pseudo regs in the hope that
793 they will get allocated to the class that the insn wants them to be in.
794 Source files for reload pass need to be strict.
795 After reload, it makes no difference, since pseudo regs have
796 been eliminated by then. */
797
798 /* Non-strict versions. */
799 #define REG_OK_FOR_INDEX_NONSTRICT_P(X) 0
800 /* Don't use REGNO_OK_FOR_BASE_P here because it uses reg_renumber. */
801 #define REG_OK_FOR_BASE_NONSTRICT_P(X) \
802 (REGNO (X) >= FIRST_PSEUDO_REGISTER || REGNO (X) != MAC_REG)
803
804 /* Strict versions. */
805 #define REG_OK_FOR_INDEX_STRICT_P(X) REGNO_OK_FOR_INDEX_P (REGNO (X))
806 #define REG_OK_FOR_BASE_STRICT_P(X) REGNO_OK_FOR_BASE_P (REGNO (X))
807
808 #ifndef REG_OK_STRICT
809
810 #define REG_OK_FOR_INDEX_P(X) REG_OK_FOR_INDEX_NONSTRICT_P (X)
811 #define REG_OK_FOR_BASE_P(X) REG_OK_FOR_BASE_NONSTRICT_P (X)
812
813 #else
814
815 #define REG_OK_FOR_INDEX_P(X) REG_OK_FOR_INDEX_STRICT_P (X)
816 #define REG_OK_FOR_BASE_P(X) REG_OK_FOR_BASE_STRICT_P (X)
817
818 #endif
819
820 /* Extra constraints. */
821
822 #define OK_FOR_Q(OP) \
823 (TARGET_H8300SX && memory_operand ((OP), VOIDmode))
824
825 #define OK_FOR_R(OP) \
826 (GET_CODE (OP) == CONST_INT \
827 ? !h8300_shift_needs_scratch_p (INTVAL (OP), QImode) \
828 : 0)
829
830 #define OK_FOR_S(OP) \
831 (GET_CODE (OP) == CONST_INT \
832 ? !h8300_shift_needs_scratch_p (INTVAL (OP), HImode) \
833 : 0)
834
835 #define OK_FOR_T(OP) \
836 (GET_CODE (OP) == CONST_INT \
837 ? !h8300_shift_needs_scratch_p (INTVAL (OP), SImode) \
838 : 0)
839
840 /* 'U' if valid for a bset destination;
841 i.e. a register, register indirect, or the eightbit memory region
842 (a SYMBOL_REF with an SYMBOL_REF_FLAG set).
843
844 On the H8S 'U' can also be a 16bit or 32bit absolute. */
845 #define OK_FOR_U(OP) \
846 ((GET_CODE (OP) == REG && REG_OK_FOR_BASE_P (OP)) \
847 || (GET_CODE (OP) == MEM && GET_CODE (XEXP (OP, 0)) == REG \
848 && REG_OK_FOR_BASE_P (XEXP (OP, 0))) \
849 || (GET_CODE (OP) == MEM && GET_CODE (XEXP (OP, 0)) == SYMBOL_REF \
850 && TARGET_H8300S) \
851 || (GET_CODE (OP) == MEM && GET_CODE (XEXP (OP, 0)) == CONST \
852 && GET_CODE (XEXP (XEXP (OP, 0), 0)) == PLUS \
853 && GET_CODE (XEXP (XEXP (XEXP (OP, 0), 0), 0)) == SYMBOL_REF \
854 && GET_CODE (XEXP (XEXP (XEXP (OP, 0), 0), 1)) == CONST_INT \
855 && (TARGET_H8300S \
856 || SYMBOL_REF_FLAG (XEXP (XEXP (XEXP (OP, 0), 0), 0)))) \
857 || (GET_CODE (OP) == MEM \
858 && h8300_eightbit_constant_address_p (XEXP (OP, 0))) \
859 || (GET_CODE (OP) == MEM && TARGET_H8300S \
860 && GET_CODE (XEXP (OP, 0)) == CONST_INT))
861
862 /* Multi-letter constraints starting with W are to be used for
863 operands that require a memory operand, i.e,. that are never used
864 along with register constraints (see EXTRA_MEMORY_CONSTRAINTS).
865 For operands that require a memory operand (or not) but that always
866 accept a register, a multi-letter constraint starting with Y should
867 be used instead. */
868
869 #define OK_FOR_WU(OP) \
870 (GET_CODE (OP) == MEM && OK_FOR_U (OP))
871
872 #define OK_FOR_W(OP, STR) \
873 ((STR)[1] == 'U' ? OK_FOR_WU (OP) \
874 : 0)
875
876 #define CONSTRAINT_LEN_FOR_W(STR) \
877 ((STR)[1] == 'U' ? 2 \
878 : 0)
879
880 /* We don't have any constraint starting with Y yet, but before
881 someone uses it for a one-letter constraint and we're left without
882 any upper-case constraints left, we reserve it for extensions
883 here. */
884 #define OK_FOR_Y(OP, STR) \
885 (0)
886
887 #define CONSTRAINT_LEN_FOR_Y(STR) \
888 (0)
889
890 #define OK_FOR_Z(OP) \
891 (TARGET_H8300SX \
892 && GET_CODE (OP) == MEM \
893 && CONSTANT_P (XEXP ((OP), 0)))
894
895 #define EXTRA_CONSTRAINT_STR(OP, C, STR) \
896 ((C) == 'Q' ? OK_FOR_Q (OP) : \
897 (C) == 'R' ? OK_FOR_R (OP) : \
898 (C) == 'S' ? OK_FOR_S (OP) : \
899 (C) == 'T' ? OK_FOR_T (OP) : \
900 (C) == 'U' ? OK_FOR_U (OP) : \
901 (C) == 'W' ? OK_FOR_W ((OP), (STR)) : \
902 (C) == 'Y' ? OK_FOR_Y ((OP), (STR)) : \
903 (C) == 'Z' ? OK_FOR_Z (OP) : \
904 0)
905
906 #define CONSTRAINT_LEN(C, STR) \
907 ((C) == 'P' ? CONSTRAINT_LEN_FOR_P (STR) \
908 : (C) == 'W' ? CONSTRAINT_LEN_FOR_W (STR) \
909 : (C) == 'Y' ? CONSTRAINT_LEN_FOR_Y (STR) \
910 : DEFAULT_CONSTRAINT_LEN ((C), (STR)))
911
912 /* Experiments suggest that it's better not add 'Q' or 'U' here. No
913 patterns need it for correctness (no patterns use 'Q' and 'U'
914 without also providing a register alternative). And defining it
915 will mean that a spilled pseudo could be replaced by its frame
916 location in several consecutive insns.
917
918 Instead, it seems to be better to force pseudos to be reloaded
919 into registers and then use peepholes to recombine insns when
920 beneficial.
921
922 Unfortunately, for WU (unlike plain U, that matches regs as well),
923 we must require a memory address. In fact, all multi-letter
924 constraints started with W are supposed to have this property, so
925 we just test for W here. */
926 #define EXTRA_MEMORY_CONSTRAINT(C, STR) \
927 ((C) == 'W')
928
929
930 #ifndef REG_OK_STRICT
931 #define GO_IF_LEGITIMATE_ADDRESS(MODE, X, ADDR) \
932 do \
933 { \
934 if (h8300_legitimate_address_p ((MODE), (X), 0)) \
935 goto ADDR; \
936 } \
937 while (0)
938 #else
939 #define GO_IF_LEGITIMATE_ADDRESS(MODE, X, ADDR) \
940 do \
941 { \
942 if (h8300_legitimate_address_p ((MODE), (X), 1)) \
943 goto ADDR; \
944 } \
945 while (0)
946 #endif
947
948 /* Go to LABEL if ADDR (a legitimate address expression)
949 has an effect that depends on the machine mode it is used for.
950
951 On the H8/300, the predecrement and postincrement address depend thus
952 (the amount of decrement or increment being the length of the operand). */
953
954 #define GO_IF_MODE_DEPENDENT_ADDRESS(ADDR, LABEL) \
955 if (GET_CODE (ADDR) == PLUS \
956 && h8300_get_index (XEXP (ADDR, 0), VOIDmode, 0) != XEXP (ADDR, 0)) \
957 goto LABEL;
958
959 /* Specify the machine mode that this machine uses
960 for the index in the tablejump instruction. */
961 #define CASE_VECTOR_MODE Pmode
962
963 /* Define this as 1 if `char' should by default be signed; else as 0.
964
965 On the H8/300, sign extension is expensive, so we'll say that chars
966 are unsigned. */
967 #define DEFAULT_SIGNED_CHAR 0
968
969 /* This flag, if defined, says the same insns that convert to a signed fixnum
970 also convert validly to an unsigned one. */
971 #define FIXUNS_TRUNC_LIKE_FIX_TRUNC
972
973 /* Max number of bytes we can move from memory to memory
974 in one reasonably fast instruction. */
975 #define MOVE_MAX (TARGET_H8300H || TARGET_H8300S ? 4 : 2)
976 #define MAX_MOVE_MAX 4
977
978 /* Nonzero if access to memory by bytes is slow and undesirable. */
979 #define SLOW_BYTE_ACCESS TARGET_SLOWBYTE
980
981 /* Define if shifts truncate the shift count
982 which implies one can omit a sign-extension or zero-extension
983 of a shift count. */
984 /* #define SHIFT_COUNT_TRUNCATED */
985
986 /* Value is 1 if truncating an integer of INPREC bits to OUTPREC bits
987 is done just by pretending it is already truncated. */
988 #define TRULY_NOOP_TRUNCATION(OUTPREC, INPREC) 1
989
990 /* Specify the machine mode that pointers have.
991 After generation of rtl, the compiler makes no further distinction
992 between pointers and any other objects of this machine mode. */
993 #define Pmode \
994 ((TARGET_H8300H || TARGET_H8300S) && !TARGET_NORMAL_MODE ? SImode : HImode)
995
996 /* ANSI C types.
997 We use longs for the H8/300H and the H8S because ints can be 16 or 32.
998 GCC requires SIZE_TYPE to be the same size as pointers. */
999 #define SIZE_TYPE \
1000 (TARGET_H8300 || TARGET_NORMAL_MODE ? TARGET_INT32 ? "short unsigned int" : "unsigned int" : "long unsigned int")
1001 #define PTRDIFF_TYPE \
1002 (TARGET_H8300 || TARGET_NORMAL_MODE ? TARGET_INT32 ? "short int" : "int" : "long int")
1003
1004 #define POINTER_SIZE \
1005 ((TARGET_H8300H || TARGET_H8300S) && !TARGET_NORMAL_MODE ? 32 : 16)
1006
1007 #define WCHAR_TYPE "short unsigned int"
1008 #define WCHAR_TYPE_SIZE 16
1009
1010 /* A function address in a call instruction
1011 is a byte address (for indexing purposes)
1012 so give the MEM rtx a byte's mode. */
1013 #define FUNCTION_MODE QImode
1014
1015 /* Return the length of JUMP's delay slot insn (0 if it has none).
1016 If JUMP is a delayed branch, NEXT_INSN (PREV_INSN (JUMP)) will
1017 be the containing SEQUENCE, not JUMP itself. */
1018 #define DELAY_SLOT_LENGTH(JUMP) \
1019 (NEXT_INSN (PREV_INSN (JUMP)) == JUMP ? 0 : 2)
1020
1021 #define BRANCH_COST(speed_p, predictable_p) 0
1022
1023 /* Tell final.c how to eliminate redundant test instructions. */
1024
1025 /* Here we define machine-dependent flags and fields in cc_status
1026 (see `conditions.h'). No extra ones are needed for the h8300. */
1027
1028 /* Store in cc_status the expressions
1029 that the condition codes will describe
1030 after execution of an instruction whose pattern is EXP.
1031 Do not alter them if the instruction would not alter the cc's. */
1032
1033 #define NOTICE_UPDATE_CC(EXP, INSN) notice_update_cc (EXP, INSN)
1034
1035 /* The add insns don't set overflow in a usable way. */
1036 #define CC_OVERFLOW_UNUSABLE 01000
1037 /* The mov,and,or,xor insns don't set carry. That's OK though as the
1038 Z bit is all we need when doing unsigned comparisons on the result of
1039 these insns (since they're always with 0). However, conditions.h has
1040 CC_NO_OVERFLOW defined for this purpose. Rename it to something more
1041 understandable. */
1042 #define CC_NO_CARRY CC_NO_OVERFLOW
1043
1044 /* Control the assembler format that we output. */
1045
1046 /* Output to assembler file text saying following lines
1047 may contain character constants, extra white space, comments, etc. */
1048
1049 #define ASM_APP_ON "; #APP\n"
1050
1051 /* Output to assembler file text saying following lines
1052 no longer contain unusual constructs. */
1053
1054 #define ASM_APP_OFF "; #NO_APP\n"
1055
1056 #define FILE_ASM_OP "\t.file\n"
1057
1058 /* The assembler op to get a word, 2 bytes for the H8/300, 4 for H8/300H. */
1059 #define ASM_WORD_OP \
1060 (TARGET_H8300 || TARGET_NORMAL_MODE ? "\t.word\t" : "\t.long\t")
1061
1062 #define TEXT_SECTION_ASM_OP "\t.section .text"
1063 #define DATA_SECTION_ASM_OP "\t.section .data"
1064 #define BSS_SECTION_ASM_OP "\t.section .bss"
1065
1066 #undef DO_GLOBAL_CTORS_BODY
1067 #define DO_GLOBAL_CTORS_BODY \
1068 { \
1069 extern func_ptr __ctors[]; \
1070 extern func_ptr __ctors_end[]; \
1071 func_ptr *p; \
1072 for (p = __ctors_end; p > __ctors; ) \
1073 { \
1074 (*--p)(); \
1075 } \
1076 }
1077
1078 #undef DO_GLOBAL_DTORS_BODY
1079 #define DO_GLOBAL_DTORS_BODY \
1080 { \
1081 extern func_ptr __dtors[]; \
1082 extern func_ptr __dtors_end[]; \
1083 func_ptr *p; \
1084 for (p = __dtors; p < __dtors_end; p++) \
1085 { \
1086 (*p)(); \
1087 } \
1088 }
1089
1090 /* How to refer to registers in assembler output.
1091 This sequence is indexed by compiler's hard-register-number (see above). */
1092
1093 #define REGISTER_NAMES \
1094 { "r0", "r1", "r2", "r3", "r4", "r5", "r6", "sp", "mac", "ap", "rap", "fp" }
1095
1096 #define ADDITIONAL_REGISTER_NAMES \
1097 { {"er0", 0}, {"er1", 1}, {"er2", 2}, {"er3", 3}, {"er4", 4}, \
1098 {"er5", 5}, {"er6", 6}, {"er7", 7}, {"r7", 7} }
1099
1100 /* Globalizing directive for a label. */
1101 #define GLOBAL_ASM_OP "\t.global "
1102
1103 #define ASM_DECLARE_FUNCTION_NAME(FILE, NAME, DECL) \
1104 ASM_OUTPUT_LABEL (FILE, NAME)
1105
1106 /* The prefix to add to user-visible assembler symbols. */
1107
1108 #define USER_LABEL_PREFIX "_"
1109
1110 /* This is how to store into the string LABEL
1111 the symbol_ref name of an internal numbered label where
1112 PREFIX is the class of label and NUM is the number within the class.
1113 This is suitable for output with `assemble_name'.
1114
1115 N.B.: The h8300.md branch_true and branch_false patterns also know
1116 how to generate internal labels. */
1117 #define ASM_GENERATE_INTERNAL_LABEL(LABEL, PREFIX, NUM) \
1118 sprintf (LABEL, "*.%s%lu", PREFIX, (unsigned long)(NUM))
1119
1120 /* This is how to output an insn to push a register on the stack.
1121 It need not be very fast code. */
1122
1123 #define ASM_OUTPUT_REG_PUSH(FILE, REGNO) \
1124 fprintf (FILE, "\t%s\t%s\n", h8_push_op, h8_reg_names[REGNO])
1125
1126 /* This is how to output an insn to pop a register from the stack.
1127 It need not be very fast code. */
1128
1129 #define ASM_OUTPUT_REG_POP(FILE, REGNO) \
1130 fprintf (FILE, "\t%s\t%s\n", h8_pop_op, h8_reg_names[REGNO])
1131
1132 /* This is how to output an element of a case-vector that is absolute. */
1133
1134 #define ASM_OUTPUT_ADDR_VEC_ELT(FILE, VALUE) \
1135 fprintf (FILE, "%s.L%d\n", ASM_WORD_OP, VALUE)
1136
1137 /* This is how to output an element of a case-vector that is relative. */
1138
1139 #define ASM_OUTPUT_ADDR_DIFF_ELT(FILE, BODY, VALUE, REL) \
1140 fprintf (FILE, "%s.L%d-.L%d\n", ASM_WORD_OP, VALUE, REL)
1141
1142 /* This is how to output an assembler line
1143 that says to advance the location counter
1144 to a multiple of 2**LOG bytes. */
1145
1146 #define ASM_OUTPUT_ALIGN(FILE, LOG) \
1147 if ((LOG) != 0) \
1148 fprintf (FILE, "\t.align %d\n", (LOG))
1149
1150 #define ASM_OUTPUT_SKIP(FILE, SIZE) \
1151 fprintf (FILE, "\t.space %d\n", (int)(SIZE))
1152
1153 /* This says how to output an assembler line
1154 to define a global common symbol. */
1155
1156 #define ASM_OUTPUT_COMMON(FILE, NAME, SIZE, ROUNDED) \
1157 ( fputs ("\t.comm ", (FILE)), \
1158 assemble_name ((FILE), (NAME)), \
1159 fprintf ((FILE), ",%lu\n", (unsigned long)(SIZE)))
1160
1161 /* This says how to output the assembler to define a global
1162 uninitialized but not common symbol.
1163 Try to use asm_output_bss to implement this macro. */
1164
1165 #define ASM_OUTPUT_BSS(FILE, DECL, NAME, SIZE, ROUNDED) \
1166 asm_output_bss ((FILE), (DECL), (NAME), (SIZE), (ROUNDED))
1167
1168 #define ASM_OUTPUT_ALIGNED_BSS(FILE, DECL, NAME, SIZE, ALIGN) \
1169 asm_output_aligned_bss (FILE, DECL, NAME, SIZE, ALIGN)
1170
1171 /* This says how to output an assembler line
1172 to define a local common symbol. */
1173
1174 #define ASM_OUTPUT_LOCAL(FILE, NAME, SIZE, ROUNDED) \
1175 ( fputs ("\t.lcomm ", (FILE)), \
1176 assemble_name ((FILE), (NAME)), \
1177 fprintf ((FILE), ",%d\n", (int)(SIZE)))
1178
1179 #define ASM_PN_FORMAT "%s___%lu"
1180
1181 /* Print an instruction operand X on file FILE.
1182 Look in h8300.c for details. */
1183
1184 #define PRINT_OPERAND_PUNCT_VALID_P(CODE) \
1185 ((CODE) == '#')
1186
1187 #define PRINT_OPERAND(FILE, X, CODE) print_operand (FILE, X, CODE)
1188
1189 /* Print a memory operand whose address is X, on file FILE.
1190 This uses a function in h8300.c. */
1191
1192 #define PRINT_OPERAND_ADDRESS(FILE, ADDR) print_operand_address (FILE, ADDR)
1193
1194 /* H8300 specific pragmas. */
1195 #define REGISTER_TARGET_PRAGMAS() \
1196 do \
1197 { \
1198 c_register_pragma (0, "saveall", h8300_pr_saveall); \
1199 c_register_pragma (0, "interrupt", h8300_pr_interrupt); \
1200 } \
1201 while (0)
1202
1203 #define FINAL_PRESCAN_INSN(insn, operand, nop) \
1204 final_prescan_insn (insn, operand, nop)
1205
1206 extern int h8300_move_ratio;
1207 #define MOVE_RATIO(speed) h8300_move_ratio
1208
1209 /* Machine-specific symbol_ref flags. */
1210 #define SYMBOL_FLAG_FUNCVEC_FUNCTION (SYMBOL_FLAG_MACH_DEP << 0)
1211 #define SYMBOL_FLAG_EIGHTBIT_DATA (SYMBOL_FLAG_MACH_DEP << 1)
1212 #define SYMBOL_FLAG_TINY_DATA (SYMBOL_FLAG_MACH_DEP << 2)
1213
1214 #endif /* ! GCC_H8300_H */