OSDN Git Service

3aa6a8eb4f7276af5655823fea1a1ce184e11677
[pf3gnuchains/gcc-fork.git] / gcc / config / m68hc11 / m68hc11.h
1 /* Definitions of target machine for GNU compiler.
2    Motorola 68HC11 and 68HC12.
3    Copyright (C) 1999, 2000, 2001, 2002, 2003 Free Software Foundation, Inc.
4    Contributed by Stephane Carrez (stcarrez@nerim.fr)
5
6 This file is part of GNU CC.
7
8 GNU CC is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 2, or (at your option)
11 any later version.
12
13 GNU CC is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16 GNU General Public License for more details.
17
18 You should have received a copy of the GNU General Public License
19 along with GNU CC; see the file COPYING.  If not, write to
20 the Free Software Foundation, 59 Temple Place - Suite 330,
21 Boston, MA 02111-1307, USA.
22
23 Note:
24    A first 68HC11 port was made by Otto Lind (otto@coactive.com)
25    on gcc 2.6.3.  I have used it as a starting point for this port.
26    However, this new port is a complete re-write.  Its internal
27    design is completely different.  The generated code is not
28    compatible with the gcc 2.6.3 port.
29
30    The gcc 2.6.3 port is available at:
31
32    ftp.unina.it/pub/electronics/motorola/68hc11/gcc/gcc-6811-fsf.tar.gz
33
34 */
35
36 /*****************************************************************************
37 **
38 ** Controlling the Compilation Driver, `gcc'
39 **
40 *****************************************************************************/
41
42 #undef ENDFILE_SPEC
43
44 /* Compile and assemble for a 68hc11 unless there is a -m68hc12 option.  */
45 #ifndef ASM_SPEC
46 #define ASM_SPEC                                                \
47 "%{m68hc12:-m68hc12}"                                           \
48 "%{m68hcs12:-m68hcs12}"                                         \
49 "%{!m68hc12:%{!m68hcs12:-m68hc11}} "                            \
50 "%{mshort:-mshort}%{!mshort:-mlong} "                           \
51 "%{fshort-double:-mshort-double}%{!fshort-double:-mlong-double}"
52 #endif
53
54 /* We need to tell the linker the target elf format.  Just pass an
55    emulation option.  This can be overridden by -Wl option of gcc.  */
56 #ifndef LINK_SPEC
57 #define LINK_SPEC                                               \
58 "%{m68hc12:-m m68hc12elf}"                                      \
59 "%{m68hcs12:-m m68hc12elf}"                                     \
60 "%{!m68hc12:%{!m68hcs12:-m m68hc11elf}} "                       \
61 "%{!mnorelax:%{!m68hc12:%{!m68hcs12:-relax}}}"
62 #endif
63
64 #ifndef LIB_SPEC
65 #define LIB_SPEC       ""
66 #endif
67
68 #ifndef CC1_SPEC
69 #define CC1_SPEC       ""
70 #endif
71
72 #ifndef CPP_SPEC
73 #define CPP_SPEC  \
74 "%{mshort:-D__HAVE_SHORT_INT__ -D__INT__=16}\
75  %{!mshort:-D__INT__=32}\
76  %{m68hc12:-Dmc6812 -DMC6812 -Dmc68hc12}\
77  %{m68hcs12:-Dmc6812 -DMC6812 -Dmc68hcs12}\
78  %{!m68hc12:%{!m68hcs12:-Dmc6811 -DMC6811 -Dmc68hc11}}\
79  %{fshort-double:-D__HAVE_SHORT_DOUBLE__}\
80  %{mlong-calls:-D__USE_RTC__}"
81 #endif
82
83 #undef STARTFILE_SPEC
84 #define STARTFILE_SPEC "crt1%O%s"
85
86 /* Names to predefine in the preprocessor for this target machine.  */
87 #define TARGET_CPU_CPP_BUILTINS()               \
88   do                                            \
89     {                                           \
90       builtin_define_std ("mc68hc1x");          \
91     }                                           \
92   while (0)
93
94 /* As an embedded target, we have no libc.  */
95 #define inhibit_libc
96
97 /* Forward type declaration for prototypes definitions.
98    rtx_ptr is equivalent to rtx. Can't use the same name.  */
99 struct rtx_def;
100 typedef struct rtx_def *rtx_ptr;
101
102 union tree_node;
103 typedef union tree_node *tree_ptr;
104
105 /* We can't declare enum machine_mode forward nor include 'machmode.h' here.
106    Prototypes defined here will use an int instead. It's better than no
107    prototype at all.  */
108 typedef int enum_machine_mode;
109
110 /*****************************************************************************
111 **
112 ** Run-time Target Specification
113 **
114 *****************************************************************************/
115
116 /* Run-time compilation parameters selecting different hardware subsets.  */
117
118 extern int target_flags;
119
120 extern short *reg_renumber;     /* def in local_alloc.c */
121
122 /* Macros used in the machine description to test the flags.  */
123
124 /* 6811 specific options
125  *
126  * For 68HC12, the auto inc/dec mode is disabled by default. The reason
127  * is that for most programs, the reload pass will fail because it needs
128  * more registers to save the value of the indexed register after the
129  * memory access.  For simple programs, you can enable this
130  * with -mauto-incdec.
131  */
132
133 #define MASK_SHORT              0002    /* Compile with 16-bit `int' */
134 #define MASK_AUTO_INC_DEC       0004
135 #define MASK_M6811              0010
136 #define MASK_M6812              0020
137 #define MASK_M68S12             0040
138 #define MASK_NO_DIRECT_MODE     0100
139 #define MASK_MIN_MAX            0200
140 #define MASK_LONG_CALLS         0400
141
142 #define TARGET_OP_TIME          (optimize && optimize_size == 0)
143 #define TARGET_SHORT            (target_flags & MASK_SHORT)
144 #define TARGET_M6811            (target_flags & MASK_M6811)
145 #define TARGET_M6812            (target_flags & MASK_M6812)
146 #define TARGET_M68S12           (target_flags & MASK_M68S12)
147 #define TARGET_AUTO_INC_DEC     (target_flags & MASK_AUTO_INC_DEC)
148 #define TARGET_MIN_MAX          (target_flags & MASK_MIN_MAX)
149 #define TARGET_NO_DIRECT_MODE   (target_flags & MASK_NO_DIRECT_MODE)
150 #define TARGET_RELAX            (TARGET_NO_DIRECT_MODE)
151 #define TARGET_LONG_CALLS       (target_flags & MASK_LONG_CALLS)
152
153 /* Default target_flags if no switches specified.  */
154 #ifndef TARGET_DEFAULT
155 # define TARGET_DEFAULT         (MASK_M6811)
156 #endif
157
158 /* Define this macro as a C expression for the initializer of an
159    array of string to tell the driver program which options are
160    defaults for this target and thus do not need to be handled
161    specially when using `MULTILIB_OPTIONS'.  */
162 #ifndef MULTILIB_DEFAULTS
163 # if TARGET_DEFAULT & MASK_M6811
164 #  define MULTILIB_DEFAULTS { "m68hc11" }
165 # else
166 #  define MULTILIB_DEFAULTS { "m68hc12" }
167 # endif
168 #endif
169
170 /* Macro to define tables used to set the flags. This is a list in braces of
171    pairs in braces, each pair being { "NAME", VALUE } where VALUE is the bits
172    to set or minus the bits to clear. An empty string NAME is used to
173    identify the default VALUE.  */
174
175 #define TARGET_SWITCHES                                         \
176 { { "short", MASK_SHORT,                                        \
177     N_("Compile with 16-bit integer mode")},                    \
178   { "noshort", - MASK_SHORT,                                    \
179     N_("Compile with 32-bit integer mode")},                    \
180   { "auto-incdec", MASK_AUTO_INC_DEC,                           \
181     N_("Auto pre/post decrement increment allowed")},           \
182   { "noauto-incdec", - MASK_AUTO_INC_DEC,                       \
183     N_("Auto pre/post decrement increment not allowed")},       \
184   { "inmax", MASK_MIN_MAX,                                     \
185     N_("Min/max instructions allowed")},                        \
186   { "nominmax", MASK_MIN_MAX,                                   \
187     N_("Min/max instructions not allowed")},                    \
188   { "long-calls", MASK_LONG_CALLS,                              \
189     N_("Use call and rtc for function calls and returns")},     \
190   { "nolong-calls", - MASK_LONG_CALLS,                          \
191     N_("Use jsr and rts for function calls and returns")},      \
192   { "relax", MASK_NO_DIRECT_MODE,                               \
193     N_("Do not use direct addressing mode for soft registers")},\
194   { "68hc11", MASK_M6811,                                       \
195     N_("Compile for a 68HC11")},                                \
196   { "68hc12", MASK_M6812,                                       \
197     N_("Compile for a 68HC12")},                                \
198   { "68hcs12", MASK_M6812 | MASK_M68S12,                        \
199     N_("Compile for a 68HCS12")},                               \
200   { "6811",   MASK_M6811,                                       \
201     N_("Compile for a 68HC11")},                                \
202   { "6812",   MASK_M6812,                                       \
203     N_("Compile for a 68HC12")},                                \
204   { "68S12",  MASK_M6812 | MASK_M68S12,                         \
205     N_("Compile for a 68HCS12")},                               \
206   { "", TARGET_DEFAULT, 0 }}
207
208 /* This macro is similar to `TARGET_SWITCHES' but defines names of
209    command options that have values.  Its definition is an
210    initializer with a subgrouping for each command option.
211
212    Each subgrouping contains a string constant, that defines the
213    fixed part of the option name, and the address of a variable.  The
214    variable, type `char *', is set to the variable part of the given
215    option if the fixed part matches.  The actual option name is made
216    by appending `-m' to the specified name.  */
217 #define TARGET_OPTIONS                                                  \
218 { { "reg-alloc=",       &m68hc11_reg_alloc_order,                       \
219     N_("Specify the register allocation order")},                       \
220   { "soft-reg-count=",  &m68hc11_soft_reg_count,                        \
221     N_("Indicate the number of soft registers available") },            \
222   SUBTARGET_OPTIONS                                                     \
223 }
224
225 /* These are meant to be redefined in the host dependent files */
226 #define SUBTARGET_SWITCHES
227 #define SUBTARGET_OPTIONS
228
229 extern const char *m68hc11_regparm_string;
230 extern const char *m68hc11_reg_alloc_order;
231 extern const char *m68hc11_soft_reg_count;
232
233 #ifndef TARGET_M68HC12
234 # define TARGET_M68HC11 1
235 #endif
236
237 /* Print subsidiary information on the compiler version in use.  */
238 #define TARGET_VERSION  fprintf (stderr, " (MC68HC11/MC68HC12/MC68HCS12)")
239
240 /* Sometimes certain combinations of command options do not make
241    sense on a particular target machine.  You can define a macro
242    `OVERRIDE_OPTIONS' to take account of this.  This macro, if
243    defined, is executed once just after all the command options have
244    been parsed.
245
246    Don't use this macro to turn on various extra optimizations for
247    `-O'.  That is what `OPTIMIZATION_OPTIONS' is for.  */
248
249 #define OVERRIDE_OPTIONS        m68hc11_override_options ();
250
251 \f
252 /* Define cost parameters for a given processor variant.  */
253 struct processor_costs {
254   const int add;                /* cost of an add instruction */
255   const int logical;          /* cost of a logical instruction */
256   const int shift_var;
257   const int shiftQI_const[8];
258   const int shiftHI_const[16];
259   const int multQI;
260   const int multHI;
261   const int multSI;
262   const int divQI;
263   const int divHI;
264   const int divSI;
265 };
266
267 /* Costs for the current processor.  */
268 extern const struct processor_costs *m68hc11_cost;
269 \f
270
271 /* target machine storage layout */
272
273 /* Define this if most significant byte of a word is the lowest numbered.  */
274 #define BYTES_BIG_ENDIAN        1
275
276 /* Define this if most significant bit is lowest numbered
277    in instructions that operate on numbered bit-fields.  */
278 #define BITS_BIG_ENDIAN         0
279
280 /* Define this if most significant word of a multiword number is numbered.  */
281 #define WORDS_BIG_ENDIAN        1
282
283 /* Width of a word, in units (bytes).  */
284 #define UNITS_PER_WORD          2
285
286 /* Definition of size_t.  This is really an unsigned short as the
287    68hc11 only handles a 64K address space.  */
288 #define SIZE_TYPE               "short unsigned int"
289
290 /* A C expression for a string describing the name of the data type
291    to use for the result of subtracting two pointers.  The typedef
292    name `ptrdiff_t' is defined using the contents of the string.
293    The 68hc11 only has a 64K address space.  */
294 #define PTRDIFF_TYPE            "short int"
295
296 /* Allocation boundary (bits) for storing pointers in memory.  */
297 #define POINTER_BOUNDARY        8
298
299 /* Normal alignment required for function parameters on the stack, in bits.
300    This can't be less than BITS_PER_WORD */
301 #define PARM_BOUNDARY           (BITS_PER_WORD)
302
303 /* Boundary (bits) on which stack pointer should be aligned.  */
304 #define STACK_BOUNDARY          8
305
306 /* Allocation boundary (bits) for the code of a function.  */
307 #define FUNCTION_BOUNDARY       8
308
309 #define BIGGEST_ALIGNMENT       8
310
311 /* Alignment of field after `int : 0' in a structure.  */
312 #define EMPTY_FIELD_BOUNDARY    8
313
314 /* Every structure's size must be a multiple of this.  */
315 #define STRUCTURE_SIZE_BOUNDARY 8
316
317 /* Define this if instructions will fail to work if given data not
318    on the nominal alignment.  If instructions will merely go slower
319    in that case, do not define this macro.  */
320 #define STRICT_ALIGNMENT        0
321
322 /* An integer expression for the size in bits of the largest integer
323    machine mode that should actually be used.  All integer machine modes of
324    this size or smaller can be used for structures and unions with the
325    appropriate sizes.  */
326 #define MAX_FIXED_MODE_SIZE     64
327 \f
328 /* target machine storage layout */
329
330 /* Size (bits) of the type "int" on target machine
331    (If undefined, default is BITS_PER_WORD).  */
332 #define INT_TYPE_SIZE           (TARGET_SHORT ? 16 : 32)
333
334 /* Size (bits) of the type "short" on target machine */
335 #define SHORT_TYPE_SIZE         16
336
337 /* Size (bits) of the type "long" on target machine */
338 #define LONG_TYPE_SIZE          32
339
340 /* Size (bits) of the type "long long" on target machine */
341 #define LONG_LONG_TYPE_SIZE     64
342
343 /* A C expression for the size in bits of the type `float' on the
344    target machine. If you don't define this, the default is one word.
345    Don't use default: a word is only 16.  */
346 #define FLOAT_TYPE_SIZE         32
347
348 /* A C expression for the size in bits of the type double on the target
349    machine. If you don't define this, the default is two words.
350    Be IEEE compliant.  */
351 #define DOUBLE_TYPE_SIZE        64
352
353 #define LONG_DOUBLE_TYPE_SIZE   64
354
355 /* Define this as 1 if `char' should by default be signed; else as 0.  */
356 #define DEFAULT_SIGNED_CHAR     0
357
358 /* Define these to avoid dependence on meaning of `int'.
359    Note that WCHAR_TYPE_SIZE is used in cexp.y,
360    where TARGET_SHORT is not available.  */
361 #define WCHAR_TYPE              "short int"
362 #define WCHAR_TYPE_SIZE         16
363 \f
364
365 /* Standard register usage.  */
366
367 #define HARD_REG_SIZE           (UNITS_PER_WORD)
368
369 /* Assign names to real MC68HC11 registers.
370    A and B registers are not really used (A+B = D)
371    X register is first so that GCC allocates X+D for 32-bit integers and
372    the lowpart of that integer will be D.  Having the lower part in D is
373    better for 32<->16bit conversions and for many arithmetic operations.  */
374 #define HARD_X_REGNUM           0
375 #define HARD_D_REGNUM           1
376 #define HARD_Y_REGNUM           2
377 #define HARD_SP_REGNUM          3
378 #define HARD_PC_REGNUM          4
379 #define HARD_A_REGNUM           5
380 #define HARD_B_REGNUM           6
381 #define HARD_CCR_REGNUM         7
382
383 /* The Z register does not really exist in the 68HC11.  This a fake register
384    for GCC.  It is treated exactly as an index register (X or Y).  It is only
385    in the A_REGS class, which is the BASE_REG_CLASS for GCC.  Defining this
386    register helps the reload pass of GCC.  Otherwise, the reload often aborts
387    with register spill failures.
388
389    The Z register is replaced by either X or Y during the machine specific
390    reorg (m68hc11_reorg).  It is saved in the SOFT_Z_REGNUM soft-register
391    when this is necessary.
392
393    It's possible to tell GCC not to use this register with -ffixed-z.  */
394 #define HARD_Z_REGNUM           8
395
396 /* The frame pointer is a soft-register.  It's treated as such by GCC:
397    it is not and must not be part of the BASE_REG_CLASS.  */
398 #define DEFAULT_HARD_FP_REGNUM  (9)
399 #define HARD_FP_REGNUM          (9)
400 #define HARD_AP_REGNUM          (HARD_FP_REGNUM)
401
402 /* Temporary soft-register used in some cases when an operand came
403    up into a bad register class (D, X, Y, SP) and gcc failed to
404    recognize this. This register is never allocated by GCC.  */
405 #define SOFT_TMP_REGNUM          10
406
407 /* The soft-register which is used to save the Z register
408    (see Z register replacement notes in m68hc11.c).  */
409 #define SOFT_Z_REGNUM            11
410
411 /* The soft-register which is used to save either X or Y.  */
412 #define SOFT_SAVED_XY_REGNUM     12
413
414 /* A fake clobber register for 68HC12 patterns.  */
415 #define FAKE_CLOBBER_REGNUM     (13)
416
417 /* Define 32 soft-registers of 16-bit each.  By default,
418    only 12 of them are enabled and can be used by GCC.  The
419    -msoft-reg-count=<n> option allows to control the number of valid
420    soft-registers. GCC can put 32-bit values in them
421    by allocating consecutive registers.  The first 3 soft-registers
422    are never allocated by GCC.  They are used in case the insn template needs
423    a temporary register, or for the Z register replacement.  */
424
425 #define MAX_SOFT_REG_COUNT      (32)
426 #define SOFT_REG_FIXED          0, 0, 0, 0, 0, 0, 0, 0, \
427                                 0, 0, 0, 0, 1, 1, 1, 1, \
428                                 1, 1, 1, 1, 1, 1, 1, 1, \
429                                 1, 1, 1, 1, 1, 1, 1, 1
430 #define SOFT_REG_USED           0, 0, 0, 0, 0, 0, 0, 0, \
431                                 0, 0, 0, 0, 1, 1, 1, 1, \
432                                 1, 1, 1, 1, 1, 1, 1, 1, \
433                                 1, 1, 1, 1, 1, 1, 1, 1
434 #define SOFT_REG_ORDER          \
435 SOFT_REG_FIRST, SOFT_REG_FIRST+1,SOFT_REG_FIRST+2,SOFT_REG_FIRST+3,\
436 SOFT_REG_FIRST+4, SOFT_REG_FIRST+5,SOFT_REG_FIRST+6,SOFT_REG_FIRST+7,\
437 SOFT_REG_FIRST+8, SOFT_REG_FIRST+9,SOFT_REG_FIRST+10,SOFT_REG_FIRST+11,\
438 SOFT_REG_FIRST+12, SOFT_REG_FIRST+13,SOFT_REG_FIRST+14,SOFT_REG_FIRST+15,\
439 SOFT_REG_FIRST+16, SOFT_REG_FIRST+17,SOFT_REG_FIRST+18,SOFT_REG_FIRST+19,\
440 SOFT_REG_FIRST+20, SOFT_REG_FIRST+21,SOFT_REG_FIRST+22,SOFT_REG_FIRST+23,\
441 SOFT_REG_FIRST+24, SOFT_REG_FIRST+25,SOFT_REG_FIRST+26,SOFT_REG_FIRST+27,\
442 SOFT_REG_FIRST+28, SOFT_REG_FIRST+29,SOFT_REG_FIRST+30,SOFT_REG_FIRST+31
443
444 #define SOFT_REG_NAMES                                                  \
445 "*_.d1",  "*_.d2",  "*_.d3",  "*_.d4", \
446 "*_.d5",  "*_.d6",  "*_.d7",  "*_.d8",  \
447 "*_.d9",  "*_.d10", "*_.d11", "*_.d12", \
448 "*_.d13", "*_.d14", "*_.d15", "*_.d16", \
449 "*_.d17", "*_.d18", "*_.d19", "*_.d20", \
450 "*_.d21", "*_.d22", "*_.d23", "*_.d24", \
451 "*_.d25", "*_.d26", "*_.d27", "*_.d28", \
452 "*_.d29", "*_.d30", "*_.d31", "*_.d32"
453
454 /* First available soft-register for GCC.  */
455 #define SOFT_REG_FIRST          (SOFT_SAVED_XY_REGNUM+2)
456
457 /* Last available soft-register for GCC.  */
458 #define SOFT_REG_LAST           (SOFT_REG_FIRST+MAX_SOFT_REG_COUNT)
459 #define SOFT_FP_REGNUM          (SOFT_REG_LAST)
460 #define SOFT_AP_REGNUM          (SOFT_FP_REGNUM+1)
461
462 /* Number of actual hardware registers. The hardware registers are assigned
463    numbers for the compiler from 0 to just below FIRST_PSEUDO_REGISTER. 
464    All registers that the compiler knows about must be given numbers, even
465    those that are not normally considered general registers.  */
466 #define FIRST_PSEUDO_REGISTER   (SOFT_REG_LAST+2)
467
468 /* 1 for registers that have pervasive standard uses and are not available
469    for the register allocator.  */
470 #define FIXED_REGISTERS \
471   {0, 0, 0, 1, 1, 1, 1, 1,   0, 1,  1,   1,1, 1, SOFT_REG_FIXED, 1, 1}
472 /* X, D, Y, SP,PC,A, B, CCR, Z, FP,ZTMP,ZR,XYR, FK, D1 - D32, SOFT-FP, AP */
473
474 /* 1 for registers not available across function calls. For our pseudo
475    registers, all are available.  */
476 #define CALL_USED_REGISTERS \
477   {1, 1, 1, 1, 1, 1, 1, 1,   1, 1,  1,   1,1, 1, SOFT_REG_USED, 1, 1}
478 /* X, D, Y, SP,PC,A, B, CCR, Z, FP, ZTMP,ZR,XYR, D1 - 32,     SOFT-FP, AP */
479
480
481 /* Define this macro to change register usage conditional on target flags.
482
483    The soft-registers are disabled or enabled according to the
484   -msoft-reg-count=<n> option.  */
485
486
487 #define CONDITIONAL_REGISTER_USAGE (m68hc11_conditional_register_usage ())
488
489 /* List the order in which to allocate registers.  Each register must be
490    listed once, even those in FIXED_REGISTERS.  */
491 #define REG_ALLOC_ORDER                                                 \
492 { HARD_D_REGNUM, HARD_X_REGNUM, HARD_Y_REGNUM,                          \
493   SOFT_REG_ORDER, HARD_Z_REGNUM, HARD_PC_REGNUM, HARD_A_REGNUM,         \
494   HARD_B_REGNUM, HARD_CCR_REGNUM, HARD_FP_REGNUM, SOFT_FP_REGNUM,       \
495   HARD_SP_REGNUM, SOFT_TMP_REGNUM, SOFT_Z_REGNUM, SOFT_SAVED_XY_REGNUM, \
496   SOFT_AP_REGNUM, FAKE_CLOBBER_REGNUM  }
497
498 /* A C expression for the number of consecutive hard registers,
499    starting at register number REGNO, required to hold a value of
500    mode MODE.  */
501 #define HARD_REGNO_NREGS(REGNO, MODE) \
502 ((Q_REGNO_P (REGNO)) ? (GET_MODE_SIZE (MODE)) : \
503    ((GET_MODE_SIZE (MODE) + HARD_REG_SIZE - 1) / HARD_REG_SIZE))
504
505 /* Value is 1 if hard register REGNO can hold a value of machine-mode MODE.
506     - 8 bit values are stored anywhere (except the SP register).
507     - 16 bit values can be stored in any register whose mode is 16
508     - 32 bit values can be stored in D, X registers or in a soft register
509       (except the last one because we need 2 soft registers)
510     - Values whose size is > 32 bit are not stored in real hard
511       registers.  They may be stored in soft registers if there are
512       enough of them.  */
513 #define HARD_REGNO_MODE_OK(REGNO, MODE) \
514      hard_regno_mode_ok (REGNO,MODE)
515
516 /* Value is 1 if it is a good idea to tie two pseudo registers when one has
517    mode MODE1 and one has mode MODE2.  If HARD_REGNO_MODE_OK could produce
518    different values for MODE1 and MODE2, for any hard reg, then this must be
519    0 for correct output.
520
521    All modes are tieable except QImode.  */
522 #define MODES_TIEABLE_P(MODE1, MODE2)                   \
523      (((MODE1) == (MODE2))                              \
524       || ((MODE1) != QImode && (MODE2) != QImode))
525 \f
526
527 /* Define the classes of registers for register constraints in the
528    machine description.  Also define ranges of constants.
529
530    One of the classes must always be named ALL_REGS and include all hard regs.
531    If there is more than one class, another class must be named NO_REGS
532    and contain no registers.
533
534    The name GENERAL_REGS must be the name of a class (or an alias for
535    another name such as ALL_REGS).  This is the class of registers
536    that is allowed by "g" or "r" in a register constraint.
537    Also, registers outside this class are allocated only when
538    instructions express preferences for them.
539
540    The classes must be numbered in nondecreasing order; that is,
541    a larger-numbered class must never be contained completely
542    in a smaller-numbered class.
543
544    For any two classes, it is very desirable that there be another
545    class that represents their union.  */
546
547 /* The M68hc11 has so fiew registers that it's not possible for GCC to
548    do any register allocation without breaking. We extend the processor
549    registers by having soft registers. These registers are treated as
550    hard registers by GCC but they are located in memory and accessed by page0
551    accesses (IND mode).  */
552 enum reg_class
553 {
554   NO_REGS,
555   D_REGS,                       /* 16-bit data register */
556   X_REGS,                       /* 16-bit X register */
557   Y_REGS,                       /* 16-bit Y register */
558   SP_REGS,                      /* 16 bit stack pointer */
559   DA_REGS,                      /* 8-bit A reg.  */
560   DB_REGS,                      /* 8-bit B reg.  */
561   Z_REGS,                       /* 16-bit fake Z register */
562   D8_REGS,                      /* 8-bit A or B reg.  */
563   Q_REGS,                       /* 8-bit (byte (QI)) data (A, B or D) */
564   D_OR_X_REGS,                  /* D or X register */
565   D_OR_Y_REGS,                  /* D or Y register */
566   D_OR_SP_REGS,                 /* D or SP register */
567   X_OR_Y_REGS,                  /* IX or Y register */
568   A_REGS,                       /* 16-bit address register (X, Y, Z) */
569   X_OR_SP_REGS,                 /* X or SP register */
570   Y_OR_SP_REGS,                 /* Y or SP register */
571   X_OR_Y_OR_D_REGS,             /* X, Y or D */
572   A_OR_D_REGS,                  /* X, Y, Z or D */
573   A_OR_SP_REGS,                 /* X, Y, Z or SP */
574   H_REGS,                       /* 16-bit hard register (D, X, Y, Z, SP) */
575   S_REGS,                       /* 16-bit soft register */
576   D_OR_S_REGS,                  /* 16-bit soft register or D register */
577   X_OR_S_REGS,                  /* 16-bit soft register or X register */
578   Y_OR_S_REGS,                  /* 16-bit soft register or Y register */
579   SP_OR_S_REGS,                 /* 16-bit soft register or SP register */
580   D_OR_X_OR_S_REGS,             /* 16-bit soft register or D or X register */
581   D_OR_Y_OR_S_REGS,             /* 16-bit soft register or D or Y register */
582   D_OR_SP_OR_S_REGS,            /* 16-bit soft register or D or SP register */
583   A_OR_S_REGS,                  /* 16-bit soft register or X, Y registers */
584   D_OR_A_OR_S_REGS,             /* 16-bit soft register or D, X, Y registers */
585   TMP_REGS,                     /* 16 bit fake scratch register */
586   D_OR_A_OR_TMP_REGS,           /* General scratch register */
587   G_REGS,                       /* 16-bit general register
588                                    (H_REGS + soft registers) */
589   ALL_REGS,
590   LIM_REG_CLASSES
591 };
592
593 /* alias GENERAL_REGS to G_REGS.  */
594 #define GENERAL_REGS    G_REGS
595
596 #define N_REG_CLASSES   (int) LIM_REG_CLASSES
597
598 /* Give names of register classes as strings for dump file.  */
599 #define REG_CLASS_NAMES \
600 { "NO_REGS",                                    \
601       "D_REGS",                                 \
602       "X_REGS",                                 \
603       "Y_REGS",                                 \
604       "SP_REGS",                                \
605       "DA_REGS",                                \
606       "DB_REGS",                                \
607       "D8_REGS",                                \
608       "Z_REGS",                                 \
609       "Q_REGS",                                 \
610       "D_OR_X_REGS",                            \
611       "D_OR_Y_REGS",                            \
612       "D_OR_SP_REGS",                           \
613       "X_OR_Y_REGS",                            \
614       "A_REGS",                                 \
615       "X_OR_SP_REGS",                           \
616       "Y_OR_SP_REGS",                           \
617       "X_OR_Y_OR_D_REGS",                       \
618       "A_OR_D_REGS",                            \
619       "A_OR_SP_REGS",                           \
620       "H_REGS",                                 \
621       "S_REGS",                                 \
622       "D_OR_S_REGS",                            \
623       "X_OR_S_REGS",                            \
624       "Y_OR_S_REGS",                            \
625       "SP_OR_S_REGS",                           \
626       "D_OR_X_OR_S_REGS",                       \
627       "D_OR_Y_OR_S_REGS",                       \
628       "D_OR_SP_OR_S_REGS",                      \
629       "A_OR_S_REGS",                            \
630       "D_OR_A_OR_S_REGS",                       \
631       "TMP_REGS",                               \
632       "D_OR_A_OR_TMP_REGS",                     \
633       "G_REGS",                                 \
634       "ALL_REGS" }
635
636 /* An initializer containing the contents of the register classes,
637    as integers which are bit masks.  The Nth integer specifies the
638    contents of class N.  The way the integer MASK is interpreted is
639    that register R is in the class if `MASK & (1 << R)' is 1.  */
640
641 /*--------------------------------------------------------------
642    X            0x00000001
643    D            0x00000002
644    Y            0x00000004
645    SP           0x00000008
646    PC           0x00000010
647    A            0x00000020
648    B            0x00000040
649    CCR          0x00000080
650    Z            0x00000100
651    FRAME        0x00000200
652    ZTMP         0x00000400
653    ZREG         0x00000800
654    XYREG        0x00001000
655    FAKE         0x00002000
656    Di           0xFFFFc000, 0x03FFF
657    SFRAME       0x00000000, 0x04000
658    AP           0x00000000, 0x08000
659
660    D_OR_X_REGS represents D+X. It is used for 32-bits numbers.
661    A_REGS      represents a valid base register for indexing. It represents
662                X,Y and the Z register.
663    S_REGS      represents the soft-registers. This includes the hard frame
664                and soft frame registers.
665 --------------------------------------------------------------*/
666
667 #define REG_CLASS_CONTENTS \
668 /* NO_REGS */           {{ 0x00000000, 0x00000000 },                    \
669 /* D_REGS  */            { 0x00000002, 0x00000000 }, /* D */            \
670 /* X_REGS  */            { 0x00000001, 0x00000000 }, /* X */            \
671 /* Y_REGS  */            { 0x00000004, 0x00000000 }, /* Y */            \
672 /* SP_REGS */            { 0x00000008, 0x00000000 }, /* SP */           \
673 /* DA_REGS */            { 0x00000020, 0x00000000 }, /* A */            \
674 /* DB_REGS */            { 0x00000040, 0x00000000 }, /* B */            \
675 /* Z_REGS  */            { 0x00000100, 0x00000000 }, /* Z */            \
676 /* D8_REGS */            { 0x00000060, 0x00000000 }, /* A B */          \
677 /* Q_REGS  */            { 0x00000062, 0x00000000 }, /* A B D */        \
678 /* D_OR_X_REGS */        { 0x00000003, 0x00000000 }, /* D X */          \
679 /* D_OR_Y_REGS */        { 0x00000006, 0x00000000 }, /* D Y */          \
680 /* D_OR_SP_REGS */       { 0x0000000A, 0x00000000 }, /* D SP */         \
681 /* X_OR_Y_REGS  */       { 0x00000005, 0x00000000 }, /* X Y */          \
682 /* A_REGS  */            { 0x00000105, 0x00000000 }, /* X Y Z */        \
683 /* X_OR_SP_REGS */       { 0x00000009, 0x00000000 }, /* X SP */         \
684 /* Y_OR_SP_REGS */       { 0x0000000C, 0x00000000 }, /* Y SP */         \
685 /* X_OR_Y_OR_D_REGS */   { 0x00000007, 0x00000000 }, /* D X Y */        \
686 /* A_OR_D_REGS  */       { 0x00000107, 0x00000000 }, /* D X Y Z */      \
687 /* A_OR_SP_REGS */       { 0x0000010D, 0x00000000 }, /* X Y SP */       \
688 /* H_REGS  */            { 0x0000010F, 0x00000000 }, /* D X Y SP */     \
689 /* S_REGS  */            { 0xFFFFDE00, 0x00007FFF }, /* _.D,..,FP,Z*  */  \
690 /* D_OR_S_REGS */        { 0xFFFFDE02, 0x00007FFF }, /* D _.D */        \
691 /* X_OR_S_REGS */        { 0xFFFFDE01, 0x00007FFF }, /* X _.D */        \
692 /* Y_OR_S_REGS */        { 0xFFFFDE04, 0x00007FFF }, /* Y _.D */        \
693 /* SP_OR_S_REGS */       { 0xFFFFDE08, 0x00007FFF }, /* SP _.D */       \
694 /* D_OR_X_OR_S_REGS */   { 0xFFFFDE03, 0x00007FFF }, /* D X _.D */      \
695 /* D_OR_Y_OR_S_REGS */   { 0xFFFFDE06, 0x00007FFF }, /* D Y _.D */      \
696 /* D_OR_SP_OR_S_REGS */  { 0xFFFFDE0A, 0x00007FFF }, /* D SP _.D */     \
697 /* A_OR_S_REGS */        { 0xFFFFDF05, 0x00007FFF }, /* X Y _.D */      \
698 /* D_OR_A_OR_S_REGS */   { 0xFFFFDF07, 0x00007FFF }, /* D X Y _.D */    \
699 /* TMP_REGS  */          { 0x00002000, 0x00000000 }, /* FAKE */         \
700 /* D_OR_A_OR_TMP_REGS*/  { 0x00002107, 0x00000000 }, /* D X Y Z Fake */  \
701 /* G_REGS  */            { 0xFFFFFF1F, 0x00007FFF }, /* ? _.D D X Y */   \
702 /* ALL_REGS*/            { 0xFFFFFFFF, 0x00007FFF }}
703
704
705 /* set up a C expression whose value is a register class containing hard
706    register REGNO */
707 #define Q_REGNO_P(REGNO)        ((REGNO) == HARD_A_REGNUM \
708                                  || (REGNO) == HARD_B_REGNUM)
709 #define Q_REG_P(X)              (REG_P (X) && Q_REGNO_P (REGNO (X)))
710
711 #define D_REGNO_P(REGNO)        ((REGNO) == HARD_D_REGNUM)
712 #define D_REG_P(X)              (REG_P (X) && D_REGNO_P (REGNO (X)))
713
714 #define DB_REGNO_P(REGNO)       ((REGNO) == HARD_B_REGNUM)
715 #define DB_REG_P(X)             (REG_P (X) && DB_REGNO_P (REGNO (X)))
716 #define DA_REGNO_P(REGNO)       ((REGNO) == HARD_A_REGNUM)
717 #define DA_REG_P(X)             (REG_P (X) && DA_REGNO_P (REGNO (X)))
718
719 #define X_REGNO_P(REGNO)        ((REGNO) == HARD_X_REGNUM)
720 #define X_REG_P(X)              (REG_P (X) && X_REGNO_P (REGNO (X)))
721
722 #define Y_REGNO_P(REGNO)        ((REGNO) == HARD_Y_REGNUM)
723 #define Y_REG_P(X)              (REG_P (X) && Y_REGNO_P (REGNO (X)))
724
725 #define Z_REGNO_P(REGNO)        ((REGNO) == HARD_Z_REGNUM)
726 #define Z_REG_P(X)              (REG_P (X) && Z_REGNO_P (REGNO (X)))
727
728 #define SP_REGNO_P(REGNO)       ((REGNO) == HARD_SP_REGNUM)
729 #define SP_REG_P(X)             (REG_P (X) && SP_REGNO_P (REGNO (X)))
730
731 /* Address register.  */
732 #define A_REGNO_P(REGNO)        ((REGNO) == HARD_X_REGNUM \
733                                  || (REGNO) == HARD_Y_REGNUM \
734                                  || (REGNO) == HARD_Z_REGNUM)
735 #define A_REG_P(X)              (REG_P (X) && A_REGNO_P (REGNO (X)))
736
737 /* M68hc11 hard registers.  */
738 #define H_REGNO_P(REGNO)        (D_REGNO_P (REGNO) || A_REGNO_P (REGNO) \
739                                  || SP_REGNO_P (REGNO) || Q_REGNO_P (REGNO))
740 #define H_REG_P(X)              (REG_P (X) && H_REGNO_P (REGNO (X)))
741
742 #define FAKE_REGNO_P(REGNO)     ((REGNO) == FAKE_CLOBBER_REGNUM)
743 #define FAKE_REG_P(X)           (REG_P (X) && FAKE_REGNO_P (REGNO (X)))
744
745 /* Soft registers (or register emulation for gcc).  The temporary register
746    used by insn template must be part of the S_REGS class so that it
747    matches the 'u' constraint.  */
748 #define S_REGNO_P(REGNO)        ((REGNO) >= SOFT_TMP_REGNUM \
749                                  && (REGNO) <= SOFT_REG_LAST \
750                                  && (REGNO) != FAKE_CLOBBER_REGNUM)
751 #define S_REG_P(X)              (REG_P (X) && S_REGNO_P (REGNO (X)))
752
753 #define Z_REGNO_P(REGNO)        ((REGNO) == HARD_Z_REGNUM)
754 #define Z_REG_P(X)              (REG_P (X) && Z_REGNO_P (REGNO (X)))
755
756 /* General register.  */
757 #define G_REGNO_P(REGNO)        (H_REGNO_P (REGNO) || S_REGNO_P (REGNO) \
758                                  || ((REGNO) == HARD_PC_REGNUM) \
759                                  || ((REGNO) == HARD_FP_REGNUM) \
760                                  || ((REGNO) == SOFT_FP_REGNUM) \
761                                  || ((REGNO) == FAKE_CLOBBER_REGNUM) \
762                                  || ((REGNO) == SOFT_AP_REGNUM))
763
764 #define G_REG_P(X)              (REG_P (X) && G_REGNO_P (REGNO (X)))
765
766 #define REGNO_REG_CLASS(REGNO) \
767   (D_REGNO_P (REGNO) ? D_REGS : \
768    (X_REGNO_P (REGNO) ? X_REGS : \
769     (Y_REGNO_P (REGNO) ? Y_REGS : \
770      (SP_REGNO_P (REGNO) ? SP_REGS : \
771       (Z_REGNO_P (REGNO) ? Z_REGS : \
772        (H_REGNO_P (REGNO) ? H_REGS : \
773         (FAKE_REGNO_P (REGNO) ? TMP_REGS : \
774          (S_REGNO_P (REGNO) ? S_REGS : \
775           (DA_REGNO_P (REGNO) ? DA_REGS: \
776            (DB_REGNO_P (REGNO) ? DB_REGS: \
777             (G_REGNO_P (REGNO) ? G_REGS : ALL_REGS)))))))))))
778
779
780 /* Get reg_class from a letter in the machine description.  */
781
782 extern enum reg_class m68hc11_tmp_regs_class;
783 #define REG_CLASS_FROM_LETTER(C) \
784    ((C) == 'a' ? DA_REGS : \
785     (C) == 'A' ? A_REGS : \
786     (C) == 'b' ? DB_REGS : \
787     (C) == 'B' ? X_OR_Y_REGS : \
788     (C) == 'd' ? D_REGS : \
789     (C) == 'D' ? D_OR_X_REGS : \
790     (C) == 'q' ? Q_REGS : \
791     (C) == 'h' ? H_REGS : \
792     (C) == 't' ? TMP_REGS : \
793     (C) == 'u' ? S_REGS : \
794     (C) == 'v' ? m68hc11_tmp_regs_class : \
795     (C) == 'w' ? SP_REGS : \
796     (C) == 'x' ? X_REGS : \
797     (C) == 'y' ? Y_REGS : \
798     (C) == 'z' ? Z_REGS : NO_REGS)
799
800 #define PREFERRED_RELOAD_CLASS(X,CLASS) preferred_reload_class(X,CLASS)
801
802 #define SMALL_REGISTER_CLASSES 1
803
804 /* A C expression whose value is nonzero if pseudos that have been
805    assigned to registers of class CLASS would likely be spilled
806    because registers of CLASS are needed for spill registers.
807
808    The default value of this macro returns 1 if CLASS has exactly one
809    register and zero otherwise.  On most machines, this default
810    should be used.  Only define this macro to some other expression
811    if pseudo allocated by `local-alloc.c' end up in memory because
812    their hard registers were needed for spill registers.  If this
813    macro returns nonzero for those classes, those pseudos will only
814    be allocated by `global.c', which knows how to reallocate the
815    pseudo to another register.  If there would not be another
816    register available for reallocation, you should not change the
817    definition of this macro since the only effect of such a
818    definition would be to slow down register allocation.  */
819
820 #define CLASS_LIKELY_SPILLED_P(CLASS)                                   \
821   (((CLASS) == D_REGS)                                                  \
822    || ((CLASS) == X_REGS)                                               \
823    || ((CLASS) == Y_REGS)                                               \
824    || ((CLASS) == A_REGS)                                               \
825    || ((CLASS) == SP_REGS)                                              \
826    || ((CLASS) == D_OR_X_REGS)                                          \
827    || ((CLASS) == D_OR_Y_REGS)                                          \
828    || ((CLASS) == X_OR_SP_REGS)                                         \
829    || ((CLASS) == Y_OR_SP_REGS)                                         \
830    || ((CLASS) == D_OR_SP_REGS))
831
832 /* Return the maximum number of consecutive registers needed to represent
833    mode MODE in a register of class CLASS.  */
834 #define CLASS_MAX_NREGS(CLASS, MODE)            \
835 (((CLASS) == DA_REGS || (CLASS) == DB_REGS \
836    || (CLASS) == D8_REGS || (CLASS) == Q_REGS) ? GET_MODE_SIZE (MODE) \
837  : ((GET_MODE_SIZE (MODE) + UNITS_PER_WORD - 1) / UNITS_PER_WORD))
838
839 /* The letters I, J, K, L and M in a register constraint string
840    can be used to stand for particular ranges of immediate operands.
841    This macro defines what the ranges are.
842    C is the letter, and VALUE is a constant value.
843    Return 1 if VALUE is in the range specified by C.
844
845    `K' is for 0.
846    `L' is for range -65536 to 65536
847    `M' is for values whose 16-bit low part is 0
848    'N' is for +1 or -1.
849    'O' is for 16 (for rotate using swap).
850    'P' is for range -8 to 2 (used by addhi_sp)
851
852    'I', 'J' are not used.  */
853
854 #define CONST_OK_FOR_LETTER_P(VALUE, C) \
855   ((C) == 'K' ? (VALUE) == 0 : \
856    (C) == 'L' ? ((VALUE) >= -65536 && (VALUE) <= 65535) : \
857    (C) == 'M' ? ((VALUE) & 0x0ffffL) == 0 : \
858    (C) == 'N' ? ((VALUE) == 1 || (VALUE) == -1) : \
859    (C) == 'I' ? ((VALUE) >= -2 && (VALUE) <= 2) : \
860    (C) == 'O' ? (VALUE) == 16 : \
861    (C) == 'P' ? ((VALUE) <= 2 && (VALUE) >= -8) : 0)
862
863 /* Similar, but for floating constants, and defining letters G and H.
864
865    `G' is for 0.0.  */
866 #define CONST_DOUBLE_OK_FOR_LETTER_P(VALUE, C) \
867   ((C) == 'G' ? (GET_MODE_CLASS (GET_MODE (VALUE)) == MODE_FLOAT \
868                  && VALUE == CONST0_RTX (GET_MODE (VALUE))) : 0) 
869
870 /* 'U' represents certain kind of memory indexed operand for 68HC12.
871    and any memory operand for 68HC11.  */
872 #define EXTRA_CONSTRAINT(OP, C)                         \
873 ((C) == 'U' ? m68hc11_small_indexed_indirect_p (OP, GET_MODE (OP)) \
874  : (C) == 'Q' ? m68hc11_symbolic_p (OP, GET_MODE (OP)) \
875  : (C) == 'R' ? m68hc11_indirect_p (OP, GET_MODE (OP)) \
876  : (C) == 'S' ? (memory_operand (OP, GET_MODE (OP)) \
877                  && non_push_operand (OP, GET_MODE (OP))) : 0)
878
879 \f
880 /* Stack layout; function entry, exit and calling.  */
881
882 /* Define this if pushing a word on the stack
883    makes the stack pointer a smaller address.  */
884 #define STACK_GROWS_DOWNWARD
885
886 /* Define this if the nominal address of the stack frame
887    is at the high-address end of the local variables;
888    that is, each additional local variable allocated
889    goes at a more negative offset in the frame.
890
891    Don't define for 68HC11, the frame pointer is the bottom
892    of local variables.  */
893 /* #define FRAME_GROWS_DOWNWARD */
894
895 /* Define this if successive arguments to a function occupy decreasing 
896    addresses in the stack.  */
897 /* #define ARGS_GROW_DOWNWARD */
898
899 /* Offset within stack frame to start allocating local variables at.
900    If FRAME_GROWS_DOWNWARD, this is the offset to the END of the
901    first local allocated.  Otherwise, it is the offset to the BEGINNING
902    of the first local allocated.  */
903 #define STARTING_FRAME_OFFSET           0
904
905 /* Offset of first parameter from the argument pointer register value.  */
906
907 #define FIRST_PARM_OFFSET(FNDECL)       2
908
909 /* After the prologue, RA is at 0(AP) in the current frame.  */
910 #define RETURN_ADDR_RTX(COUNT, FRAME)                                   \
911   ((COUNT) == 0                                                         \
912    ? gen_rtx_MEM (Pmode, arg_pointer_rtx)                               \
913    : 0)
914
915 /* Before the prologue, the top of the frame is at 2(sp).  */
916 #define INCOMING_FRAME_SP_OFFSET        2
917
918 /* Define this if functions should assume that stack space has been
919    allocated for arguments even when their values are passed in
920    registers.
921   
922    The value of this macro is the size, in bytes, of the area reserved for
923    arguments passed in registers.
924   
925    This space can either be allocated by the caller or be a part of the
926    machine-dependent stack frame: `OUTGOING_REG_PARM_STACK_SPACE'
927    says which.  */
928 /* #define REG_PARM_STACK_SPACE(FNDECL) 2 */
929
930 /* Define this macro if REG_PARM_STACK_SPACE is defined but stack
931    parameters don't skip the area specified by REG_PARM_STACK_SPACE.
932    Normally, when a parameter is not passed in registers, it is placed on
933    the stack beyond the REG_PARM_STACK_SPACE area.  Defining this macro  
934    suppresses this behavior and causes the parameter to be passed on the
935    stack in its natural location.  */
936 /* #define STACK_PARMS_IN_REG_PARM_AREA */
937
938 /* Register to use for pushing function arguments.  */
939 #define STACK_POINTER_REGNUM            HARD_SP_REGNUM
940
941 /* Base register for access to local variables of the function.  */
942 #define FRAME_POINTER_REGNUM            SOFT_FP_REGNUM
943
944 #define HARD_FRAME_POINTER_REGNUM       HARD_FP_REGNUM
945
946 /* Base register for access to arguments of the function.  */
947 #define ARG_POINTER_REGNUM              SOFT_AP_REGNUM
948
949 /* Register in which static-chain is passed to a function.  */
950 #define STATIC_CHAIN_REGNUM             SOFT_Z_REGNUM
951
952 \f
953 /* Definitions for register eliminations.
954
955    This is an array of structures.  Each structure initializes one pair
956    of eliminable registers.  The "from" register number is given first,
957    followed by "to".  Eliminations of the same "from" register are listed
958    in order of preference.
959
960    We have two registers that are eliminated on the 6811. The psuedo arg
961    pointer and pseudo frame pointer registers can always be eliminated;
962    they are replaced with either the stack or the real frame pointer.  */
963
964 #define ELIMINABLE_REGS                                 \
965 {{ARG_POINTER_REGNUM,   STACK_POINTER_REGNUM},          \
966  {ARG_POINTER_REGNUM,   HARD_FRAME_POINTER_REGNUM},     \
967  {FRAME_POINTER_REGNUM, STACK_POINTER_REGNUM},          \
968  {FRAME_POINTER_REGNUM, HARD_FRAME_POINTER_REGNUM}}
969
970 /* Value should be nonzero if functions must have frame pointers.
971    Zero means the frame pointer need not be set up (and parms may be
972    accessed via the stack pointer) in functions that seem suitable.
973    This is computed in `reload', in reload1.c.  */
974 #define FRAME_POINTER_REQUIRED  0
975
976 /* Given FROM and TO register numbers, say whether this elimination is allowed.
977    Frame pointer elimination is automatically handled.
978
979    All other eliminations are valid.  */
980
981 #define CAN_ELIMINATE(FROM, TO)                                 \
982  ((FROM) == ARG_POINTER_REGNUM && (TO) == STACK_POINTER_REGNUM  \
983   ? ! frame_pointer_needed                                      \
984   : 1)
985
986
987 /* Define the offset between two registers, one to be eliminated, and the other
988    its replacement, at the start of a routine.  */
989
990 #define INITIAL_ELIMINATION_OFFSET(FROM, TO, OFFSET)                    \
991     { OFFSET = m68hc11_initial_elimination_offset (FROM, TO); }
992
993 \f
994 /* Passing Function Arguments on the Stack.  */
995
996 /* When a prototype says `char' or `short', really pass an `int'.  */
997 /* #define PROMOTE_PROTOTYPES */
998
999 /* If we generate an insn to push BYTES bytes, this says how many the
1000    stack pointer really advances by. No rounding or alignment needed
1001    for MC6811.  */
1002 #define PUSH_ROUNDING(BYTES)    (BYTES)
1003
1004 /* Value is 1 if returning from a function call automatically pops the
1005    arguments described by the number-of-args field in the call. FUNTYPE is
1006    the data type of the function (as a tree), or for a library call it is
1007    an identifier node for the subroutine name.
1008   
1009    The standard MC6811 call, with arg count word, includes popping the
1010    args as part of the call template.  */
1011 #define RETURN_POPS_ARGS(FUNDECL,FUNTYPE,SIZE)  0
1012
1013 /* Nonzero if type TYPE should be returned in memory.
1014    Blocks and data types largers than 4 bytes cannot be returned
1015    in the register (D + X = 4).  */
1016 #define RETURN_IN_MEMORY(TYPE)                          \
1017     ((TYPE_MODE (TYPE) == BLKmode)                      \
1018      ? (int_size_in_bytes (TYPE) > 4)                   \
1019      : (GET_MODE_SIZE (TYPE_MODE (TYPE)) > 4))
1020
1021 \f
1022 /* Passing Arguments in Registers.  */
1023
1024 /* Define a data type for recording info about an argument list
1025    during the scan of that argument list.  This data type should
1026    hold all necessary information about the function itself
1027    and about the args processed so far, enough to enable macros
1028    such as FUNCTION_ARG to determine where the next arg should go.  */
1029
1030 typedef struct m68hc11_args
1031 {
1032   int words;
1033   int nregs;
1034 } CUMULATIVE_ARGS;
1035
1036 /* A C expression that indicates when an argument must be passed by reference.
1037    If nonzero for an argument, a copy of that argument is made in memory and a
1038    pointer to the argument is passed instead of the argument itself.
1039    The pointer is passed in whatever way is appropriate for passing a pointer
1040    to that type.
1041  
1042    64-bit numbers are passed by reference.  */
1043 #define FUNCTION_ARG_PASS_BY_REFERENCE(CUM, MODE, TYPE, NAMED) \
1044     m68hc11_function_arg_pass_by_reference (& (CUM), (MODE), (TYPE), (NAMED))
1045
1046
1047 /* If defined, a C expression which determines whether, and in which direction,
1048    to pad out an argument with extra space.  The value should be of type
1049    `enum direction': either `upward' to pad above the argument,
1050    `downward' to pad below, or `none' to inhibit padding.
1051
1052    Structures are stored left shifted in their argument slot.  */
1053 #define FUNCTION_ARG_PADDING(MODE, TYPE) \
1054   m68hc11_function_arg_padding ((MODE), (TYPE))
1055
1056 #undef PAD_VARARGS_DOWN
1057 #define PAD_VARARGS_DOWN \
1058   (m68hc11_function_arg_padding (TYPE_MODE (type), type) == downward)
1059
1060 /* A C expression that indicates when it is the called function's
1061    responsibility to make a copy of arguments passed by invisible
1062    reference.  Normally, the caller makes a copy and passes the
1063    address of the copy to the routine being called.  When
1064    FUNCTION_ARG_CALLEE_COPIES is defined and is nonzero, the caller
1065    does not make a copy.  Instead, it passes a pointer to the "live"
1066    value.  The called function must not modify this value.  If it can
1067    be determined that the value won't be modified, it need not make a
1068    copy; otherwise a copy must be made.  */
1069 #define FUNCTION_ARG_CALLEE_COPIES(CUM, MODE, TYPE, NAMED)              \
1070     ((NAMED) && FUNCTION_ARG_PASS_BY_REFERENCE (CUM, MODE, TYPE, NAMED))
1071
1072 /* Initialize a variable CUM of type CUMULATIVE_ARGS for a call to a
1073    function whose data type is FNTYPE. For a library call, FNTYPE is 0.  */
1074 #define INIT_CUMULATIVE_ARGS(CUM,FNTYPE,LIBNAME,INDIRECT) \
1075     (m68hc11_init_cumulative_args (&CUM, FNTYPE, LIBNAME))
1076
1077 /* Update the data in CUM to advance over an argument of mode MODE and data
1078    type TYPE. (TYPE is null for libcalls where that information may not be
1079    available.) */
1080 #define FUNCTION_ARG_ADVANCE(CUM, MODE, TYPE, NAMED) \
1081     (m68hc11_function_arg_advance (&CUM, MODE, TYPE, NAMED))
1082
1083 /* Define where to put the arguments to a function.
1084    Value is zero to push the argument on the stack,
1085    or a hard register in which to store the argument.
1086
1087    MODE is the argument's machine mode.
1088    TYPE is the data type of the argument (as a tree).
1089     This is null for libcalls where that information may
1090     not be available.
1091    CUM is a variable of type CUMULATIVE_ARGS which gives info about
1092     the preceding args and about the function being called.
1093    NAMED is nonzero if this argument is a named parameter
1094     (otherwise it is an extra parameter matching an ellipsis).  */
1095 #define FUNCTION_ARG(CUM, MODE, TYPE, NAMED) \
1096   (m68hc11_function_arg (&CUM, MODE, TYPE, NAMED))
1097
1098 /* Define the profitability of saving registers around calls.
1099
1100    Disable this because the saving instructions generated by
1101    caller-save need a reload and the way it is implemented,
1102    it forbids all spill registers at that point.  Enabling
1103    caller saving results in spill failure.  */
1104 #define CALLER_SAVE_PROFITABLE(REFS,CALLS) 0
1105
1106 /* For an arg passed partly in registers and partly in memory,
1107    this is the number of registers used.
1108    For args passed entirely in registers or entirely in memory, zero.
1109
1110    Passing an arg partly in register and memory does not work at all.
1111    Don't do that.  */
1112 #define FUNCTION_ARG_PARTIAL_NREGS(CUM, MODE, TYPE, NAMED) (0)
1113
1114 /* 1 if N is a possible register number for function argument passing.
1115    D is for 16-bit values, X is for 32-bit (X+D).  */
1116 #define FUNCTION_ARG_REGNO_P(N) \
1117      (((N) == HARD_D_REGNUM) || ((N) == HARD_X_REGNUM))
1118
1119 /* All return values are in the D or X+D registers:
1120     - 8 and 16-bit values are returned in D.
1121       BLKmode are passed in D as pointer.
1122     - 32-bit values are returned in X + D.
1123       The high part is passed in X and the low part in D.
1124       For GCC, the register number must be HARD_X_REGNUM.  */
1125 #define FUNCTION_VALUE(VALTYPE, FUNC)                                   \
1126      gen_rtx (REG, TYPE_MODE (VALTYPE),                                 \
1127               ((TYPE_MODE (VALTYPE) == BLKmode                          \
1128                 || GET_MODE_SIZE (TYPE_MODE (VALTYPE)) <= 2)            \
1129                    ? HARD_D_REGNUM : HARD_X_REGNUM))
1130
1131 #define LIBCALL_VALUE(MODE)                                             \
1132      gen_rtx (REG, MODE,                                                \
1133               (((MODE) == BLKmode || GET_MODE_SIZE (MODE) <= 2)         \
1134                    ? HARD_D_REGNUM : HARD_X_REGNUM))
1135
1136 /* 1 if N is a possible register number for a function value.  */
1137 #define FUNCTION_VALUE_REGNO_P(N) \
1138      ((N) == HARD_D_REGNUM || (N) == HARD_X_REGNUM)
1139
1140 /* Register in which address to store a structure value is passed to a
1141    function.  */
1142 #define STRUCT_VALUE_REGNUM     HARD_D_REGNUM
1143
1144 /* EXIT_IGNORE_STACK should be nonzero if, when returning from a function,
1145    the stack pointer does not matter.  The value is tested only in functions
1146    that have frame pointers. No definition is equivalent to always zero.  */
1147 #define EXIT_IGNORE_STACK       0
1148
1149 \f
1150 /* Generating Code for Profiling.  */
1151
1152 /* Output assembler code to FILE to increment profiler label # LABELNO
1153    for profiling a function entry.  */
1154 #define FUNCTION_PROFILER(FILE, LABELNO)                \
1155     fprintf (FILE, "\tldy\t.LP%d\n\tjsr mcount\n", (LABELNO))
1156 /* Length in units of the trampoline for entering a nested function.  */
1157 #define TRAMPOLINE_SIZE         (TARGET_M6811 ? 11 : 9)
1158
1159 /* A C statement to initialize the variable parts of a trampoline.
1160    ADDR is an RTX for the address of the trampoline; FNADDR is an
1161    RTX for the address of the nested function; STATIC_CHAIN is an
1162    RTX for the static chain value that should be passed to the
1163    function when it is called.  */
1164 #define INITIALIZE_TRAMPOLINE(TRAMP, FNADDR, CXT) \
1165   m68hc11_initialize_trampoline ((TRAMP), (FNADDR), (CXT))
1166
1167 \f
1168 /* `INIT_TARGET_OPTABS'
1169      Define this macro as a C statement that declares additional library
1170      routines renames existing ones. `init_optabs' calls this macro
1171      after initializing all the normal library routines.
1172
1173      Overrides the memcpy */
1174
1175 #define INIT_TARGET_OPTABS                                              \
1176 do                                                                      \
1177   {                                                                     \
1178     memcpy_libfunc = gen_rtx_SYMBOL_REF (Pmode, "__memcpy");            \
1179     memcmp_libfunc = gen_rtx_SYMBOL_REF (Pmode, "__memcmp");            \
1180     memset_libfunc = gen_rtx_SYMBOL_REF (Pmode, "__memset");            \
1181   }                                                                     \
1182 while (0)
1183
1184 \f
1185 /* Addressing modes, and classification of registers for them.  */
1186
1187 /* The 68HC12 has all the post/pre increment/decrement modes.  */
1188 #define HAVE_POST_INCREMENT (TARGET_M6812 && TARGET_AUTO_INC_DEC)
1189 #define HAVE_PRE_INCREMENT  (TARGET_M6812 && TARGET_AUTO_INC_DEC)
1190 #define HAVE_POST_DECREMENT (TARGET_M6812 && TARGET_AUTO_INC_DEC)
1191 #define HAVE_PRE_DECREMENT  (TARGET_M6812 && TARGET_AUTO_INC_DEC)
1192
1193 /* The class value for base registers.  This depends on the target:
1194    A_REGS for 68HC11 and A_OR_SP_REGS for 68HC12.  The class value
1195    is stored at init time.  */
1196 extern enum reg_class m68hc11_base_reg_class;
1197 #define BASE_REG_CLASS          m68hc11_base_reg_class
1198
1199 /* The class value for index registers.  This is NO_REGS for 68HC11.  */
1200
1201 extern enum reg_class m68hc11_index_reg_class;
1202 #define INDEX_REG_CLASS         m68hc11_index_reg_class
1203
1204 /* These assume that REGNO is a hard or pseudo reg number. They give nonzero
1205    only if REGNO is a hard reg of the suitable class or a pseudo reg currently
1206    allocated to a suitable hard reg.  Since they use reg_renumber, they are
1207    safe only once reg_renumber has been allocated, which happens in
1208    local-alloc.c.  */
1209
1210
1211 /* Internal macro, return 1 if REGNO is a valid base register.  */
1212 #define REG_VALID_P(REGNO) (1)  /* ? */
1213
1214 extern unsigned char m68hc11_reg_valid_for_base[FIRST_PSEUDO_REGISTER];
1215 #define REG_VALID_FOR_BASE_P(REGNO) \
1216     (REG_VALID_P (REGNO) && (REGNO) < FIRST_PSEUDO_REGISTER \
1217      && m68hc11_reg_valid_for_base[REGNO])
1218
1219 /* Internal macro, return 1 if REGNO is a valid index register.  */
1220 extern unsigned char m68hc11_reg_valid_for_index[FIRST_PSEUDO_REGISTER];
1221 #define REG_VALID_FOR_INDEX_P(REGNO) \
1222     (REG_VALID_P (REGNO) >= 0 && (REGNO) < FIRST_PSEUDO_REGISTER \
1223      && m68hc11_reg_valid_for_index[REGNO])
1224
1225 /* Internal macro, the nonstrict definition for REGNO_OK_FOR_BASE_P.  */
1226 #define REGNO_OK_FOR_BASE_NONSTRICT_P(REGNO) \
1227     ((REGNO) >= FIRST_PSEUDO_REGISTER \
1228      || REG_VALID_FOR_BASE_P (REGNO) \
1229      || (REGNO) == FRAME_POINTER_REGNUM \
1230      || (REGNO) == HARD_FRAME_POINTER_REGNUM \
1231      || (REGNO) == ARG_POINTER_REGNUM \
1232      || (reg_renumber && REG_VALID_FOR_BASE_P (reg_renumber[REGNO])))
1233
1234 /* Internal macro, the nonstrict definition for REGNO_OK_FOR_INDEX_P.  */
1235 #define REGNO_OK_FOR_INDEX_NONSTRICT_P(REGNO) \
1236     (TARGET_M6812 \
1237      && ((REGNO) >= FIRST_PSEUDO_REGISTER \
1238          || REG_VALID_FOR_INDEX_P (REGNO) \
1239          || (reg_renumber && REG_VALID_FOR_INDEX_P (reg_renumber[REGNO]))))
1240
1241 /* Internal macro, the strict definition for REGNO_OK_FOR_BASE_P.  */
1242 #define REGNO_OK_FOR_BASE_STRICT_P(REGNO) \
1243     ((REGNO) < FIRST_PSEUDO_REGISTER ? REG_VALID_FOR_BASE_P (REGNO) \
1244      : (reg_renumber && REG_VALID_FOR_BASE_P (reg_renumber[REGNO])))
1245
1246 /* Internal macro, the strict definition for REGNO_OK_FOR_INDEX_P.  */
1247 #define REGNO_OK_FOR_INDEX_STRICT_P(REGNO) \
1248     (TARGET_M6812 \
1249      && ((REGNO) < FIRST_PSEUDO_REGISTER ? REG_VALID_FOR_INDEX_P (REGNO) \
1250          : (reg_renumber && REG_VALID_FOR_INDEX_P (reg_renumber[REGNO]))))
1251
1252 #define REGNO_OK_FOR_BASE_P2(REGNO,STRICT) \
1253     ((STRICT) ? (REGNO_OK_FOR_BASE_STRICT_P (REGNO)) \
1254               : (REGNO_OK_FOR_BASE_NONSTRICT_P (REGNO)))
1255
1256 #define REGNO_OK_FOR_INDEX_P2(REGNO,STRICT) \
1257     ((STRICT) ? (REGNO_OK_FOR_INDEX_STRICT_P (REGNO)) \
1258               : (REGNO_OK_FOR_INDEX_NONSTRICT_P (REGNO)))
1259
1260 #define REGNO_OK_FOR_BASE_P(REGNO) REGNO_OK_FOR_BASE_STRICT_P (REGNO)
1261 #define REGNO_OK_FOR_INDEX_P(REGNO) REGNO_OK_FOR_INDEX_STRICT_P (REGNO)
1262
1263 #define REG_OK_FOR_BASE_STRICT_P(X)     REGNO_OK_FOR_BASE_STRICT_P (REGNO (X))
1264 #define REG_OK_FOR_BASE_NONSTRICT_P(X)  REGNO_OK_FOR_BASE_NONSTRICT_P (REGNO (X))
1265 #define REG_OK_FOR_INDEX_STRICT_P(X)    REGNO_OK_FOR_INDEX_STRICT_P (REGNO (X))
1266 #define REG_OK_FOR_INDEX_NONSTRICT_P(X) REGNO_OK_FOR_INDEX_NONSTRICT_P (REGNO (X))
1267
1268 /* see PUSH_POP_ADDRESS_P() below for an explanation of this.  */
1269 #define IS_STACK_PUSH(operand) \
1270     ((GET_CODE (operand) == MEM) \
1271      && (GET_CODE (XEXP (operand, 0)) == PRE_DEC) \
1272      && (SP_REG_P (XEXP (XEXP (operand, 0), 0))))
1273
1274 #define IS_STACK_POP(operand) \
1275     ((GET_CODE (operand) == MEM) \
1276      && (GET_CODE (XEXP (operand, 0)) == POST_INC) \
1277      && (SP_REG_P (XEXP (XEXP (operand, 0), 0))))
1278
1279 /* 1 if X is an rtx for a constant that is a valid address.  */
1280 #define CONSTANT_ADDRESS_P(X)   (CONSTANT_P (X))
1281
1282 /* Maximum number of registers that can appear in a valid memory address */
1283 #define MAX_REGS_PER_ADDRESS    2
1284
1285 /* GO_IF_LEGITIMATE_ADDRESS recognizes an RTL expression that is a
1286    valid memory address for an instruction. The MODE argument is the
1287    machine mode for the MEM expression that wants to use this address.  */
1288
1289 /*--------------------------------------------------------------
1290    Valid addresses are either direct or indirect (MEM) versions
1291    of the following forms:
1292         constant                N
1293         register                ,X
1294         indexed                 N,X
1295 --------------------------------------------------------------*/
1296
1297 /* The range of index that is allowed by indirect addressing.  */
1298
1299 #define VALID_MIN_OFFSET m68hc11_min_offset
1300 #define VALID_MAX_OFFSET m68hc11_max_offset
1301
1302 /* The offset values which are allowed by the n,x and n,y addressing modes.
1303    Take into account the size of the mode because we may have to add
1304    a mode offset to access the lowest part of the data.
1305    (For example, for an SImode, the last valid offset is 252.) */
1306 #define VALID_CONSTANT_OFFSET_P(X,MODE)         \
1307 (((GET_CODE (X) == CONST_INT) &&                        \
1308   ((INTVAL (X) >= VALID_MIN_OFFSET)             \
1309      && ((INTVAL (X) <= VALID_MAX_OFFSET                \
1310                 - (HOST_WIDE_INT) (GET_MODE_SIZE (MODE) + 1))))) \
1311 || (TARGET_M6812 \
1312     && ((GET_CODE (X) == SYMBOL_REF) \
1313         || GET_CODE (X) == LABEL_REF \
1314         || GET_CODE (X) == CONST)))
1315
1316 /* This is included to allow stack push/pop operations. Special hacks in the
1317    md and m6811.c files exist to support this.  */
1318 #define PUSH_POP_ADDRESS_P(X) \
1319   (((GET_CODE (X) == PRE_DEC) || (GET_CODE (X) == POST_INC)) \
1320         && SP_REG_P (XEXP (X, 0)))
1321
1322 /* Go to ADDR if X is a valid address.  */
1323 #ifndef REG_OK_STRICT
1324 #define GO_IF_LEGITIMATE_ADDRESS(MODE, X, ADDR) \
1325 { \
1326   if (m68hc11_go_if_legitimate_address ((X), (MODE), 0)) goto ADDR; \
1327 }
1328 #else
1329 #define GO_IF_LEGITIMATE_ADDRESS(MODE, X, ADDR)          \
1330 {                                                        \
1331   if (m68hc11_go_if_legitimate_address ((X), (MODE), 1)) goto ADDR; \
1332 }
1333 #endif
1334
1335 /* The macros REG_OK_FOR..._P assume that the arg is a REG rtx and check its
1336    validity for a certain class.  We have two alternate definitions for each
1337    of them.  The usual definition accepts all pseudo regs; the other rejects
1338    them unless they have been allocated suitable hard regs.  The symbol
1339    REG_OK_STRICT causes the latter definition to be used.
1340   
1341    Most source files want to accept pseudo regs in the hope that they will
1342    get allocated to the class that the insn wants them to be in. Source files
1343    for reload pass need to be strict. After reload, it makes no difference,
1344    since pseudo regs have been eliminated by then.  */
1345
1346 #ifndef REG_OK_STRICT
1347 /* Nonzero if X is a hard reg that can be used as a base reg.  */
1348 #define REG_OK_FOR_BASE_P(X)   REG_OK_FOR_BASE_NONSTRICT_P(X)
1349
1350 /* Nonzero if X is a hard reg that can be used as an index.  */
1351 #define REG_OK_FOR_INDEX_P(X)  REG_OK_FOR_INDEX_NONSTRICT_P(X)
1352 #else
1353 #define REG_OK_FOR_BASE_P(X)   REG_OK_FOR_BASE_STRICT_P(X)
1354 #define REG_OK_FOR_INDEX_P(X)  REG_OK_FOR_INDEX_STRICT_P(X)
1355 #endif
1356
1357
1358 /* Try machine-dependent ways of modifying an illegitimate address
1359    to be legitimate.  If we find one, return the new, valid address.
1360    This macro is used in only one place: `memory_address' in explow.c.
1361   
1362    OLDX is the address as it was before break_out_memory_refs was called.
1363    In some cases it is useful to look at this to decide what needs to be done.
1364   
1365    MODE and WIN are passed so that this macro can use
1366    GO_IF_LEGITIMATE_ADDRESS.
1367   
1368    It is always safe for this macro to do nothing.
1369    It exists to recognize opportunities to optimize the output.  */
1370
1371 #define LEGITIMIZE_ADDRESS(X,OLDX,MODE,WIN)                     \
1372 { rtx operand = (X);                                            \
1373   if (m68hc11_legitimize_address (&operand, (OLDX), (MODE)))    \
1374     {                                                           \
1375       (X) = operand;                                            \
1376       GO_IF_LEGITIMATE_ADDRESS (MODE,X,WIN);                    \
1377     }                                                           \
1378 }
1379
1380 /* Go to LABEL if ADDR (a legitimate address expression)
1381    has an effect that depends on the machine mode it is used for.  */
1382 #define GO_IF_MODE_DEPENDENT_ADDRESS(ADDR,LABEL)  \
1383 {                                                                       \
1384   if (GET_CODE (ADDR) == PRE_DEC || GET_CODE (ADDR) == POST_DEC         \
1385       || GET_CODE (ADDR) == PRE_INC || GET_CODE (ADDR) == POST_INC)     \
1386     goto LABEL;                                                         \
1387 }
1388
1389 /* Nonzero if the constant value X is a legitimate general operand.
1390    It is given that X satisfies CONSTANT_P or is a CONST_DOUBLE.  */
1391
1392 #define LEGITIMATE_CONSTANT_P(X)        1
1393
1394 \f
1395 /* Tell final.c how to eliminate redundant test instructions.  */
1396
1397 #define NOTICE_UPDATE_CC(EXP, INSN) \
1398         m68hc11_notice_update_cc ((EXP), (INSN))
1399
1400 /* Move costs between classes of registers */
1401 #define REGISTER_MOVE_COST(MODE, CLASS1, CLASS2)        \
1402     (m68hc11_register_move_cost (MODE, CLASS1, CLASS2))
1403
1404 /* Move cost between register and memory.
1405     - Move to a 16-bit register is reasonable,
1406     - Move to a soft register can be expensive.  */
1407 #define MEMORY_MOVE_COST(MODE,CLASS,IN)         \
1408     m68hc11_memory_move_cost ((MODE),(CLASS),(IN))
1409
1410 /* A C expression for the cost of a branch instruction.  A value of 1
1411    is the default; other values are interpreted relative to that.
1412
1413    Pretend branches are cheap because GCC generates sub-optimal code
1414    for the default value.  */
1415 #define BRANCH_COST 0
1416
1417 /* Nonzero if access to memory by bytes is slow and undesirable.  */
1418 #define SLOW_BYTE_ACCESS        0
1419
1420 /* It is as good to call a constant function address as to call an address
1421    kept in a register.  */
1422 #define NO_FUNCTION_CSE
1423
1424 /* Try a machine-dependent way of reloading an illegitimate address
1425    operand.  If we find one, push the reload and jump to WIN.  This
1426    macro is used in only one place: `find_reloads_address' in reload.c.
1427
1428    For M68HC11, we handle large displacements of a base register
1429    by splitting the addend accors an addhi3 insn.
1430
1431    For M68HC12, the 64K offset range is available.
1432    */
1433
1434 #define LEGITIMIZE_RELOAD_ADDRESS(X,MODE,OPNUM,TYPE,IND_LEVELS,WIN)     \
1435 do {                                                                    \
1436   /* We must recognize output that we have already generated ourselves.  */ \
1437   if (GET_CODE (X) == PLUS                                              \
1438       && GET_CODE (XEXP (X, 0)) == PLUS                                 \
1439       && GET_CODE (XEXP (XEXP (X, 0), 0)) == REG                        \
1440       && GET_CODE (XEXP (XEXP (X, 0), 1)) == CONST_INT                  \
1441       && GET_CODE (XEXP (X, 1)) == CONST_INT)                           \
1442     {                                                                   \
1443       push_reload (XEXP (X, 0), NULL_RTX, &XEXP (X, 0), NULL,           \
1444                    BASE_REG_CLASS, GET_MODE (X), VOIDmode, 0, 0,        \
1445                    OPNUM, TYPE);                                        \
1446       goto WIN;                                                         \
1447     }                                                                   \
1448   if (GET_CODE (X) == PLUS                                              \
1449       && GET_CODE (XEXP (X, 0)) == REG                                  \
1450       && GET_CODE (XEXP (X, 1)) == CONST_INT                            \
1451       && !VALID_CONSTANT_OFFSET_P (XEXP (X, 1), MODE))                  \
1452     {                                                                   \
1453       HOST_WIDE_INT val = INTVAL (XEXP (X, 1));                         \
1454       HOST_WIDE_INT low, high;                                          \
1455       high = val & (~0x0FF);                                            \
1456       low  = val & 0x00FF;                                              \
1457       if (low >= 256-15) { high += 16; low -= 16; }                     \
1458       /* Reload the high part into a base reg; leave the low part       \
1459          in the mem directly.  */                                       \
1460                                                                         \
1461       X = gen_rtx_PLUS (Pmode,                                          \
1462                         gen_rtx_PLUS (Pmode, XEXP (X, 0),               \
1463                                       GEN_INT (high)),                  \
1464                         GEN_INT (low));                                 \
1465                                                                         \
1466       push_reload (XEXP (X, 0), NULL_RTX, &XEXP (X, 0), NULL,           \
1467                    BASE_REG_CLASS, GET_MODE (X), VOIDmode, 0, 0,        \
1468                    OPNUM, TYPE);                                        \
1469       goto WIN;                                                         \
1470     }                                                                   \
1471 } while (0)
1472
1473 \f
1474 /* Defining the Output Assembler Language.  */
1475
1476 /* A default list of other sections which we might be "in" at any given
1477    time.  For targets that use additional sections (e.g. .tdesc) you
1478    should override this definition in the target-specific file which
1479    includes this file.  */
1480
1481 /* Output before read-only data.  */
1482 #define TEXT_SECTION_ASM_OP     ("\t.sect\t.text")
1483
1484 /* Output before writable data.  */
1485 #define DATA_SECTION_ASM_OP     ("\t.sect\t.data")
1486
1487 /* Output before uninitialized data.  */
1488 #define BSS_SECTION_ASM_OP      ("\t.sect\t.bss")
1489
1490 /* Define the pseudo-ops used to switch to the .ctors and .dtors sections.
1491
1492    Same as config/elfos.h but don't mark these section SHF_WRITE since
1493    there is no shared library problem.  */
1494 #undef CTORS_SECTION_ASM_OP
1495 #define CTORS_SECTION_ASM_OP    "\t.section\t.ctors,\"a\""
1496
1497 #undef DTORS_SECTION_ASM_OP
1498 #define DTORS_SECTION_ASM_OP    "\t.section\t.dtors,\"a\""
1499
1500 #define TARGET_ASM_CONSTRUCTOR  m68hc11_asm_out_constructor
1501 #define TARGET_ASM_DESTRUCTOR   m68hc11_asm_out_destructor
1502
1503 /* This is how to begin an assembly language file.  Most svr4 assemblers want
1504    at least a .file directive to come first, and some want to see a .version
1505    directive come right after that.  Here we just establish a default
1506    which generates only the .file directive.  If you need a .version
1507    directive for any specific target, you should override this definition
1508    in the target-specific file which includes this one.  */
1509
1510 #undef ASM_FILE_START
1511 #define ASM_FILE_START(FILE)                            \
1512     m68hc11_asm_file_start ((FILE), main_input_filename)
1513
1514 /* Comment character */
1515 #define ASM_COMMENT_START       ";"
1516
1517 /* Output to assembler file text saying following lines
1518    may contain character constants, extra white space, comments, etc.  */
1519 #define ASM_APP_ON              "; Begin inline assembler code\n#APP\n"
1520
1521 /* Output to assembler file text saying following lines
1522    no longer contain unusual constructs.  */
1523 #define ASM_APP_OFF             "; End of inline assembler code\n#NO_APP\n"
1524
1525 /* Write the extra assembler code needed to declare a function properly.
1526    Some svr4 assemblers need to also have something extra said about the
1527    function's return value.  We allow for that here.
1528
1529    For 68HC12 we mark functions that return with 'rtc'.  The linker
1530    will ensure that a 'call' is really made (instead of 'jsr').
1531    The debugger needs this information to correctly compute the stack frame.
1532
1533    For 68HC11/68HC12 we also mark interrupt handlers for gdb to
1534    compute the correct stack frame.  */
1535
1536 #undef ASM_DECLARE_FUNCTION_NAME
1537 #define ASM_DECLARE_FUNCTION_NAME(FILE, NAME, DECL)     \
1538   do                                                    \
1539     {                                                   \
1540       fprintf (FILE, "%s", TYPE_ASM_OP);                \
1541       assemble_name (FILE, NAME);                       \
1542       putc (',', FILE);                                 \
1543       fprintf (FILE, TYPE_OPERAND_FMT, "function");     \
1544       putc ('\n', FILE);                                \
1545                                                         \
1546       if (TARGET_M6812 && current_function_far)         \
1547         {                                               \
1548           fprintf (FILE, "\t.far\t");                   \
1549           assemble_name (FILE, NAME);                   \
1550           putc ('\n', FILE);                            \
1551         }                                               \
1552       else if (current_function_interrupt               \
1553                || current_function_trap)                \
1554         {                                               \
1555           fprintf (FILE, "\t.interrupt\t");             \
1556           assemble_name (FILE, NAME);                   \
1557           putc ('\b', FILE);                            \
1558         }                                               \
1559       ASM_DECLARE_RESULT (FILE, DECL_RESULT (DECL));    \
1560       ASM_OUTPUT_LABEL(FILE, NAME);                     \
1561     }                                                   \
1562   while (0)
1563
1564 /* Output #ident as a .ident.  */
1565
1566 /* output external reference */
1567 #define ASM_OUTPUT_EXTERNAL(FILE,DECL,NAME) \
1568   {fputs ("\t; extern\t", FILE); \
1569   assemble_name (FILE, NAME); \
1570   fputs ("\n", FILE);}
1571
1572 /* How to refer to registers in assembler output.  This sequence is indexed
1573    by compiler's hard-register-number (see above).  */
1574 #define REGISTER_NAMES                                          \
1575 { "x", "d", "y", "sp", "pc", "a", "b", "ccr", "z",              \
1576   "*_.frame", "*_.tmp", "*_.z", "*_.xy", "*fake clobber",       \
1577   SOFT_REG_NAMES, "*sframe", "*ap"}
1578
1579 /* Print an instruction operand X on file FILE. CODE is the code from the
1580    %-spec for printing this operand. If `%z3' was used to print operand
1581    3, then CODE is 'z'.  */
1582
1583 #define PRINT_OPERAND(FILE, X, CODE) \
1584   print_operand (FILE, X, CODE)
1585
1586 /* Print a memory operand whose address is X, on file FILE.  */
1587 #define PRINT_OPERAND_ADDRESS(FILE, ADDR) \
1588   print_operand_address (FILE, ADDR)
1589
1590 /* This is how to output an insn to push/pop a register on the stack.
1591    It need not be very fast code.  
1592
1593    Don't define because we don't know how to handle that with
1594    the STATIC_CHAIN_REGNUM (soft register).  Saving the static
1595    chain must be made inside FUNCTION_PROFILER.  */
1596
1597 #undef ASM_OUTPUT_REG_PUSH
1598 #undef ASM_OUTPUT_REG_POP
1599
1600 /* This is how to output an element of a case-vector that is relative.  */
1601
1602 #define ASM_OUTPUT_ADDR_DIFF_ELT(FILE, BODY, VALUE, REL) \
1603   fprintf (FILE, "\t%s\tL%d-L%d\n", integer_asm_op (2, TRUE), VALUE, REL)
1604
1605 /* This is how to output an element of a case-vector that is absolute.  */
1606 #define ASM_OUTPUT_ADDR_VEC_ELT(FILE, VALUE) \
1607   fprintf (FILE, "\t%s\t.L%d\n", integer_asm_op (2, TRUE), VALUE)
1608
1609 /* This is how to output an assembler line that says to advance the
1610    location counter to a multiple of 2**LOG bytes.  */
1611 #define ASM_OUTPUT_ALIGN(FILE,LOG)                      \
1612   do {                                                  \
1613       if ((LOG) > 1)                                    \
1614           fprintf ((FILE), "%s\n", ALIGN_ASM_OP); \
1615   } while (0)
1616
1617 \f
1618 /* Assembler Commands for Exception Regions.  */
1619
1620 /* Default values provided by GCC should be ok. Assumming that DWARF-2
1621    frame unwind info is ok for this platform.  */
1622
1623 #undef PREFERRED_DEBUGGING_TYPE
1624 #define PREFERRED_DEBUGGING_TYPE DWARF2_DEBUG
1625
1626 /* The prefix for local labels.  You should be able to define this as
1627    an empty string, or any arbitrary string (such as ".", ".L%", etc)
1628    without having to make any other changes to account for the specific
1629    definition.  Note it is a string literal, not interpreted by printf
1630    and friends.  */
1631 #define LOCAL_LABEL_PREFIX "."
1632
1633 /* The prefix for immediate operands.  */
1634 #define IMMEDIATE_PREFIX "#"
1635 #define GLOBAL_ASM_OP   "\t.globl\t"
1636
1637 \f
1638 /* Miscellaneous Parameters.  */
1639
1640 /* Define the codes that are matched by predicates in m68hc11.c.  */
1641 #define PREDICATE_CODES \
1642 {"stack_register_operand",   {SUBREG, REG}},                            \
1643 {"d_register_operand",       {SUBREG, REG}},                            \
1644 {"hard_addr_reg_operand",    {SUBREG, REG}},                            \
1645 {"hard_reg_operand",         {SUBREG, REG}},                            \
1646 {"m68hc11_logical_operator", {AND, IOR, XOR}},                          \
1647 {"m68hc11_arith_operator",   {AND, IOR, XOR, PLUS, MINUS,               \
1648                               ASHIFT, ASHIFTRT, LSHIFTRT,               \
1649                               ROTATE, ROTATERT }},                      \
1650 {"m68hc11_non_shift_operator", {AND, IOR, XOR, PLUS, MINUS}},           \
1651 {"m68hc11_unary_operator",   {NEG, NOT, SIGN_EXTEND, ZERO_EXTEND}},     \
1652 {"m68hc11_shift_operator",   {ASHIFT, ASHIFTRT, LSHIFTRT, ROTATE, ROTATERT}},\
1653 {"non_push_operand",         {SUBREG, REG, MEM}},                       \
1654 {"reg_or_some_mem_operand",  {SUBREG, REG, MEM}},                       \
1655 {"tst_operand",              {SUBREG, REG, MEM}},                       \
1656 {"cmp_operand",              {SUBREG, REG, MEM, SYMBOL_REF, LABEL_REF,  \
1657                              CONST_INT, CONST_DOUBLE}},
1658
1659 /* Specify the machine mode that this machine uses
1660    for the index in the tablejump instruction.  */
1661 #define CASE_VECTOR_MODE        Pmode
1662
1663 /* This flag, if defined, says the same insns that convert to a signed fixnum
1664    also convert validly to an unsigned one.  */
1665 #define FIXUNS_TRUNC_LIKE_FIX_TRUNC
1666
1667 /* Max number of bytes we can move from memory to memory in one
1668    reasonably fast instruction.  */
1669 #define MOVE_MAX                2
1670
1671 /* MOVE_RATIO is the number of move instructions that is better than a
1672    block move.  Make this small on 6811, since the code size grows very
1673    large with each move.  */
1674 #define MOVE_RATIO              3
1675
1676 /* Define if shifts truncate the shift count which implies one can omit
1677    a sign-extension or zero-extension of a shift count.  */
1678 #define SHIFT_COUNT_TRUNCATED   1
1679
1680 /* Value is 1 if truncating an integer of INPREC bits to OUTPREC bits
1681    is done just by pretending it is already truncated.  */
1682 #define TRULY_NOOP_TRUNCATION(OUTPREC, INPREC)  1
1683
1684 /* Specify the machine mode that pointers have. After generation of rtl, the
1685    compiler makes no further distinction between pointers and any other
1686    objects of this machine mode.  */
1687 #define Pmode                   HImode
1688
1689 /* A function address in a call instruction is a byte address (for indexing
1690    purposes) so give the MEM rtx a byte's mode.  */
1691 #define FUNCTION_MODE           QImode
1692
1693 /* Allow $ in identifiers */
1694 #define DOLLARS_IN_IDENTIFIERS  1
1695
1696 /* Machine-dependent reorg pass.
1697    Specific optimizations are defined here:
1698     - this pass changes the Z register into either X or Y
1699       (it preserves X/Y previous values in a memory slot in page0). 
1700
1701    When this pass is finished, the global variable
1702    'z_replacement_completed' is set to 2.  */
1703 #define MACHINE_DEPENDENT_REORG(X)      m68hc11_reorg (X)
1704
1705 extern int debug_m6811;
1706 extern int z_replacement_completed;
1707 extern int current_function_interrupt;
1708 extern int current_function_trap;
1709 extern int current_function_far;
1710
1711 extern GTY(()) rtx m68hc11_compare_op0;
1712 extern GTY(()) rtx m68hc11_compare_op1;
1713 extern GTY(()) rtx m68hc11_soft_tmp_reg;
1714 extern GTY(()) rtx ix_reg;
1715 extern GTY(()) rtx iy_reg;
1716 extern GTY(()) rtx d_reg;