OSDN Git Service

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