1 /* Definitions of target machine for GNU compiler.
2    Renesas H8/300 (generic)
3    Copyright (C) 1992-2016 Free Software Foundation, Inc.
4    Contributed by Steve Chamberlain (sac@cygnus.com),
5    Jim Wilson (wilson@cygnus.com), and Doug Evans (dje@cygnus.com).
6 
7 This file is part of GCC.
8 
9 GCC is free software; you can redistribute it and/or modify
10 it under the terms of the GNU General Public License as published by
11 the Free Software Foundation; either version 3, or (at your option)
12 any later version.
13 
14 GCC is distributed in the hope that it will be useful,
15 but WITHOUT ANY WARRANTY; without even the implied warranty of
16 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17 GNU General Public License for more details.
18 
19 You should have received a copy of the GNU General Public License
20 along with GCC; see the file COPYING3.  If not see
21 <http://www.gnu.org/licenses/>.  */
22 
23 #ifndef GCC_H8300_H
24 #define GCC_H8300_H
25 
26 /* Which CPU to compile for.
27    We use int for CPU_TYPE to avoid lots of casts.  */
28 #if 0 /* defined in insn-attr.h, here for documentation */
29 enum attr_cpu { CPU_H8300, CPU_H8300H };
30 #endif
31 extern int cpu_type;
32 
33 /* Various globals defined in h8300.c.  */
34 
35 extern const char *h8_push_op, *h8_pop_op, *h8_mov_op;
36 extern const char * const *h8_reg_names;
37 
38 /* Target CPU builtins.  */
39 #define TARGET_CPU_CPP_BUILTINS()			\
40   do							\
41     {							\
42       if (TARGET_H8300SX)				\
43 	{						\
44 	  builtin_define ("__H8300SX__");		\
45 	  if (TARGET_NORMAL_MODE)			\
46 	    {						\
47 	      builtin_define ("__NORMAL_MODE__");	\
48 	    }						\
49 	}						\
50       else if (TARGET_H8300S)				\
51 	{						\
52 	  builtin_define ("__H8300S__");		\
53 	  builtin_assert ("cpu=h8300s");		\
54 	  builtin_assert ("machine=h8300s");		\
55 	  if (TARGET_NORMAL_MODE)			\
56 	    {						\
57 	      builtin_define ("__NORMAL_MODE__");	\
58 	    }						\
59 	}						\
60       else if (TARGET_H8300H)				\
61 	{						\
62 	  builtin_define ("__H8300H__");		\
63 	  builtin_assert ("cpu=h8300h");		\
64 	  builtin_assert ("machine=h8300h");		\
65 	  if (TARGET_NORMAL_MODE)			\
66 	    {						\
67 	      builtin_define ("__NORMAL_MODE__");	\
68 	    }						\
69 	}						\
70       else						\
71 	{						\
72 	  builtin_define ("__H8300__");			\
73 	  builtin_assert ("cpu=h8300");			\
74 	  builtin_assert ("machine=h8300");		\
75 	}						\
76     }							\
77   while (0)
78 
79 #define LINK_SPEC "%{mh:%{mn:-m h8300hn}} %{mh:%{!mn:-m h8300h}} %{ms:%{mn:-m h8300sn}} %{ms:%{!mn:-m h8300s}}"
80 
81 #define LIB_SPEC "%{mrelax:-relax} %{g:-lg} %{!p:%{!pg:-lc}}%{p:-lc_p}%{pg:-lc_p}"
82 
83 /* Macros used in the machine description to test the flags.  */
84 
85 /* Select between the H8/300 and H8/300H CPUs.  */
86 #define TARGET_H8300	(! TARGET_H8300H && ! TARGET_H8300S)
87 #define TARGET_H8300S	(TARGET_H8300S_1 || TARGET_H8300SX)
88 /* Some multiply instructions are not available in all H8SX variants.
89    Use this macro instead of TARGET_H8300SX to indicate this, even
90    though we don't actually generate different code for now.  */
91 #define TARGET_H8300SXMUL TARGET_H8300SX
92 
93 #ifdef IN_LIBGCC2
94 #undef TARGET_H8300H
95 #undef TARGET_H8300S
96 #undef TARGET_NORMAL_MODE
97 /* If compiling libgcc2, make these compile time constants based on what
98    flags are we actually compiling with.  */
99 #ifdef __H8300H__
100 #define TARGET_H8300H	1
101 #else
102 #define TARGET_H8300H	0
103 #endif
104 #ifdef __H8300S__
105 #define TARGET_H8300S	1
106 #else
107 #define TARGET_H8300S	0
108 #endif
109 #ifdef __NORMAL_MODE__
110 #define TARGET_NORMAL_MODE 1
111 #else
112 #define TARGET_NORMAL_MODE 0
113 #endif
114 #endif /* !IN_LIBGCC2 */
115 
116 /* Default target_flags if no switches specified.  */
117 
118 #ifndef TARGET_DEFAULT
119 #define TARGET_DEFAULT (MASK_QUICKCALL)
120 #endif
121 
122 /* We want dwarf2 info available to gdb.  */
123 #define DWARF2_DEBUGGING_INFO        1
124 
125 /* The return address is pushed on the stack.  */
126 #define INCOMING_RETURN_ADDR_RTX   gen_rtx_MEM (Pmode, gen_rtx_REG (Pmode, STACK_POINTER_REGNUM))
127 #define INCOMING_FRAME_SP_OFFSET   (POINTER_SIZE / 8)
128 
129 #define DWARF_CIE_DATA_ALIGNMENT	2
130 
131 /* Define this if addresses of constant functions
132    shouldn't be put through pseudo regs where they can be cse'd.
133    Desirable on machines where ordinary constants are expensive
134    but a CALL with constant address is cheap.
135 
136    Calls through a register are cheaper than calls to named
137    functions; however, the register pressure this causes makes
138    CSEing of function addresses generally a lose.  */
139 #define NO_FUNCTION_CSE 1
140 
141 /* Target machine storage layout */
142 
143 /* Define this if most significant bit is lowest numbered
144    in instructions that operate on numbered bit-fields.
145    This is not true on the H8/300.  */
146 #define BITS_BIG_ENDIAN 0
147 
148 /* Define this if most significant byte of a word is the lowest numbered.  */
149 /* That is true on the H8/300.  */
150 #define BYTES_BIG_ENDIAN 1
151 
152 /* Define this if most significant word of a multiword number is lowest
153    numbered.  */
154 #define WORDS_BIG_ENDIAN 1
155 
156 #define MAX_BITS_PER_WORD	32
157 
158 /* Width of a word, in units (bytes).  */
159 #define UNITS_PER_WORD		(TARGET_H8300H || TARGET_H8300S ? 4 : 2)
160 #define MIN_UNITS_PER_WORD	2
161 
162 #define SHORT_TYPE_SIZE	16
163 #define INT_TYPE_SIZE		(TARGET_INT32 ? 32 : 16)
164 #define LONG_TYPE_SIZE		32
165 #define LONG_LONG_TYPE_SIZE	64
166 #define FLOAT_TYPE_SIZE	32
167 #define DOUBLE_TYPE_SIZE	32
168 #define LONG_DOUBLE_TYPE_SIZE	DOUBLE_TYPE_SIZE
169 
170 #define MAX_FIXED_MODE_SIZE	32
171 
172 /* Allocation boundary (in *bits*) for storing arguments in argument list.  */
173 #define PARM_BOUNDARY (TARGET_H8300H || TARGET_H8300S ? 32 : 16)
174 
175 /* Allocation boundary (in *bits*) for the code of a function.  */
176 #define FUNCTION_BOUNDARY 16
177 
178 /* Alignment of field after `int : 0' in a structure.  */
179 /* One can argue this should be 32 for -mint32, but since 32-bit ints only
180    need 16-bit alignment, this is left as is so that -mint32 doesn't change
181    structure layouts.  */
182 #define EMPTY_FIELD_BOUNDARY 16
183 
184 /* No data type wants to be aligned rounder than this.
185    32-bit values are aligned as such on the H8/300H and H8S for speed.  */
186 #define BIGGEST_ALIGNMENT \
187 (((TARGET_H8300H || TARGET_H8300S) && ! TARGET_ALIGN_300) ? 32 : 16)
188 
189 /* The stack goes in 16/32 bit lumps.  */
190 #define STACK_BOUNDARY (TARGET_H8300 ? 16 : 32)
191 
192 /* Define this if move instructions will actually fail to work
193    when given unaligned data.  */
194 /* On the H8/300, longs can be aligned on halfword boundaries, but not
195    byte boundaries.  */
196 #define STRICT_ALIGNMENT 1
197 
198 /* Standard register usage.  */
199 
200 /* Number of actual hardware registers.
201    The hardware registers are assigned numbers for the compiler
202    from 0 to just below FIRST_PSEUDO_REGISTER.
203 
204    All registers that the compiler knows about must be given numbers,
205    even those that are not normally considered general registers.
206 
207    Reg 9 does not correspond to any hardware register, but instead
208    appears in the RTL as an argument pointer prior to reload, and is
209    eliminated during reloading in favor of either the stack or frame
210    pointer.  */
211 
212 #define FIRST_PSEUDO_REGISTER 12
213 
214 /* 1 for registers that have pervasive standard uses
215    and are not available for the register allocator.  */
216 
217 #define FIXED_REGISTERS				\
218 /* r0 r1 r2 r3 r4 r5 r6 r7 mac ap rap fp */	\
219   { 0, 0, 0, 0, 0, 0, 0, 1,  0, 1,  1, 1 }
220 
221 /* 1 for registers not available across function calls.
222    These must include the FIXED_REGISTERS and also any
223    registers that can be used without being saved.
224    The latter must include the registers where values are returned
225    and the register where structure-value addresses are passed.
226    Aside from that, you can include as many other registers as you
227    like.
228 
229    H8 destroys r0,r1,r2,r3.  */
230 
231 #define CALL_USED_REGISTERS			\
232 /* r0 r1 r2 r3 r4 r5 r6 r7 mac ap rap fp */	\
233   { 1, 1, 1, 1, 0, 0, 0, 1,  1, 1,  1, 1 }
234 
235 #define REG_ALLOC_ORDER				\
236 /* r0 r1 r2 r3 r4 r5 r6 r7 mac ap rap  fp */	\
237   { 2, 3, 0, 1, 4, 5, 6, 8,  7, 9, 10, 11 }
238 
239 #define HARD_REGNO_NREGS(REGNO, MODE)		\
240   h8300_hard_regno_nregs ((REGNO), (MODE))
241 
242 #define HARD_REGNO_MODE_OK(REGNO, MODE)		\
243   h8300_hard_regno_mode_ok ((REGNO), (MODE))
244 
245 /* Value is 1 if it is a good idea to tie two pseudo registers
246    when one has mode MODE1 and one has mode MODE2.
247    If HARD_REGNO_MODE_OK could produce different values for MODE1 and MODE2,
248    for any hard reg, then this must be 0 for correct output.  */
249 #define MODES_TIEABLE_P(MODE1, MODE2)					  \
250   ((MODE1) == (MODE2)							  \
251    || (((MODE1) == QImode || (MODE1) == HImode				  \
252 	|| ((TARGET_H8300H || TARGET_H8300S) && (MODE1) == SImode))	  \
253        &&  ((MODE2) == QImode || (MODE2) == HImode			  \
254 	    || ((TARGET_H8300H || TARGET_H8300S) && (MODE2) == SImode))))
255 
256 /* A C expression that is nonzero if hard register NEW_REG can be
257    considered for use as a rename register for OLD_REG register */
258 
259 #define HARD_REGNO_RENAME_OK(OLD_REG, NEW_REG)		\
260    h8300_hard_regno_rename_ok (OLD_REG, NEW_REG)
261 
262 /* Specify the registers used for certain standard purposes.
263    The values of these macros are register numbers.  */
264 
265 /* H8/300 pc is not overloaded on a register.  */
266 
267 /*#define PC_REGNUM 15*/
268 
269 /* Register to use for pushing function arguments.  */
270 #define STACK_POINTER_REGNUM SP_REG
271 
272 /* Base register for access to local variables of the function.  */
273 #define HARD_FRAME_POINTER_REGNUM HFP_REG
274 
275 /* Base register for access to local variables of the function.  */
276 #define FRAME_POINTER_REGNUM FP_REG
277 
278 /* Base register for access to arguments of the function.  */
279 #define ARG_POINTER_REGNUM AP_REG
280 
281 /* Register in which static-chain is passed to a function.  */
282 #define STATIC_CHAIN_REGNUM SC_REG
283 
284 /* Fake register that holds the address on the stack of the
285    current function's return address.  */
286 #define RETURN_ADDRESS_POINTER_REGNUM RAP_REG
287 
288 /* A C expression whose value is RTL representing the value of the return
289    address for the frame COUNT steps up from the current frame.
290    FRAMEADDR is already the frame pointer of the COUNT frame, assuming
291    a stack layout with the frame pointer as the first saved register.  */
292 #define RETURN_ADDR_RTX(COUNT, FRAME) h8300_return_addr_rtx ((COUNT), (FRAME))
293 
294 /* Define the classes of registers for register constraints in the
295    machine description.  Also define ranges of constants.
296 
297    One of the classes must always be named ALL_REGS and include all hard regs.
298    If there is more than one class, another class must be named NO_REGS
299    and contain no registers.
300 
301    The name GENERAL_REGS must be the name of a class (or an alias for
302    another name such as ALL_REGS).  This is the class of registers
303    that is allowed by "g" or "r" in a register constraint.
304    Also, registers outside this class are allocated only when
305    instructions express preferences for them.
306 
307    The classes must be numbered in nondecreasing order; that is,
308    a larger-numbered class must never be contained completely
309    in a smaller-numbered class.
310 
311    For any two classes, it is very desirable that there be another
312    class that represents their union.  */
313 
314 enum reg_class {
315   NO_REGS, COUNTER_REGS, SOURCE_REGS, DESTINATION_REGS,
316   GENERAL_REGS, MAC_REGS, ALL_REGS, LIM_REG_CLASSES
317 };
318 
319 #define N_REG_CLASSES ((int) LIM_REG_CLASSES)
320 
321 /* Give names of register classes as strings for dump file.  */
322 
323 #define REG_CLASS_NAMES \
324 { "NO_REGS", "COUNTER_REGS", "SOURCE_REGS", "DESTINATION_REGS", \
325   "GENERAL_REGS", "MAC_REGS", "ALL_REGS", "LIM_REGS" }
326 
327 /* Define which registers fit in which classes.
328    This is an initializer for a vector of HARD_REG_SET
329    of length N_REG_CLASSES.  */
330 
331 #define REG_CLASS_CONTENTS			\
332 {      {0},		/* No regs      */	\
333    {0x010},		/* COUNTER_REGS */	\
334    {0x020},		/* SOURCE_REGS */	\
335    {0x040},		/* DESTINATION_REGS */	\
336    {0xeff},		/* GENERAL_REGS */	\
337    {0x100},		/* MAC_REGS */		\
338    {0xfff},		/* ALL_REGS	*/	\
339 }
340 
341 /* The same information, inverted:
342    Return the class number of the smallest class containing
343    reg number REGNO.  This could be a conditional expression
344    or could index an array.  */
345 
346 #define REGNO_REG_CLASS(REGNO)				\
347   ((REGNO) == MAC_REG ? MAC_REGS			\
348    : (REGNO) == COUNTER_REG ? COUNTER_REGS		\
349    : (REGNO) == SOURCE_REG ? SOURCE_REGS		\
350    : (REGNO) == DESTINATION_REG ? DESTINATION_REGS	\
351    : GENERAL_REGS)
352 
353 /* The class value for index registers, and the one for base regs.  */
354 
355 #define INDEX_REG_CLASS (TARGET_H8300SX ? GENERAL_REGS : NO_REGS)
356 #define BASE_REG_CLASS  GENERAL_REGS
357 
358 /* Stack layout; function entry, exit and calling.  */
359 
360 /* Define this if pushing a word on the stack
361    makes the stack pointer a smaller address.  */
362 
363 #define STACK_GROWS_DOWNWARD 1
364 
365 /* Define this to nonzero if the nominal address of the stack frame
366    is at the high-address end of the local variables;
367    that is, each additional local variable allocated
368    goes at a more negative offset in the frame.  */
369 
370 #define FRAME_GROWS_DOWNWARD 1
371 
372 /* Offset within stack frame to start allocating local variables at.
373    If FRAME_GROWS_DOWNWARD, this is the offset to the END of the
374    first local allocated.  Otherwise, it is the offset to the BEGINNING
375    of the first local allocated.  */
376 
377 #define STARTING_FRAME_OFFSET 0
378 
379 /* If we generate an insn to push BYTES bytes,
380    this says how many the stack pointer really advances by.
381 
382    On the H8/300, @-sp really pushes a byte if you ask it to - but that's
383    dangerous, so we claim that it always pushes a word, then we catch
384    the mov.b rx,@-sp and turn it into a mov.w rx,@-sp on output.
385 
386    On the H8/300H, we simplify TARGET_QUICKCALL by setting this to 4
387    and doing a similar thing.  */
388 
389 #define PUSH_ROUNDING(BYTES) \
390   (((BYTES) + PARM_BOUNDARY / 8 - 1) & -PARM_BOUNDARY / 8)
391 
392 /* Offset of first parameter from the argument pointer register value.  */
393 /* Is equal to the size of the saved fp + pc, even if an fp isn't
394    saved since the value is used before we know.  */
395 
396 #define FIRST_PARM_OFFSET(FNDECL) 0
397 
398 /* Definitions for register eliminations.
399 
400    This is an array of structures.  Each structure initializes one pair
401    of eliminable registers.  The "from" register number is given first,
402    followed by "to".  Eliminations of the same "from" register are listed
403    in order of preference.
404 
405    We have three registers that can be eliminated on the h8300.
406    First, the frame pointer register can often be eliminated in favor
407    of the stack pointer register.  Secondly, the argument pointer
408    register and the return address pointer register are always
409    eliminated; they are replaced with either the stack or frame
410    pointer.  */
411 
412 #define ELIMINABLE_REGS						\
413 {{ ARG_POINTER_REGNUM, STACK_POINTER_REGNUM},			\
414  { ARG_POINTER_REGNUM, HARD_FRAME_POINTER_REGNUM},		\
415  { RETURN_ADDRESS_POINTER_REGNUM, STACK_POINTER_REGNUM},	\
416  { RETURN_ADDRESS_POINTER_REGNUM, HARD_FRAME_POINTER_REGNUM},	\
417  { FRAME_POINTER_REGNUM, STACK_POINTER_REGNUM},			\
418  { FRAME_POINTER_REGNUM, HARD_FRAME_POINTER_REGNUM}}
419 
420 /* Define the offset between two registers, one to be eliminated, and the other
421    its replacement, at the start of a routine.  */
422 
423 #define INITIAL_ELIMINATION_OFFSET(FROM, TO, OFFSET)		\
424   ((OFFSET) = h8300_initial_elimination_offset ((FROM), (TO)))
425 
426 /* Define this if PCC uses the nonreentrant convention for returning
427    structure and union values.  */
428 
429 /*#define PCC_STATIC_STRUCT_RETURN*/
430 
431 /* 1 if N is a possible register number for function argument passing.
432    On the H8, no registers are used in this way.  */
433 
434 #define FUNCTION_ARG_REGNO_P(N) (TARGET_QUICKCALL ? N < 3 : 0)
435 
436 /* When this hook returns true for MODE, the compiler allows
437    registers explicitly used in the rtl to be used as spill registers
438    but prevents the compiler from extending the lifetime of these
439    registers.  */
440 #define TARGET_SMALL_REGISTER_CLASSES_FOR_MODE_P hook_bool_mode_true
441 
442 /* Define a data type for recording info about an argument list
443    during the scan of that argument list.  This data type should
444    hold all necessary information about the function itself
445    and about the args processed so far, enough to enable macros
446    such as FUNCTION_ARG to determine where the next arg should go.
447 
448    On the H8/300, this is a two item struct, the first is the number
449    of bytes scanned so far and the second is the rtx of the called
450    library function if any.  */
451 
452 #define CUMULATIVE_ARGS struct cum_arg
453 struct cum_arg
454 {
455   int nbytes;
456   rtx libcall;
457 };
458 
459 /* Initialize a variable CUM of type CUMULATIVE_ARGS
460    for a call to a function whose data type is FNTYPE.
461    For a library call, FNTYPE is 0.
462 
463    On the H8/300, the offset starts at 0.  */
464 
465 #define INIT_CUMULATIVE_ARGS(CUM, FNTYPE, LIBNAME, INDIRECT, N_NAMED_ARGS) \
466  ((CUM).nbytes = 0, (CUM).libcall = LIBNAME)
467 
468 /* Output assembler code to FILE to increment profiler label # LABELNO
469    for profiling a function entry.  */
470 
471 #define FUNCTION_PROFILER(FILE, LABELNO)  \
472   fprintf (FILE, "\t%s\t#LP%d,%s\n\tjsr @mcount\n", \
473 	   h8_mov_op, (LABELNO), h8_reg_names[0]);
474 
475 /* EXIT_IGNORE_STACK should be nonzero if, when returning from a function,
476    the stack pointer does not matter.  The value is tested only in
477    functions that have frame pointers.
478    No definition is equivalent to always zero.  */
479 
480 #define EXIT_IGNORE_STACK 0
481 
482 /* Length in units of the trampoline for entering a nested function.  */
483 
484 #define TRAMPOLINE_SIZE ((Pmode == HImode) ? 8 : 12)
485 
486 /* Addressing modes, and classification of registers for them.  */
487 
488 #define HAVE_POST_INCREMENT 1
489 #define HAVE_PRE_DECREMENT 1
490 #define HAVE_POST_DECREMENT TARGET_H8300SX
491 #define HAVE_PRE_INCREMENT TARGET_H8300SX
492 
493 /* Macros to check register numbers against specific register classes.  */
494 
495 /* These assume that REGNO is a hard or pseudo reg number.
496    They give nonzero only if REGNO is a hard reg of the suitable class
497    or a pseudo reg currently allocated to a suitable hard reg.
498    Since they use reg_renumber, they are safe only once reg_renumber
499    has been allocated, which happens in reginfo.c during register
500    allocation.  */
501 
502 #define REGNO_OK_FOR_INDEX_P(regno) 0
503 
504 #define REGNO_OK_FOR_BASE_P(regno)				\
505   (((regno) < FIRST_PSEUDO_REGISTER && regno != MAC_REG)	\
506    || reg_renumber[regno] >= 0)
507 
508 /* Maximum number of registers that can appear in a valid memory address.  */
509 
510 #define MAX_REGS_PER_ADDRESS 1
511 
512 /* 1 if X is an rtx for a constant that is a valid address.  */
513 
514 #define CONSTANT_ADDRESS_P(X)					\
515   (GET_CODE (X) == LABEL_REF || GET_CODE (X) == SYMBOL_REF	\
516    || (GET_CODE (X) == CONST_INT				\
517        /* We handle signed and unsigned offsets here.  */	\
518        && INTVAL (X) > (TARGET_H8300 ? -0x10000 : -0x1000000)	\
519        && INTVAL (X) < (TARGET_H8300 ? 0x10000 : 0x1000000))	\
520    || (GET_CODE (X) == HIGH || GET_CODE (X) == CONST))
521 
522 /* The macros REG_OK_FOR..._P assume that the arg is a REG rtx
523    and check its validity for a certain class.
524    We have two alternate definitions for each of them.
525    The usual definition accepts all pseudo regs; the other rejects
526    them unless they have been allocated suitable hard regs.
527    The symbol REG_OK_STRICT causes the latter definition to be used.
528 
529    Most source files want to accept pseudo regs in the hope that
530    they will get allocated to the class that the insn wants them to be in.
531    Source files for reload pass need to be strict.
532    After reload, it makes no difference, since pseudo regs have
533    been eliminated by then.  */
534 
535 /* Non-strict versions.  */
536 #define REG_OK_FOR_INDEX_NONSTRICT_P(X) 0
537 /* Don't use REGNO_OK_FOR_BASE_P here because it uses reg_renumber.  */
538 #define REG_OK_FOR_BASE_NONSTRICT_P(X)				\
539   (REGNO (X) >= FIRST_PSEUDO_REGISTER || REGNO (X) != MAC_REG)
540 
541 /* Strict versions.  */
542 #define REG_OK_FOR_INDEX_STRICT_P(X) REGNO_OK_FOR_INDEX_P (REGNO (X))
543 #define REG_OK_FOR_BASE_STRICT_P(X)  REGNO_OK_FOR_BASE_P (REGNO (X))
544 
545 #ifndef REG_OK_STRICT
546 
547 #define REG_OK_FOR_INDEX_P(X) REG_OK_FOR_INDEX_NONSTRICT_P (X)
548 #define REG_OK_FOR_BASE_P(X)  REG_OK_FOR_BASE_NONSTRICT_P (X)
549 
550 #else
551 
552 #define REG_OK_FOR_INDEX_P(X) REG_OK_FOR_INDEX_STRICT_P (X)
553 #define REG_OK_FOR_BASE_P(X)  REG_OK_FOR_BASE_STRICT_P (X)
554 
555 #endif
556 
557 
558 /* Specify the machine mode that this machine uses
559    for the index in the tablejump instruction.  */
560 #define CASE_VECTOR_MODE Pmode
561 
562 /* Define this as 1 if `char' should by default be signed; else as 0.
563 
564    On the H8/300, sign extension is expensive, so we'll say that chars
565    are unsigned.  */
566 #define DEFAULT_SIGNED_CHAR 0
567 
568 /* Max number of bytes we can move from memory to memory
569    in one reasonably fast instruction.  */
570 #define MOVE_MAX	(TARGET_H8300H || TARGET_H8300S ? 4 : 2)
571 #define MAX_MOVE_MAX	4
572 
573 /* Nonzero if access to memory by bytes is slow and undesirable.  */
574 #define SLOW_BYTE_ACCESS TARGET_SLOWBYTE
575 
576 /* Define if shifts truncate the shift count
577    which implies one can omit a sign-extension or zero-extension
578    of a shift count.  */
579 /* #define SHIFT_COUNT_TRUNCATED */
580 
581 /* Value is 1 if truncating an integer of INPREC bits to OUTPREC bits
582    is done just by pretending it is already truncated.  */
583 #define TRULY_NOOP_TRUNCATION(OUTPREC, INPREC) 1
584 
585 /* Specify the machine mode that pointers have.
586    After generation of rtl, the compiler makes no further distinction
587    between pointers and any other objects of this machine mode.  */
588 #define Pmode								      \
589   ((TARGET_H8300H || TARGET_H8300S) && !TARGET_NORMAL_MODE ? SImode : HImode)
590 
591 /* ANSI C types.
592    We use longs for the H8/300H and the H8S because ints can be 16 or 32.
593    GCC requires SIZE_TYPE to be the same size as pointers.  */
594 #define SIZE_TYPE								\
595   (TARGET_H8300 || TARGET_NORMAL_MODE ? TARGET_INT32 ? "short unsigned int" : "unsigned int" : "long unsigned int")
596 #define PTRDIFF_TYPE						\
597   (TARGET_H8300 || TARGET_NORMAL_MODE ? TARGET_INT32 ? "short int" : "int" : "long int")
598 
599 #define POINTER_SIZE							\
600   ((TARGET_H8300H || TARGET_H8300S) && !TARGET_NORMAL_MODE ? 32 : 16)
601 
602 #define WCHAR_TYPE "short unsigned int"
603 #define WCHAR_TYPE_SIZE 16
604 
605 /* A function address in a call instruction
606    is a byte address (for indexing purposes)
607    so give the MEM rtx a byte's mode.  */
608 #define FUNCTION_MODE QImode
609 
610 /* Return the length of JUMP's delay slot insn (0 if it has none).
611    If JUMP is a delayed branch, NEXT_INSN (PREV_INSN (JUMP)) will
612    be the containing SEQUENCE, not JUMP itself.  */
613 #define DELAY_SLOT_LENGTH(JUMP) \
614   (NEXT_INSN (PREV_INSN (JUMP)) == JUMP ? 0 : 2)
615 
616 #define BRANCH_COST(speed_p, predictable_p) 0
617 
618 /* Tell final.c how to eliminate redundant test instructions.  */
619 
620 /* Here we define machine-dependent flags and fields in cc_status
621    (see `conditions.h').  No extra ones are needed for the h8300.  */
622 
623 /* Store in cc_status the expressions
624    that the condition codes will describe
625    after execution of an instruction whose pattern is EXP.
626    Do not alter them if the instruction would not alter the cc's.  */
627 
628 #define NOTICE_UPDATE_CC(EXP, INSN) notice_update_cc (EXP, INSN)
629 
630 /* The add insns don't set overflow in a usable way.  */
631 #define CC_OVERFLOW_UNUSABLE 01000
632 /* The mov,and,or,xor insns don't set carry.  That's OK though as the
633    Z bit is all we need when doing unsigned comparisons on the result of
634    these insns (since they're always with 0).  However, conditions.h has
635    CC_NO_OVERFLOW defined for this purpose.  Rename it to something more
636    understandable.  */
637 #define CC_NO_CARRY CC_NO_OVERFLOW
638 
639 /* Control the assembler format that we output.  */
640 
641 /* Output to assembler file text saying following lines
642    may contain character constants, extra white space, comments, etc.  */
643 
644 #define ASM_APP_ON "; #APP\n"
645 
646 /* Output to assembler file text saying following lines
647    no longer contain unusual constructs.  */
648 
649 #define ASM_APP_OFF "; #NO_APP\n"
650 
651 #define FILE_ASM_OP "\t.file\n"
652 
653 /* The assembler op to get a word, 2 bytes for the H8/300, 4 for H8/300H.  */
654 #define ASM_WORD_OP							\
655   (TARGET_H8300 || TARGET_NORMAL_MODE ? "\t.word\t" : "\t.long\t")
656 
657 #define TEXT_SECTION_ASM_OP "\t.section .text"
658 #define DATA_SECTION_ASM_OP "\t.section .data"
659 #define BSS_SECTION_ASM_OP "\t.section .bss"
660 
661 #undef DO_GLOBAL_CTORS_BODY
662 #define DO_GLOBAL_CTORS_BODY			\
663 {						\
664   extern func_ptr __ctors[];			\
665   extern func_ptr __ctors_end[];		\
666   func_ptr *p;					\
667   for (p = __ctors_end; p > __ctors; )		\
668     {						\
669       (*--p)();					\
670     }						\
671 }
672 
673 #undef DO_GLOBAL_DTORS_BODY
674 #define DO_GLOBAL_DTORS_BODY			\
675 {						\
676   extern func_ptr __dtors[];			\
677   extern func_ptr __dtors_end[];		\
678   func_ptr *p;					\
679   for (p = __dtors; p < __dtors_end; p++)	\
680     {						\
681       (*p)();					\
682     }						\
683 }
684 
685 /* How to refer to registers in assembler output.
686    This sequence is indexed by compiler's hard-register-number (see above).  */
687 
688 #define REGISTER_NAMES \
689 { "r0", "r1", "r2", "r3", "r4", "r5", "r6", "sp", "mac", "ap", "rap", "fp" }
690 
691 #define ADDITIONAL_REGISTER_NAMES \
692 { {"er0", 0}, {"er1", 1}, {"er2", 2}, {"er3", 3}, {"er4", 4}, \
693   {"er5", 5}, {"er6", 6}, {"er7", 7}, {"r7", 7} }
694 
695 /* Globalizing directive for a label.  */
696 #define GLOBAL_ASM_OP "\t.global "
697 
698 #define ASM_DECLARE_FUNCTION_NAME(FILE, NAME, DECL) \
699    ASM_OUTPUT_LABEL (FILE, NAME)
700 
701 /* The prefix to add to user-visible assembler symbols.  */
702 
703 #define USER_LABEL_PREFIX "_"
704 
705 /* This is how to store into the string LABEL
706    the symbol_ref name of an internal numbered label where
707    PREFIX is the class of label and NUM is the number within the class.
708    This is suitable for output with `assemble_name'.
709 
710    N.B.: The h8300.md branch_true and branch_false patterns also know
711    how to generate internal labels.  */
712 #define ASM_GENERATE_INTERNAL_LABEL(LABEL, PREFIX, NUM)	\
713   sprintf (LABEL, "*.%s%lu", PREFIX, (unsigned long)(NUM))
714 
715 /* This is how to output an insn to push a register on the stack.
716    It need not be very fast code.  */
717 
718 #define ASM_OUTPUT_REG_PUSH(FILE, REGNO) \
719   fprintf (FILE, "\t%s\t%s\n", h8_push_op, h8_reg_names[REGNO])
720 
721 /* This is how to output an insn to pop a register from the stack.
722    It need not be very fast code.  */
723 
724 #define ASM_OUTPUT_REG_POP(FILE, REGNO) \
725   fprintf (FILE, "\t%s\t%s\n", h8_pop_op, h8_reg_names[REGNO])
726 
727 /* This is how to output an element of a case-vector that is absolute.  */
728 
729 #define ASM_OUTPUT_ADDR_VEC_ELT(FILE, VALUE) \
730   fprintf (FILE, "%s.L%d\n", ASM_WORD_OP, VALUE)
731 
732 /* This is how to output an element of a case-vector that is relative.  */
733 
734 #define ASM_OUTPUT_ADDR_DIFF_ELT(FILE, BODY, VALUE, REL) \
735   fprintf (FILE, "%s.L%d-.L%d\n", ASM_WORD_OP, VALUE, REL)
736 
737 /* This is how to output an assembler line
738    that says to advance the location counter
739    to a multiple of 2**LOG bytes.  */
740 
741 #define ASM_OUTPUT_ALIGN(FILE, LOG)		\
742   if ((LOG) != 0)				\
743     fprintf (FILE, "\t.align %d\n", (LOG))
744 
745 #define ASM_OUTPUT_SKIP(FILE, SIZE) \
746   fprintf (FILE, "\t.space %d\n", (int)(SIZE))
747 
748 /* This says how to output an assembler line
749    to define a global common symbol.  */
750 
751 #define ASM_OUTPUT_COMMON(FILE, NAME, SIZE, ROUNDED)	\
752 ( fputs ("\t.comm ", (FILE)),				\
753   assemble_name ((FILE), (NAME)),			\
754   fprintf ((FILE), ",%lu\n", (unsigned long)(SIZE)))
755 
756 #define ASM_OUTPUT_ALIGNED_BSS(FILE, DECL, NAME, SIZE, ALIGN) \
757   asm_output_aligned_bss (FILE, DECL, NAME, SIZE, ALIGN)
758 
759 /* This says how to output an assembler line
760    to define a local common symbol.  */
761 
762 #define ASM_OUTPUT_LOCAL(FILE, NAME, SIZE, ROUNDED)	\
763 ( fputs ("\t.lcomm ", (FILE)),				\
764   assemble_name ((FILE), (NAME)),			\
765   fprintf ((FILE), ",%d\n", (int)(SIZE)))
766 
767 #define ASM_PN_FORMAT "%s___%lu"
768 
769 /* H8300 specific pragmas.  */
770 #define REGISTER_TARGET_PRAGMAS()				\
771   do								\
772     {								\
773       c_register_pragma (0, "saveall", h8300_pr_saveall);	\
774       c_register_pragma (0, "interrupt", h8300_pr_interrupt);	\
775     }								\
776   while (0)
777 
778 #define FINAL_PRESCAN_INSN(insn, operand, nop)	\
779   final_prescan_insn (insn, operand, nop)
780 
781 extern int h8300_move_ratio;
782 #define MOVE_RATIO(speed) h8300_move_ratio
783 
784 /* Machine-specific symbol_ref flags.  */
785 #define SYMBOL_FLAG_FUNCVEC_FUNCTION	(SYMBOL_FLAG_MACH_DEP << 0)
786 #define SYMBOL_FLAG_EIGHTBIT_DATA	(SYMBOL_FLAG_MACH_DEP << 1)
787 #define SYMBOL_FLAG_TINY_DATA		(SYMBOL_FLAG_MACH_DEP << 2)
788 
789 #endif /* ! GCC_H8300_H */
790