OSDN Git Service

* emit-rtl.c, final.c, fold-const.c, gengenrtl.c, optabs.c,
[pf3gnuchains/gcc-fork.git] / gcc / config / dsp16xx / dsp16xx.h
1 /* Definitions of target machine for GNU compiler.  AT&T DSP1600.
2    Copyright (C) 1994, 1995, 1996, 1997, 1998, 2000, 2001, 2002
3    Free Software Foundation, Inc.
4    Contributed by Michael Collison (collison@isisinc.net).
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 extern const char *low_reg_names[];
24 extern const char *text_seg_name;
25 extern const char *rsect_text;
26 extern const char *data_seg_name;
27 extern const char *rsect_data;
28 extern const char *bss_seg_name;
29 extern const char *rsect_bss;
30 extern const char *const_seg_name;
31 extern const char *rsect_const;
32 extern const char *chip_name;
33 extern const char *save_chip_name;
34 extern struct rtx_def *dsp16xx_compare_op0, *dsp16xx_compare_op1;
35 extern struct rtx_def *dsp16xx_addhf3_libcall;
36 extern struct rtx_def *dsp16xx_subhf3_libcall;
37 extern struct rtx_def *dsp16xx_mulhf3_libcall;
38 extern struct rtx_def *dsp16xx_divhf3_libcall;
39 extern struct rtx_def *dsp16xx_cmphf3_libcall;
40 extern struct rtx_def *dsp16xx_fixhfhi2_libcall;
41 extern struct rtx_def *dsp16xx_floathihf2_libcall;
42 extern struct rtx_def *dsp16xx_neghf2_libcall;
43 extern struct rtx_def *dsp16xx_umulhi3_libcall;
44 extern struct rtx_def *dsp16xx_mulhi3_libcall;
45 extern struct rtx_def *dsp16xx_udivqi3_libcall;
46 extern struct rtx_def *dsp16xx_udivhi3_libcall;
47 extern struct rtx_def *dsp16xx_divqi3_libcall;
48 extern struct rtx_def *dsp16xx_divhi3_libcall;
49 extern struct rtx_def *dsp16xx_modqi3_libcall;
50 extern struct rtx_def *dsp16xx_modhi3_libcall;
51 extern struct rtx_def *dsp16xx_umodqi3_libcall;
52 extern struct rtx_def *dsp16xx_umodhi3_libcall;
53
54 extern struct rtx_def *dsp16xx_ashrhi3_libcall;
55 extern struct rtx_def *dsp16xx_ashlhi3_libcall;
56 extern struct rtx_def *dsp16xx_lshrhi3_libcall;
57
58 /* RUN-TIME TARGET SPECIFICATION */
59 #define DSP16XX   1
60
61 /* Name of the AT&T assembler */
62
63 #define ASM_PROG "as1600"
64
65 /* Name of the AT&T linker */
66
67 #define LD_PROG "ld1600"
68
69 /* Define which switches take word arguments */
70 #define WORD_SWITCH_TAKES_ARG(STR)              \
71   (!strcmp (STR, "ifile") ? 1 :                 \
72    0)
73
74 #ifdef  CC1_SPEC
75 #undef  CC1_SPEC
76 #endif
77 #define CC1_SPEC       "%{!O*:-O}"
78
79 #define CPP_SPEC       "%{!O*:-D__OPTIMIZE__}"
80
81 /* Define this as a spec to call the AT&T assembler */
82
83 #define CROSS_ASM_SPEC   "%{!S:as1600 %a %i\n }"
84
85 /* Define this as a spec to call the AT&T linker */
86
87 #define CROSS_LINK_SPEC  "%{!c:%{!M:%{!MM:%{!E:%{!S:ld1600 %l %X %{o*} %{m} \
88                         %{r} %{s} %{t} %{u*} %{x}\
89                         %{!A:%{!nostdlib:%{!nostartfiles:%S}}} %{static:}\
90                         %{L*} %D %o %{!nostdlib:-le1600 %L -le1600}\
91                         %{!A:%{!nostdlib:%{!nostartfiles:%E}}}\n }}}}}"
92
93 /* Nothing complicated here, just link with libc.a under normal
94    circumstances */
95 #define LIB_SPEC "-lc"
96
97 /* Specify the startup file to link with.  */
98 #define STARTFILE_SPEC "%{mmap1:m1_crt0.o%s}  \
99 %{mmap2:m2_crt0.o%s}                          \
100 %{mmap3:m3_crt0.o%s}                          \
101 %{mmap4:m4_crt0.o%s}                          \
102 %{!mmap*: %{!ifile*: m4_crt0.o%s} %{ifile*:     \
103 %ea -ifile option requires a -map option}}"
104
105 /* Specify the end file to link with */
106
107 #define ENDFILE_SPEC "%{mmap1:m1_crtn.o%s}  \
108 %{mmap2:m2_crtn.o%s}                          \
109 %{mmap3:m3_crtn.o%s}                          \
110 %{mmap4:m4_crtn.o%s}                          \
111 %{!mmap*: %{!ifile*: m4_crtn.o%s} %{ifile*:     \
112 %ea -ifile option requires a -map option}}"
113
114
115 /* Tell gcc where to look for the startfile */
116 /*#define STANDARD_STARTFILE_PREFIX   "/d1600/lib"*/
117
118 /* Tell gcc where to look for it's executables */
119 /*#define STANDARD_EXEC_PREFIX  "/d1600/bin"*/
120
121 /* Command line options to the AT&T assembler */
122 #define ASM_SPEC  "%{V} %{v:%{!V:-V}} %{g*:-g}"
123
124 /* Command line options for the AT&T linker */
125
126 #define LINK_SPEC "%{V} %{v:%{!V:-V}} %{minit:-i}  \
127 %{!ifile*:%{mmap1:m1_deflt.if%s}         \
128           %{mmap2:m2_deflt.if%s}         \
129           %{mmap3:m3_deflt.if%s}         \
130           %{mmap4:m4_deflt.if%s}         \
131           %{!mmap*:m4_deflt.if%s}}       \
132 %{ifile*:%*} %{r}"
133
134 /* Include path is determined from the environment variable */
135 #define INCLUDE_DEFAULTS     \
136 {                            \
137   { 0, 0, 0 }                \
138 }
139
140 /* Names to predefine in the preprocessor for this target machine.  */
141 #ifdef __MSDOS__
142 #define CPP_PREDEFINES "-Ddsp1600 -DDSP1600 -DMSDOS"
143 #else
144 #define CPP_PREDEFINES "-Ddsp1600 -DDSP1600 -Ddsp1610 -DDSP1610"
145 #endif
146
147 /* Run-time compilation parameters selecting different hardware subsets.  */
148
149 extern int target_flags;
150
151 /* Macros used in the machine description to test the flags.  */
152
153 #define MASK_REGPARM         0x00000001    /* Pass parameters in registers */
154 #define MASK_NEAR_CALL       0x00000002    /* The call is on the same 4k page */
155 #define MASK_NEAR_JUMP       0x00000004    /* The jump is on the same 4k page */
156 #define MASK_BMU             0x00000008    /* Use the 'bmu' shift instructions */
157 #define MASK_MAP1            0x00000040    /* Link with map1 */
158 #define MASK_MAP2            0x00000080    /* Link with map2 */
159 #define MASK_MAP3            0x00000100    /* Link with map3 */
160 #define MASK_MAP4            0x00000200    /* Link with map4 */
161 #define MASK_YBASE_HIGH      0x00000400    /* The ybase register window starts high */
162 #define MASK_INIT            0x00000800    /* Have the linker generate tables to
163                                               initialize data at startup */
164 #define MASK_RESERVE_YBASE   0x00002000    /* Reserved the ybase registers */
165 #define MASK_DEBUG           0x00004000    /* Debugging turned on*/
166 #define MASK_SAVE_TEMPS      0x00008000    /* Save temps. option seen */
167
168 /* Compile passing first two args in regs 0 and 1.
169    This exists only to test compiler features that will
170    be needed for RISC chips.  It is not usable
171    and is not intended to be usable on this cpu.  */
172 #define TARGET_REGPARM   (target_flags & MASK_REGPARM)
173
174 /* The call is on the same 4k page, so instead of loading
175    the 'pt' register and branching, we can branch directly */
176
177 #define TARGET_NEAR_CALL (target_flags & MASK_NEAR_CALL)
178
179 /* The jump is on the same 4k page, so instead of loading
180    the 'pt' register and branching, we can branch directly */
181
182 #define TARGET_NEAR_JUMP (target_flags & MASK_NEAR_JUMP)
183
184 /* Generate shift instructions to use the 1610 Bit Manipulation
185    Unit.  */
186 #define TARGET_BMU (target_flags & MASK_BMU)
187
188 #define TARGET_YBASE_HIGH (target_flags & MASK_YBASE_HIGH)
189
190 /* Direct the linker to output extra info for initialized data */
191 #define TARGET_MASK_INIT (target_flags & MASK_INIT)
192
193 #define TARGET_INLINE_MULT (target_flags & MASK_INLINE_MULT)
194
195 /* Reserve the ybase registers *(0) - *(31) */
196 #define TARGET_RESERVE_YBASE (target_flags & MASK_RESERVE_YBASE)
197
198 /* We turn this option on internally after seeing "-g" */
199 #define TARGET_DEBUG            (target_flags & MASK_DEBUG)
200
201 /* We turn this option on internally after seeing "-save-temps */
202 #define TARGET_SAVE_TEMPS       (target_flags & MASK_SAVE_TEMPS)
203
204
205 /* Macro to define tables used to set the flags.
206    This is a list in braces of pairs in braces,
207    each pair being { "NAME", VALUE }
208    where VALUE is the bits to set or minus the bits to clear.
209    An empty string NAME is used to identify the default VALUE.  */
210
211
212 #define TARGET_SWITCHES                                           \
213   {                                                               \
214     { "regparm",       MASK_REGPARM,                              \
215       N_("Pass parameters in registers (default)") },             \
216     { "no-regparm",   -MASK_REGPARM,                              \
217       N_("Don't pass parameters in registers") },                 \
218     { "near-call",     MASK_NEAR_JUMP,                            \
219       N_("Generate code for near calls") },                       \
220     { "no-near-call", -MASK_NEAR_CALL,                            \
221       N_("Don't generate code for near calls") },                 \
222     { "near-jump",     MASK_NEAR_JUMP,                            \
223       N_("Generate code for near jumps") },                       \
224     { "no-near-jump", -MASK_NEAR_JUMP,                            \
225       N_("Don't generate code for near jumps") },                 \
226     { "bmu",           MASK_BMU,                                  \
227       N_("Generate code for a bit-manipulation unit") },          \
228     { "no-bmu",       -MASK_BMU,                                  \
229       N_("Don't generate code for a bit-manipulation unit") },    \
230     { "map1",          MASK_MAP1,                                 \
231       N_("Generate code for memory map1") },                      \
232     { "map2",          MASK_MAP2,                                 \
233       N_("Generate code for memory map2") },                      \
234     { "map3",          MASK_MAP3,                                 \
235       N_("Generate code for memory map3") },                      \
236     { "map4",          MASK_MAP4,                                 \
237       N_("Generate code for memory map4") },                      \
238     { "init",          MASK_INIT,                                 \
239       N_("Ouput extra code for initialized data") },              \
240     { "reserve-ybase", MASK_RESERVE_YBASE,                        \
241       N_("Don't let reg. allocator use ybase registers") },       \
242     { "debug",         MASK_DEBUG,                                \
243       N_("Output extra debug info in Luxworks environment") },    \
244     { "save-temporaries",    MASK_SAVE_TEMPS,                     \
245       N_("Save temp. files in Luxworks environment") },           \
246     { "",              TARGET_DEFAULT, ""}                        \
247   }
248
249 /* Default target_flags if no switches are specified */
250 #ifndef TARGET_DEFAULT
251 #define TARGET_DEFAULT  MASK_REGPARM|MASK_YBASE_HIGH
252 #endif
253
254 #define TARGET_OPTIONS                                          \
255 {                                                               \
256   { "text=",    &text_seg_name,                                 \
257     N_("Specify alternate name for text section") },            \
258   { "data=",    &data_seg_name,                                 \
259     N_("Specify alternate name for data section") },            \
260   { "bss=",     &bss_seg_name,                                  \
261     N_("Specify alternate name for bss section") },             \
262   { "const=",   &const_seg_name,                                \
263     N_("Specify alternate name for constant section") },        \
264   { "chip=",    &chip_name,                                     \
265     N_("Specify alternate name for dsp16xx chip") },            \
266 }
267
268 /* Sometimes certain combinations of command options do not make sense
269    on a particular target machine.  You can define a macro
270    `OVERRIDE_OPTIONS' to take account of this.  This macro, if
271    defined, is executed once just after all the command options have
272    been parsed.
273   
274    Don't use this macro to turn on various extra optimizations for
275    `-O'.  That is what `OPTIMIZATION_OPTIONS' is for.  */
276
277 #define OVERRIDE_OPTIONS override_options ()
278
279 #define OPTIMIZATION_OPTIONS(LEVEL,SIZE)              \
280 {                                                     \
281     flag_gnu_linker             = FALSE;              \
282                                                       \
283     if (LEVEL >= 2)                                   \
284     {                                                 \
285         /* The dsp16xx family has so few registers    \
286          * that running the first instruction         \
287          * scheduling is bad for reg. allocation      \
288          * since it increases lifetimes of pseudos.   \
289          * So turn of first scheduling pass.          \
290          */                                           \
291         flag_schedule_insns          = FALSE;         \
292     }                                                 \
293 }
294 \f
295 /* STORAGE LAYOUT */
296
297 /* Define this if most significant bit is lowest numbered
298    in instructions that operate on numbered bit-fields.
299  */
300 #define BITS_BIG_ENDIAN  0
301
302 /* Define this if most significant byte of a word is the lowest numbered.
303    We define big-endian, but since the 1600 series cannot address bytes
304    it does not matter.  */
305 #define BYTES_BIG_ENDIAN 1
306
307 /* Define this if most significant word of a multiword number is numbered.
308    For the 1600 we can decide arbitrarily since there are no machine instructions for them.  */
309 #define WORDS_BIG_ENDIAN 1
310
311 /* number of bits in an addressable storage unit */
312 #define BITS_PER_UNIT 16
313
314 /* Maximum number of bits in a word.  */
315 #define MAX_BITS_PER_WORD 16
316
317 /* Width of a word, in units (bytes).  */
318 #define UNITS_PER_WORD 1
319
320 /* Width in bits of a pointer.
321    See also the macro `Pmode' defined below.  */
322 #define POINTER_SIZE 16
323
324 /* Allocation boundary (in *bits*) for storing pointers in memory.  */
325 #define POINTER_BOUNDARY 16
326
327 /* Allocation boundary (in *bits*) for storing arguments in argument list.  */
328 #define PARM_BOUNDARY 16
329
330 /* Boundary (in *bits*) on which stack pointer should be aligned.  */
331 #define STACK_BOUNDARY 16
332
333 /* Allocation boundary (in *bits*) for the code of a function.  */
334 #define FUNCTION_BOUNDARY 16
335
336 /* Biggest alignment that any data type can require on this machine, in bits.  */
337 #define BIGGEST_ALIGNMENT 16
338
339 /* Biggest alignment that any structure field can require on this machine, in bits */
340 #define BIGGEST_FIELD_ALIGNMENT 16
341
342 /* Alignment of field after `int : 0' in a structure.  */
343 #define EMPTY_FIELD_BOUNDARY 16
344
345 /* Number of bits which any structure or union's size must be a multiple of. Each structure
346    or union's size is rounded up to a multiple of this */
347 #define STRUCTURE_SIZE_BOUNDARY 16
348
349 /* Define this if move instructions will actually fail to work
350    when given unaligned data.  */
351 #define STRICT_ALIGNMENT  1
352
353 /* An integer expression for the size in bits of the largest integer machine mode that
354    should actually be used. All integer machine modes of this size or smaller can be
355    used for structures and unions with the appropriate sizes.  */
356 #define MAX_FIXED_MODE_SIZE 32
357 \f
358 /* LAYOUT OF SOURCE LANGUAGE DATA TYPES */
359
360 #define SHORT_TYPE_SIZE        16
361 #define INT_TYPE_SIZE          16
362 #define LONG_TYPE_SIZE         32
363 #define LONG_LONG_TYPE_SIZE    32
364 #define FLOAT_TYPE_SIZE        32
365 #define DOUBLE_TYPE_SIZE       32
366 #define LONG_DOUBLE_TYPE_SIZE  32
367
368 /* An expression whose value is 1 or 0, according to whether the type char should be
369    signed or unsigned by default.  */
370
371 #define DEFAULT_SIGNED_CHAR 1
372
373 /* A C expression to determine whether to give an enum type only as many bytes
374    as it takes to represent the range of possible values of that type. A nonzero
375    value means to do that; a zero value means all enum types should be allocated
376    like int.  */
377
378 #define DEFAULT_SHORT_ENUMS 0
379
380 /* A C expression for a string describing the name of the data type to use for
381    size values.  */
382
383 #define SIZE_TYPE    "unsigned int"
384
385 /* A C expression for a string describing the name of the data type to use for the
386    result of subtracting two pointers */
387
388 #define PTRDIFF_TYPE "int"
389
390 \f
391 /* REGISTER USAGE.  */
392
393 #define ALL_16_BIT_REGISTERS  1
394
395 /* Number of actual hardware registers.
396    The hardware registers are assigned numbers for the compiler
397    from 0 to FIRST_PSEUDO_REGISTER-1 */
398
399 #define FIRST_PSEUDO_REGISTER (REG_YBASE31 + 1)
400
401 /* 1 for registers that have pervasive standard uses
402    and are not available for the register allocator.
403
404    The registers are laid out as follows:
405
406    {a0,a0l,a1,a1l,x,y,yl,p,pl} - Data Arithmetic Unit
407    {r0,r1,r2,r3,j,k,ybase} - Y Space Address Arithmetic Unit
408    {pt} - X Space Address Arithmetic Unit
409    {ar0,ar1,ar2,ar3} - Bit Manipulation UNit
410    {pr} - Return Address Register
411
412    We reserve r2 for the Stack Pointer.
413    We specify r3 for the Frame Pointer but allow the compiler
414    to omit it when possible since we have so few pointer registers.  */
415
416 #define REG_A0     0
417 #define REG_A0L    1
418 #define REG_A1     2
419 #define REG_A1L    3 
420 #define REG_X      4
421 #define REG_Y      5
422 #define REG_YL     6
423 #define REG_PROD   7
424 #define REG_PRODL  8
425 #define REG_R0     9
426 #define REG_R1     10
427 #define REG_R2     11
428 #define REG_R3     12
429 #define REG_J      13
430 #define REG_K      14
431 #define REG_YBASE  15
432 #define REG_PT     16
433 #define REG_AR0    17
434 #define REG_AR1    18
435 #define REG_AR2    19
436 #define REG_AR3    20
437 #define REG_C0     21
438 #define REG_C1     22
439 #define REG_C2     23
440 #define REG_PR     24
441 #define REG_RB     25
442 #define REG_YBASE0 26
443 #define REG_YBASE1 27
444 #define REG_YBASE2 28
445 #define REG_YBASE3 29
446 #define REG_YBASE4 30
447 #define REG_YBASE5 31
448 #define REG_YBASE6 32
449 #define REG_YBASE7 33
450 #define REG_YBASE8 34
451 #define REG_YBASE9 35
452 #define REG_YBASE10 36
453 #define REG_YBASE11 37
454 #define REG_YBASE12 38
455 #define REG_YBASE13 39
456 #define REG_YBASE14 40
457 #define REG_YBASE15 41
458 #define REG_YBASE16 42
459 #define REG_YBASE17 43
460 #define REG_YBASE18 44
461 #define REG_YBASE19 45
462 #define REG_YBASE20 46
463 #define REG_YBASE21 47
464 #define REG_YBASE22 48
465 #define REG_YBASE23 49
466 #define REG_YBASE24 50
467 #define REG_YBASE25 51
468 #define REG_YBASE26 52
469 #define REG_YBASE27 53
470 #define REG_YBASE28 54
471 #define REG_YBASE29 55
472 #define REG_YBASE30 56
473 #define REG_YBASE31 57
474
475 /* Do we have an accumulator register? */
476 #define IS_ACCUM_REG(REGNO) IN_RANGE ((REGNO), REG_A0, REG_A1L)
477 #define IS_ACCUM_LOW_REG(REGNO) ((REGNO) == REG_A0L || (REGNO) == REG_A1L)
478
479 /* Do we have a virtual ybase register */
480 #define IS_YBASE_REGISTER_WINDOW(REGNO) ((REGNO) >= REG_YBASE0 && (REGNO) <= REG_YBASE31)
481
482 #define IS_YBASE_ELIGIBLE_REG(REGNO) (IS_ACCUM_REG (REGNO) || IS_ADDRESS_REGISTER(REGNO) \
483                                       || REGNO == REG_X || REGNO == REG_Y || REGNO == REG_YL \
484                                       || REGNO == REG_PROD || REGNO == REG_PRODL)
485
486 #define IS_ADDRESS_REGISTER(REGNO) ((REGNO) >= REG_R0 && (REGNO) <= REG_R3)
487
488 #define FIXED_REGISTERS     \
489 {0, 0, 0, 0, 0, 0, 0, 0, 0, \
490  0, 0, 0, 1, 0, 0, 1,       \
491  1,                         \
492  0, 0, 0, 0,                \
493  1, 1, 1,                   \
494  1, 0,                      \
495  0, 0, 0, 0, 0, 0, 0, 0,    \
496  0, 0, 0, 0, 0, 0, 0, 0,    \
497  0, 0, 0, 0, 0, 0, 0, 0,    \
498  0, 0, 0, 0, 0, 0, 0, 0}
499
500 /* 1 for registers not available across function calls.
501    These must include the FIXED_REGISTERS and also any
502    registers that can be used without being saved.
503    The latter must include the registers where values are returned
504    and the register where structure-value addresses are passed.
505    On the 1610 'a0' holds return values from functions. 'r0' holds
506    structure-value addresses.
507
508    In addition we don't save either j, k, ybase or any of the
509    bit manipulation registers.  */
510
511
512 #define CALL_USED_REGISTERS                     \
513 {1, 1, 1, 1, 0, 1, 1, 1, 1,     /* 0-8 */       \
514  1, 0, 0, 1, 1, 1, 1,           /* 9-15 */      \
515  1,                             /* 16 */        \
516  0, 0, 1, 1,                    /* 17-20 */     \
517  1, 1, 1,                       /* 21-23 */     \
518  1, 1,                          /* 24-25 */     \
519  0, 0, 0, 0, 0, 0, 0, 0,        /* 26-33 */     \
520  0, 0, 0, 0, 0, 0, 0, 0,        /* 34-41 */     \
521  0, 0, 0, 0, 0, 0, 0, 0,        /* 42-49 */     \
522  0, 0, 0, 0, 0, 0, 0, 0}        /* 50-57 */
523
524 /* List the order in which to allocate registers.  Each register must be
525    listed once, even those in FIXED_REGISTERS.
526
527    We allocate in the following order:
528  */
529
530 #if 0
531 #define REG_ALLOC_ORDER                                 \
532 { REG_R0, REG_R1, REG_R2, REG_PROD, REG_Y, REG_X,       \
533   REG_PRODL, REG_YL, REG_AR0, REG_AR1,                  \
534   REG_RB, REG_A0, REG_A1, REG_A0L,                      \
535   REG_A1L, REG_AR2, REG_AR3,                            \
536   REG_YBASE, REG_J, REG_K, REG_PR, REG_PT, REG_C0,      \
537   REG_C1, REG_C2, REG_R3,                               \
538   REG_YBASE0, REG_YBASE1, REG_YBASE2, REG_YBASE3,       \
539   REG_YBASE4, REG_YBASE5, REG_YBASE6, REG_YBASE7,       \
540   REG_YBASE8, REG_YBASE9, REG_YBASE10, REG_YBASE11,     \
541   REG_YBASE12, REG_YBASE13, REG_YBASE14, REG_YBASE15,   \
542   REG_YBASE16, REG_YBASE17, REG_YBASE18, REG_YBASE19,   \
543   REG_YBASE20, REG_YBASE21, REG_YBASE22, REG_YBASE23,   \
544   REG_YBASE24, REG_YBASE25, REG_YBASE26, REG_YBASE27,   \
545   REG_YBASE28, REG_YBASE29, REG_YBASE30, REG_YBASE31 }
546 #else
547 #define REG_ALLOC_ORDER                                 \
548 {                                                       \
549   REG_A0, REG_A0L, REG_A1, REG_A1L, REG_Y, REG_YL,      \
550   REG_PROD,                                             \
551   REG_PRODL, REG_R0, REG_J, REG_K, REG_AR2, REG_AR3,    \
552   REG_X, REG_R1, REG_R2, REG_RB, REG_AR0, REG_AR1,      \
553   REG_YBASE0, REG_YBASE1, REG_YBASE2, REG_YBASE3,       \
554   REG_YBASE4, REG_YBASE5, REG_YBASE6, REG_YBASE7,       \
555   REG_YBASE8, REG_YBASE9, REG_YBASE10, REG_YBASE11,     \
556   REG_YBASE12, REG_YBASE13, REG_YBASE14, REG_YBASE15,   \
557   REG_YBASE16, REG_YBASE17, REG_YBASE18, REG_YBASE19,   \
558   REG_YBASE20, REG_YBASE21, REG_YBASE22, REG_YBASE23,   \
559   REG_YBASE24, REG_YBASE25, REG_YBASE26, REG_YBASE27,   \
560   REG_YBASE28, REG_YBASE29, REG_YBASE30, REG_YBASE31,   \
561   REG_R3, REG_YBASE, REG_PT, REG_C0, REG_C1, REG_C2,    \
562   REG_PR }
563 #endif
564 /* Zero or more C statements that may conditionally modify two
565    variables `fixed_regs' and `call_used_regs' (both of type `char
566    []') after they have been initialized from the two preceding
567    macros.
568
569    This is necessary in case the fixed or call-clobbered registers
570    depend on target flags.
571
572    You need not define this macro if it has no work to do.
573
574    If the usage of an entire class of registers depends on the target
575    flags, you may indicate this to GCC by using this macro to modify
576    `fixed_regs' and `call_used_regs' to 1 for each of the registers in
577    the classes which should not be used by GCC.  Also define the macro
578    `REG_CLASS_FROM_LETTER' to return `NO_REGS' if it is called with a
579    letter for a class that shouldn't be used.
580
581    (However, if this class is not included in `GENERAL_REGS' and all
582    of the insn patterns whose constraints permit this class are
583    controlled by target switches, then GCC will automatically avoid
584    using these registers when the target switches are opposed to
585    them.)  If the user tells us there is no BMU, we can't use
586    ar0-ar3 for register allocation */
587
588 #define CONDITIONAL_REGISTER_USAGE                                      \
589 do                                                                      \
590   {                                                                     \
591     if (!TARGET_BMU)                                                    \
592       {                                                                 \
593         int regno;                                                      \
594                                                                         \
595         for (regno = REG_AR0; regno <= REG_AR3; regno++)                \
596           fixed_regs[regno] = call_used_regs[regno] = 1;                \
597       }                                                                 \
598     if (TARGET_RESERVE_YBASE)                                           \
599       {                                                                 \
600         int regno;                                                      \
601                                                                         \
602         for (regno = REG_YBASE0; regno <= REG_YBASE31; regno++)         \
603           fixed_regs[regno] = call_used_regs[regno] = 1;                \
604       }                                                                 \
605   }                                                                     \
606 while (0)
607
608 /* Determine which register classes are very likely used by spill registers.
609    local-alloc.c won't allocate pseudos that have these classes as their
610    preferred class unless they are "preferred or nothing".  */
611
612 #define CLASS_LIKELY_SPILLED_P(CLASS) \
613  ((CLASS) != ALL_REGS && (CLASS) != YBASE_VIRT_REGS)
614
615 /* Return number of consecutive hard regs needed starting at reg REGNO
616    to hold something of mode MODE.
617    This is ordinarily the length in words of a value of mode MODE
618    but can be less for certain modes in special long registers.  */
619
620 #define HARD_REGNO_NREGS(REGNO, MODE)                                 \
621   (GET_MODE_SIZE(MODE))
622
623 /* Value is 1 if hard register REGNO can hold a value of machine-mode MODE.  */
624
625 #define HARD_REGNO_MODE_OK(REGNO, MODE) hard_regno_mode_ok(REGNO, MODE)
626
627 /* Value is 1 if it is a good idea to tie two pseudo registers
628    when one has mode MODE1 and one has mode MODE2.
629    If HARD_REGNO_MODE_OK could produce different values for MODE1 and MODE2,
630    for any hard reg, then this must be 0 for correct output.  */
631 #define MODES_TIEABLE_P(MODE1, MODE2)                \
632   (((MODE1) == (MODE2)) ||                           \
633    (GET_MODE_CLASS((MODE1)) == MODE_FLOAT)           \
634     == (GET_MODE_CLASS((MODE2)) == MODE_FLOAT))
635
636 /* Specify the registers used for certain standard purposes.
637    The values of these macros are register numbers.  */
638
639 /* DSP1600 pc isn't overloaded on a register.  */
640 /* #define PC_REGNUM  */
641
642 /* Register to use for pushing function arguments.  
643    This is r3 in our case */
644 #define STACK_POINTER_REGNUM  REG_R3
645
646 /* Base register for access to local variables of the function.
647    This is r2 in our case   */
648 #define FRAME_POINTER_REGNUM  REG_R2
649
650 /* We can debug without the frame pointer */
651 #define CAN_DEBUG_WITHOUT_FP 1
652
653 /* The 1610 saves the return address in this register */
654 #define RETURN_ADDRESS_REGNUM REG_PR
655
656 /* Base register for access to arguments of the function.  */
657 #define ARG_POINTER_REGNUM FRAME_POINTER_REGNUM
658
659 /* Register in which static-chain is passed to a function.  */
660
661 #define STATIC_CHAIN_REGNUM 4
662
663 /* Register in which address to store a structure value
664    is passed to a function.  This is 'r0' in our case */
665 #define STRUCT_VALUE_REGNUM   REG_R0
666 \f
667 /* Define the classes of registers for register constraints in the
668    machine description.  Also define ranges of constants.
669
670    One of the classes must always be named ALL_REGS and include all hard regs.
671    If there is more than one class, another class must be named NO_REGS
672    and contain no registers.
673
674    The name GENERAL_REGS must be the name of a class (or an alias for
675    another name such as ALL_REGS).  This is the class of registers
676    that is allowed by "g" or "r" in a register constraint.
677    Also, registers outside this class are allocated only when
678    instructions express preferences for them.
679
680    The classes must be numbered in nondecreasing order; that is,
681    a larger-numbered class must never be contained completely
682    in a smaller-numbered class.
683
684    For any two classes, it is very desirable that there be another
685    class that represents their union.  */
686
687
688 enum reg_class 
689
690     NO_REGS, 
691     A0H_REG,
692     A0L_REG,
693     A0_REG,
694     A1H_REG,
695     ACCUM_HIGH_REGS,
696     A1L_REG,
697     ACCUM_LOW_REGS, 
698     A1_REG,
699     ACCUM_REGS, 
700     X_REG, 
701     X_OR_ACCUM_LOW_REGS,
702     X_OR_ACCUM_REGS,
703     YH_REG,
704     YH_OR_ACCUM_HIGH_REGS,
705     X_OR_YH_REGS,
706     YL_REG,
707     YL_OR_ACCUM_LOW_REGS,
708     X_OR_YL_REGS,
709     X_OR_Y_REGS,
710     Y_REG,
711     ACCUM_OR_Y_REGS,
712     PH_REG,
713     X_OR_PH_REGS, 
714     PL_REG, 
715     PL_OR_ACCUM_LOW_REGS,
716     X_OR_PL_REGS,
717     YL_OR_PL_OR_ACCUM_LOW_REGS,
718     P_REG,
719     ACCUM_OR_P_REGS,
720     YL_OR_P_REGS,
721     ACCUM_LOW_OR_YL_OR_P_REGS,
722     Y_OR_P_REGS,
723     ACCUM_Y_OR_P_REGS, 
724     NO_FRAME_Y_ADDR_REGS,
725     Y_ADDR_REGS, 
726     ACCUM_LOW_OR_Y_ADDR_REGS,
727     ACCUM_OR_Y_ADDR_REGS,
728     X_OR_Y_ADDR_REGS,
729     Y_OR_Y_ADDR_REGS,
730     P_OR_Y_ADDR_REGS,
731     NON_HIGH_YBASE_ELIGIBLE_REGS,
732     YBASE_ELIGIBLE_REGS,
733     J_REG,
734     J_OR_DAU_16_BIT_REGS,
735     BMU_REGS, 
736     NOHIGH_NON_ADDR_REGS,
737     NON_ADDR_REGS,
738     SLOW_MEM_LOAD_REGS,
739     NOHIGH_NON_YBASE_REGS,
740     NO_ACCUM_NON_YBASE_REGS,
741     NON_YBASE_REGS,
742     YBASE_VIRT_REGS,
743     ACCUM_LOW_OR_YBASE_REGS,
744     ACCUM_OR_YBASE_REGS,
745     X_OR_YBASE_REGS,
746     Y_OR_YBASE_REGS,
747     ACCUM_LOW_YL_PL_OR_YBASE_REGS,
748     P_OR_YBASE_REGS,
749     ACCUM_Y_P_OR_YBASE_REGS,
750     Y_ADDR_OR_YBASE_REGS,
751     YBASE_OR_NOHIGH_YBASE_ELIGIBLE_REGS,
752     YBASE_OR_YBASE_ELIGIBLE_REGS,
753     NO_HIGH_ALL_REGS,
754     ALL_REGS, 
755     LIM_REG_CLASSES 
756 };
757
758 /* GENERAL_REGS must be the name of a register class */
759 #define GENERAL_REGS ALL_REGS
760
761 #define N_REG_CLASSES (int) LIM_REG_CLASSES
762
763 /* Give names of register classes as strings for dump file.  */
764
765 #define REG_CLASS_NAMES        \
766 {                              \
767     "NO_REGS",                 \
768     "A0H_REG",                 \
769     "A0L_REG",                 \
770     "A0_REG",                  \
771     "A1H_REG",                 \
772     "ACCUM_HIGH_REGS",         \
773     "A1L_REG",                 \
774     "ACCUM_LOW_REGS",          \
775     "A1_REG",                  \
776     "ACCUM_REGS",              \
777     "X_REG",                   \
778     "X_OR_ACCUM_LOW_REGS",     \
779     "X_OR_ACCUM_REGS",         \
780     "YH_REG",                  \
781     "YH_OR_ACCUM_HIGH_REGS",   \
782     "X_OR_YH_REGS",            \
783     "YL_REG",                  \
784     "YL_OR_ACCUM_LOW_REGS",    \
785     "X_OR_YL_REGS",            \
786     "X_OR_Y_REGS",             \
787     "Y_REG",                   \
788     "ACCUM_OR_Y_REGS",         \
789     "PH_REG",                  \
790     "X_OR_PH_REGS",            \
791     "PL_REG",                  \
792     "PL_OR_ACCUM_LOW_REGS",    \
793     "X_OR_PL_REGS",            \
794     "PL_OR_YL_OR_ACCUM_LOW_REGS", \
795     "P_REG",                   \
796     "ACCUM_OR_P_REGS",         \
797     "YL_OR_P_REGS",            \
798     "ACCUM_LOW_OR_YL_OR_P_REGS", \
799     "Y_OR_P_REGS",             \
800     "ACCUM_Y_OR_P_REGS",       \
801     "NO_FRAME_Y_ADDR_REGS",      \
802     "Y_ADDR_REGS",               \
803     "ACCUM_LOW_OR_Y_ADDR_REGS",  \
804     "ACCUM_OR_Y_ADDR_REGS",    \
805     "X_OR_Y_ADDR_REGS",        \
806     "Y_OR_Y_ADDR_REGS",        \
807     "P_OR_Y_ADDR_REGS",        \
808     "NON_HIGH_YBASE_ELIGIBLE_REGS", \
809     "YBASE_ELIGIBLE_REGS",     \
810     "J_REG",                   \
811     "J_OR_DAU_16_BIT_REGS",    \
812     "BMU_REGS",                \
813     "NOHIGH_NON_ADDR_REGS",    \
814     "NON_ADDR_REGS",           \
815     "SLOW_MEM_LOAD_REGS",      \
816     "NOHIGH_NON_YBASE_REGS",   \
817     "NO_ACCUM_NON_YBASE_REGS", \
818     "NON_YBASE_REGS",          \
819     "YBASE_VIRT_REGS",         \
820     "ACCUM_LOW_OR_YBASE_REGS", \
821     "ACCUM_OR_YBASE_REGS",     \
822     "X_OR_YBASE_REGS",         \
823     "Y_OR_YBASE_REGS",         \
824     "ACCUM_LOW_YL_PL_OR_YBASE_REGS", \
825     "P_OR_YBASE_REGS",         \
826     "ACCUM_Y_P_OR_YBASE_REGS", \
827     "Y_ADDR_OR_YBASE_REGS",    \
828     "YBASE_OR_NOHIGH_YBASE_ELIGIBLE_REGS", \
829     "YBASE_OR_YBASE_ELIGIBLE_REGS", \
830     "NO_HIGH_ALL_REGS",        \
831     "ALL_REGS"                 \
832 }
833
834 /* Define which registers fit in which classes.
835    This is an initializer for a vector of HARD_REG_SET
836    of length N_REG_CLASSES.  */
837
838 #define REG_CLASS_CONTENTS   \
839 {                            \
840     {0x00000000,  0x00000000},      /* no reg */                             \
841     {0x00000001,  0x00000000},      /* a0h */                                \
842     {0x00000002,  0x00000000},      /* a0l */                                \
843     {0x00000003,  0x00000000},      /* a0h:a0l */                            \
844     {0x00000004,  0x00000000},      /* a1h */                                \
845     {0x00000005,  0x00000000},      /* accum high */                         \
846     {0x00000008,  0x00000000},      /* a1l */                                \
847     {0x0000000A,  0x00000000},      /* accum low */                          \
848     {0x0000000c,  0x00000000},      /* a1h:a1l */                            \
849     {0x0000000f,  0x00000000},      /* accum regs */                         \
850     {0x00000010,  0x00000000},      /* x reg */                              \
851     {0x0000001A,  0x00000000},      /* x & accum_low_regs */                 \
852     {0x0000001f,  0x00000000},      /* x & accum regs */                     \
853     {0x00000020,  0x00000000},      /* y high */                             \
854     {0x00000025,  0x00000000},      /* yh, accum high */                     \
855     {0x00000030,  0x00000000},      /* x & yh */                             \
856     {0x00000040,  0x00000000},      /* y low */                              \
857     {0x0000004A,  0x00000000},      /* y low, accum_low */                   \
858     {0x00000050,  0x00000000},      /* x & yl */                             \
859     {0x00000060,  0x00000000},      /* yl:yh */                              \
860     {0x00000070,  0x00000000},      /* x, yh,a nd yl */                      \
861     {0x0000006F,  0x00000000},      /* accum, y */                           \
862     {0x00000080,  0x00000000},      /* p high */                             \
863     {0x00000090,  0x00000000},      /* x & ph */                             \
864     {0x00000100,  0x00000000},      /* p low */                              \
865     {0x0000010A,  0x00000000},      /* p_low and accum_low */                \
866     {0x00000110,  0x00000000},      /* x & pl */                             \
867     {0x0000014A,  0x00000000},      /* pl,yl,a1l,a0l */                      \
868     {0x00000180,  0x00000000},      /* pl:ph */                              \
869     {0x0000018F,  0x00000000},      /* accum, p */                           \
870     {0x000001C0,  0x00000000},      /* pl:ph and yl */                       \
871     {0x000001CA,  0x00000000},      /* pl:ph, yl, a0l, a1l */                \
872     {0x000001E0,  0x00000000},      /* y or p */                             \
873     {0x000001EF,  0x00000000},      /* accum, y or p */                      \
874     {0x00000E00,  0x00000000},      /* r0-r2 */                              \
875     {0x00001E00,  0x00000000},      /* r0-r3 */                              \
876     {0x00001E0A,  0x00000000},      /* r0-r3, accum_low */                   \
877     {0x00001E0F,  0x00000000},      /* accum,r0-r3 */                        \
878     {0x00001E10,  0x00000000},      /* x,r0-r3 */                            \
879     {0x00001E60,  0x00000000},      /* y,r0-r3 */                            \
880     {0x00001F80,  0x00000000},      /* p,r0-r3 */                            \
881     {0x00001FDA,  0x00000000},      /* ph:pl, r0-r3, x,a0l,a1l */            \
882     {0x00001fff,  0x00000000},      /* accum,x,y,p,r0-r3 */                  \
883     {0x00002000,  0x00000000},      /* j */                                  \
884     {0x00002025,  0x00000000},      /* j, yh, a1h, a0h */                    \
885     {0x001E0000,  0x00000000},      /* ar0-ar3 */                            \
886     {0x03FFE1DA,  0x00000000},      /* non_addr except yh,a0h,a1h */         \
887     {0x03FFE1FF,  0x00000000},      /* non_addr regs */                      \
888     {0x03FFFF8F,  0x00000000},      /* non ybase except yh, yl, and x */     \
889     {0x03FFFFDA,  0x00000000},      /* non ybase regs except yh,a0h,a1h */   \
890     {0x03FFFFF0,  0x00000000},      /* non ybase except a0,a0l,a1,a1l */     \
891     {0x03FFFFFF,  0x00000000},      /* non ybase regs */                     \
892     {0xFC000000,  0x03FFFFFF},      /* virt ybase regs */                    \
893     {0xFC00000A,  0x03FFFFFF},      /* accum_low, virt ybase regs */         \
894     {0xFC00000F,  0x03FFFFFF},      /* accum, virt ybase regs */             \
895     {0xFC000010,  0x03FFFFFF},      /* x,virt ybase regs */                  \
896     {0xFC000060,  0x03FFFFFF},      /* y,virt ybase regs */                  \
897     {0xFC00014A,  0x03FFFFFF},      /* accum_low, yl, pl, ybase */           \
898     {0xFC000180,  0x03FFFFFF},      /* p,virt ybase regs */                  \
899     {0xFC0001EF,  0x03FFFFFF},      /* accum,y,p,ybase regs */               \
900     {0xFC001E00,  0x03FFFFFF},      /* r0-r3, ybase regs */                  \
901     {0xFC001FDA,  0x03FFFFFF},      /* r0-r3, pl:ph,yl,x,a1l,a0l */          \
902     {0xFC001FFF,  0x03FFFFFF},      /* virt ybase, ybase eligible regs */    \
903     {0xFCFFFFDA,  0x03FFFFFF},      /* all regs except yh,a0h,a1h */         \
904     {0xFFFFFFFF,  0x03FFFFFF}       /* all regs */                           \
905 }
906
907
908 /* The same information, inverted:
909    Return the class number of the smallest class containing
910    reg number REGNO.  This could be a conditional expression
911    or could index an array.  */
912
913 #define REGNO_REG_CLASS(REGNO) regno_reg_class(REGNO)
914
915 /* The class value for index registers, and the one for base regs.  */
916
917 #define INDEX_REG_CLASS NO_REGS
918 #define BASE_REG_CLASS  Y_ADDR_REGS
919
920 /* Get reg_class from a letter such as appears in the machine description.  */
921
922 #define REG_CLASS_FROM_LETTER(C) \
923   dsp16xx_reg_class_from_letter(C)
924
925 #define SECONDARY_RELOAD_CLASS(CLASS, MODE, X)  \
926    secondary_reload_class(CLASS, MODE, X)
927
928 /* When defined, the compiler allows registers explicitly used in the
929    rtl to be used as spill registers but prevents the compiler from
930    extending the lifetime of these registers.  */
931
932 #define SMALL_REGISTER_CLASSES 1
933
934 /* Macros to check register numbers against specific register classes.  */
935
936 /* These assume that REGNO is a hard or pseudo reg number.
937    They give nonzero only if REGNO is a hard reg of the suitable class
938    or a pseudo reg currently allocated to a suitable hard reg.
939    Since they use reg_renumber, they are safe only once reg_renumber
940    has been allocated, which happens in local-alloc.c.  */
941
942 /* A C expression which is nonzero if register REGNO is suitable for use
943    as a base register in operand addresses. It may be either a suitable
944    hard register or a pseudo register that has been allocated such a
945    hard register. 
946
947   On the 1610 the Y address pointers can be used as a base registers */
948 #define REGNO_OK_FOR_BASE_P(REGNO) \
949 (((REGNO) >= REG_R0 && (REGNO) < REG_R3 + 1) || ((unsigned) reg_renumber[REGNO] >= REG_R0  \
950                                    && (unsigned) reg_renumber[REGNO] < REG_R3 + 1))
951
952 #define REGNO_OK_FOR_YBASE_P(REGNO) \
953   (((REGNO) == REG_YBASE) || ((unsigned) reg_renumber[REGNO] == REG_YBASE))
954
955 #define REGNO_OK_FOR_INDEX_P(REGNO)  0
956
957 #ifdef ALL_16_BIT_REGISTERS
958 #define IS_32_BIT_REG(REGNO)  0
959 #else
960 #define IS_32_BIT_REG(REGNO)     \
961   ((REGNO) == REG_A0 || (REGNO) == REG_A1 || (REGNO) == REG_Y || (REGNO) == REG_PROD)
962 #endif
963
964 /* Given an rtx X being reloaded into a reg required to be
965    in class CLASS, return the class of reg to actually use.
966    In general this is just CLASS; but on some machines
967    in some cases it is preferable to use a more restrictive class.
968    Also, we must ensure that a PLUS is reloaded either
969    into an accumulator or an address register.  */
970
971 #define PREFERRED_RELOAD_CLASS(X,CLASS)  preferred_reload_class (X, CLASS)
972
973 /*   A C expression that places additional restrictions on the register
974      class to use when it is necessary to be able to hold a value of
975      mode MODE in a reload register for which class CLASS would
976      ordinarily be used.
977
978      Unlike `PREFERRED_RELOAD_CLASS', this macro should be used when
979      there are certain modes that simply can't go in certain reload
980      classes.
981
982      The value is a register class; perhaps CLASS, or perhaps another,
983      smaller class.
984
985      Don't define this macro unless the target machine has limitations
986      which require the macro to do something nontrivial.  */
987
988 #if 0
989 #define LIMIT_RELOAD_CLASS(MODE, CLASS) dsp16xx_limit_reload_class (MODE, CLASS)
990 #endif
991
992 /* A C expression for the maximum number of consecutive registers of class CLASS
993    needed to hold a value of mode MODE */
994 #define CLASS_MAX_NREGS(CLASS, MODE)                                \
995     class_max_nregs(CLASS, MODE)
996
997 /* The letters 'I' through 'P' in a register constraint string
998    can be used to stand for particular ranges of immediate operands.
999    This macro defines what the ranges are.
1000    C is the letter, and VALUE is a constant value.
1001    Return 1 if VALUE is in the range specified by C.
1002
1003    For the 16xx, the following constraints are used:
1004    'I' requires a non-negative 16-bit value.
1005    'J' requires a non-negative 9-bit value
1006    'K' requires a constant 0 operand.
1007    'L' constant for use in add or sub from low 16-bits
1008    'M' 32-bit value -- low 16-bits zero
1009    'N' constant for use incrementing or decrementing an address register
1010    'O' constant for use with and'ing only high 16-bit
1011    'P' constant for use with and'ing only low 16-bit
1012  */
1013
1014 #define SMALL_INT(X) (SMALL_INTVAL (INTVAL (X)))
1015 #define SMALL_INTVAL(I) ((unsigned) (I) < 0x10000)
1016 #define SHORT_IMMEDIATE(X)  (SHORT_INTVAL (INTVAL(X)))
1017 #define SHORT_INTVAL(I)     ((unsigned) (I) < 0x100)
1018 #define ADD_LOW_16(I)       ((I) >= 0 && (I) <= 32767)
1019 #define ADD_HIGH_16(I)      (((I) & 0x0000ffff) == 0)
1020 #define AND_LOW_16(I)       ((I) >= 0 && (I) <= 32767)
1021 #define AND_HIGH_16(I)      (((I) & 0x0000ffff) == 0)
1022
1023 #define CONST_OK_FOR_LETTER_P(VALUE, C)                           \
1024    ((C) == 'I' ? (SMALL_INTVAL(VALUE))                            \
1025     : (C) == 'J' ? (SHORT_INTVAL(VALUE))                          \
1026     : (C) == 'K' ? ((VALUE) == 0)                                 \
1027     : (C) == 'L' ? ((VALUE) >= 0 && (VALUE) <= 32767)             \
1028     : (C) == 'M' ? (((VALUE) & 0x0000ffff) == 0)                  \
1029     : (C) == 'N' ? ((VALUE) == -1 || (VALUE) == 1                 \
1030                     || (VALUE) == -2 || (VALUE) == 2)             \
1031     : (C) == 'O' ? (((VALUE) & 0xffff0000) == 0xffff0000)         \
1032     : (C) == 'P' ? (((VALUE) & 0x0000ffff) == 0xffff)             \
1033     : 0)
1034
1035 #define CONST_DOUBLE_OK_FOR_LETTER_P(VALUE, C)   1
1036
1037 /* Optional extra constraints for this machine */
1038 #define EXTRA_CONSTRAINT(OP,C)                                    \
1039   ((C) == 'R' ? symbolic_address_p (OP)                           \
1040    : 0)
1041 \f
1042 /* DESCRIBING STACK LAYOUT AND CALLING CONVENTIONS */
1043
1044 /* Define this if pushing a word on the stack
1045    makes the stack pointer a smaller address.  */
1046 /* #define STACK_GROWS_DOWNWARD */
1047
1048 /* Define this if the nominal address of the stack frame
1049    is at the high-address end of the local variables;
1050    that is, each additional local variable allocated
1051    goes at a more negative offset in the frame.  */
1052 /* #define FRAME_GROWS_DOWNWARD */
1053
1054 #define ARGS_GROW_DOWNWARD
1055
1056 /* We use post decrement on the 1600 because there isn't
1057    a pre-decrement addressing mode. This means that we
1058    assume the stack pointer always points at the next
1059    FREE location on the stack.  */
1060 #define STACK_PUSH_CODE POST_INC
1061
1062 /* Offset within stack frame to start allocating local variables at.
1063    If FRAME_GROWS_DOWNWARD, this is the offset to the END of the
1064    first local allocated.  Otherwise, it is the offset to the BEGINNING
1065    of the first local allocated.  */
1066 #define STARTING_FRAME_OFFSET  0
1067
1068 /* Offset from the stack pointer register to the first
1069    location at which outgoing arguments are placed.  */
1070 #define STACK_POINTER_OFFSET (0)
1071
1072 struct dsp16xx_frame_info
1073 {
1074   unsigned long total_size;     /* # bytes that the entire frame takes up */
1075   unsigned long var_size;       /* # bytes that variables take up */
1076   unsigned long args_size;      /* # bytes that outgoing arguments take up */
1077   unsigned long extra_size;     /* # bytes of extra gunk */
1078   unsigned int  reg_size;       /* # bytes needed to store regs */
1079   long          fp_save_offset; /* offset from vfp to store registers */
1080   unsigned long sp_save_offset; /* offset from new sp to store registers */
1081   int           pr_save_offset; /* offset to saved PR */
1082   int           initialized;    /* != 0 if frame size already calculated */
1083   int           num_regs;       /* number of registers saved */
1084   int           function_makes_calls;  /* Does the function make calls */
1085 };
1086
1087 extern struct dsp16xx_frame_info current_frame_info;
1088
1089 #define RETURN_ADDR_OFF current_frame_info.pr_save_offset
1090
1091 /* If we generate an insn to push BYTES bytes,
1092    this says how many the stack pointer really advances by.  */
1093 /* #define PUSH_ROUNDING(BYTES) ((BYTES)) */
1094
1095 /* If defined, the maximum amount of space required for outgoing
1096    arguments will be computed and placed into the variable
1097    'current_function_outgoing_args_size'. No space will be pushed
1098    onto the stack for each call; instead, the function prologue should
1099    increase the stack frame size by this amount.
1100
1101    It is not proper to define both 'PUSH_ROUNDING' and
1102    'ACCUMULATE_OUTGOING_ARGS'.  */
1103 #define ACCUMULATE_OUTGOING_ARGS 1
1104
1105 /* Offset of first parameter from the argument pointer
1106    register value.  */
1107
1108 #define FIRST_PARM_OFFSET(FNDECL)   (0)
1109
1110 /* Value is 1 if returning from a function call automatically
1111    pops the arguments described by the number-of-args field in the call.
1112    FUNDECL is the declaration node of the function (as a tree),
1113    FUNTYPE is the data type of the function (as a tree),
1114    or for a library call it is an identifier node for the subroutine name.  */
1115
1116 #define RETURN_POPS_ARGS(FUNDECL,FUNTYPE,SIZE) 0
1117
1118 /* Define how to find the value returned by a function.
1119    VALTYPE is the data type of the value (as a tree).
1120    If the precise function being called is known, FUNC is its FUNCTION_DECL;
1121    otherwise, FUNC is 0. On the 1610 all function return their values
1122    in a0 (i.e. the upper 16 bits). If the return value is 32-bits the
1123    entire register is significant.  */
1124
1125 #define VALUE_REGNO(MODE)  (REG_Y)
1126
1127 #define FUNCTION_VALUE(VALTYPE, FUNC)  \
1128   gen_rtx_REG (TYPE_MODE (VALTYPE), VALUE_REGNO(TYPE_MODE(VALTYPE)))
1129
1130 /* Define how to find the value returned by a library function
1131    assuming the value has mode MODE.  */
1132 #define LIBCALL_VALUE(MODE)  gen_rtx_REG (MODE, VALUE_REGNO(MODE))
1133
1134 /* 1 if N is a possible register number for a function value.  */
1135 #define FUNCTION_VALUE_REGNO_P(N) ((N) == REG_Y)
1136 \f
1137
1138 /* Define where to put the arguments to a function.
1139    Value is zero to push the argument on the stack,
1140    or a hard register in which to store the argument.
1141
1142    MODE is the argument's machine mode.
1143    TYPE is the data type of the argument (as a tree).
1144     This is null for libcalls where that information may
1145     not be available.
1146    CUM is a variable of type CUMULATIVE_ARGS which gives info about
1147     the preceding args and about the function being called.
1148    NAMED is nonzero if this argument is a named parameter
1149     (otherwise it is an extra parameter matching an ellipsis).  */
1150
1151 /* On the 1610 all args are pushed, except if -mregparm is specified
1152    then the first two words of arguments are passed in a0, a1.  */
1153 #define FUNCTION_ARG(CUM, MODE, TYPE, NAMED) \
1154   dsp16xx_function_arg (CUM, MODE, TYPE, NAMED)
1155
1156 /* Define the first register to be used for argument passing */
1157 #define FIRST_REG_FOR_FUNCTION_ARG REG_Y
1158
1159 /* Define the profitability of saving registers around calls.
1160    NOTE: For now we turn this off because of a bug in the
1161    caller-saves code and also because i'm not sure it is helpful
1162    on the 1610.  */
1163
1164 #define CALLER_SAVE_PROFITABLE(REFS,CALLS) 0
1165
1166 /* This indicates that an argument is to be passed with an invisible reference
1167    (i.e., a pointer to the object is passed).
1168
1169    On the dsp16xx, we do this if it must be passed on the stack.  */
1170
1171 #define FUNCTION_ARG_PASS_BY_REFERENCE(CUM, MODE, TYPE, NAMED)  \
1172   (MUST_PASS_IN_STACK (MODE, TYPE))
1173
1174 /* For an arg passed partly in registers and partly in memory,
1175    this is the number of registers used.
1176    For args passed entirely in registers or entirely in memory, zero.  */
1177
1178 #define FUNCTION_ARG_PARTIAL_NREGS(CUM, MODE, TYPE, NAMED)  (0)
1179
1180 /* Define a data type for recording info about an argument list
1181    during the scan of that argument list.  This data type should
1182    hold all necessary information about the function itself
1183    and about the args processed so far, enough to enable macros
1184    such as FUNCTION_ARG to determine where the next arg should go.  */
1185 #define CUMULATIVE_ARGS int
1186
1187 /* Initialize a variable CUM of type CUMULATIVE_ARGS
1188    for a call to a function whose data type is FNTYPE.
1189    For a library call, FNTYPE is 0.  */
1190 #define INIT_CUMULATIVE_ARGS(CUM,FNTYPE,LIBNAME,INDIRECT)  ((CUM) = 0)
1191
1192 /* Update the data in CUM to advance over an argument
1193    of mode MODE and data type TYPE.
1194    (TYPE is null for libcalls where that information may not be available.)  */
1195
1196 #define FUNCTION_ARG_ADVANCE(CUM, MODE, TYPE, NAMED)    \
1197   dsp16xx_function_arg_advance (&CUM, MODE,TYPE, NAMED)
1198
1199 /* 1 if N is a possible register number for function argument passing.  */
1200 #define FUNCTION_ARG_REGNO_P(N)   \
1201   ((N) == REG_Y || (N) == REG_YL || (N) == REG_PROD || (N) == REG_PRODL)
1202
1203 /* Output assembler code to FILE to increment profiler label # LABELNO
1204    for profiling a function entry.  */
1205
1206 #define FUNCTION_PROFILER(FILE, LABELNO)        \
1207   internal_error ("profiling not implemented yet")
1208
1209 /* Output assembler code to FILE to initialize this source file's
1210    basic block profiling info, if that has not already been done.  */
1211 #define FUNCTION_BLOCK_PROFILER(FILE, LABELNO)  \
1212   internal_error ("profiling not implemented yet")
1213
1214 /* Output assembler code to FILE to increment the entry-count for
1215    the BLOCKNO'th basic block in this source file.  */
1216 #define BLOCK_PROFILER(FILE, BLOCKNO)           \
1217   internal_error ("profiling not implemented yet")
1218
1219
1220 /* EXIT_IGNORE_STACK should be nonzero if, when returning from a function,
1221    the stack pointer does not matter.  The value is tested only in
1222    functions that have frame pointers.
1223    No definition is equivalent to always zero.  */
1224
1225 #define EXIT_IGNORE_STACK  (0)
1226
1227 #define TRAMPOLINE_TEMPLATE(FILE) \
1228   internal_error ("trampolines not yet implemented");
1229
1230 /* Length in units of the trampoline for entering a nested function.
1231    This is a dummy value  */
1232
1233 #define TRAMPOLINE_SIZE 20
1234
1235 /* Emit RTL insns to initialize the variable parts of a trampoline.
1236    FNADDR is an RTX for the address of the function's pure code.
1237    CXT is an RTX for the static chain value for the function.  */
1238
1239 #define INITIALIZE_TRAMPOLINE(TRAMP, FNADDR, CXT)                       \
1240   internal_error ("trampolines not yet implemented");
1241
1242 /* A C expression which is nonzero if a function must have and use a
1243    frame pointer. If its value is nonzero the functions will have a
1244    frame pointer.  */
1245 #define FRAME_POINTER_REQUIRED  (current_function_calls_alloca)
1246
1247 /* A C statement to store in the variable 'DEPTH' the difference
1248    between the frame pointer and the stack pointer values immediately
1249    after the function prologue.  */
1250 #define INITIAL_FRAME_POINTER_OFFSET(DEPTH)                     \
1251 {  (DEPTH) = initial_frame_pointer_offset();                    \
1252 }
1253 \f
1254 /* IMPLICIT CALLS TO LIBRARY ROUTINES */
1255
1256 #define ADDHF3_LIBCALL      "__Emulate_addhf3"
1257 #define SUBHF3_LIBCALL      "__Emulate_subhf3"
1258 #define MULHF3_LIBCALL      "__Emulate_mulhf3"
1259 #define DIVHF3_LIBCALL      "__Emulate_divhf3"
1260 #define CMPHF3_LIBCALL      "__Emulate_cmphf3"
1261 #define FIXHFHI2_LIBCALL    "__Emulate_fixhfhi2"
1262 #define FLOATHIHF2_LIBCALL  "__Emulate_floathihf2"
1263 #define NEGHF2_LIBCALL      "__Emulate_neghf2"
1264
1265 #define UMULHI3_LIBCALL     "__Emulate_umulhi3"
1266 #define MULHI3_LIBCALL      "__Emulate_mulhi3"
1267 #define UDIVQI3_LIBCALL     "__Emulate_udivqi3"
1268 #define UDIVHI3_LIBCALL     "__Emulate_udivhi3"
1269 #define DIVQI3_LIBCALL      "__Emulate_divqi3"
1270 #define DIVHI3_LIBCALL      "__Emulate_divhi3"
1271 #define MODQI3_LIBCALL      "__Emulate_modqi3"
1272 #define MODHI3_LIBCALL      "__Emulate_modhi3"
1273 #define UMODQI3_LIBCALL     "__Emulate_umodqi3"
1274 #define UMODHI3_LIBCALL     "__Emulate_umodhi3"
1275 #define ASHRHI3_LIBCALL     "__Emulate_ashrhi3"
1276 #define LSHRHI3_LIBCALL     "__Emulate_lshrhi3"
1277 #define ASHLHI3_LIBCALL     "__Emulate_ashlhi3"
1278 #define LSHLHI3_LIBCALL     "__Emulate_lshlhi3"   /* NOT USED */
1279
1280 /* Define this macro if calls to the ANSI C library functions memcpy and
1281    memset should be generated instead of the BSD function bcopy & bzero.  */
1282 #define TARGET_MEM_FUNCTIONS
1283
1284 \f
1285 /* ADDRESSING MODES */
1286
1287 /* The 1610 has post-increment and decrement, but no pre-modify */
1288 #define HAVE_POST_INCREMENT 1
1289 #define HAVE_POST_DECREMENT 1
1290
1291 /* #define HAVE_PRE_DECREMENT 0 */
1292 /* #define HAVE_PRE_INCREMENT 0 */
1293
1294 /* Recognize any constant value that is a valid address.  */
1295 #define CONSTANT_ADDRESS_P(X)  CONSTANT_P (X)
1296
1297 /* Maximum number of registers that can appear in a valid memory address.  */
1298 #define MAX_REGS_PER_ADDRESS 1
1299
1300 /* The macros REG_OK_FOR..._P assume that the arg is a REG rtx
1301    and check its validity for a certain class.
1302    We have two alternate definitions for each of them.
1303    The usual definition accepts all pseudo regs; the other rejects
1304    them unless they have been allocated suitable hard regs.
1305    The symbol REG_OK_STRICT causes the latter definition to be used.
1306
1307    Most source files want to accept pseudo regs in the hope that
1308    they will get allocated to the class that the insn wants them to be in.
1309    Source files for reload pass need to be strict.
1310    After reload, it makes no difference, since pseudo regs have
1311    been eliminated by then.  */
1312
1313 #ifndef REG_OK_STRICT
1314
1315 /* Nonzero if X is a hard reg that can be used as an index
1316    or if it is a pseudo reg.  */
1317 #define REG_OK_FOR_INDEX_P(X)  0
1318
1319 /* Nonzero if X is a hard reg that can be used as a base reg
1320    or if it is a pseudo reg.  */
1321 #define REG_OK_FOR_BASE_P(X)    \
1322     ((REGNO (X) >= REG_R0 && REGNO (X) < REG_R3 + 1 )          \
1323        || (REGNO (X) >= FIRST_PSEUDO_REGISTER))
1324
1325 /* Nonzero if X is the 'ybase' register */
1326 #define REG_OK_FOR_YBASE_P(X)   \
1327   (REGNO(X) == REG_YBASE || (REGNO (X) >= FIRST_PSEUDO_REGISTER))
1328 #else
1329
1330 /* Nonzero if X is a hard reg that can be used as an index.  */
1331 #define REG_OK_FOR_INDEX_P(X) REGNO_OK_FOR_INDEX_P (REGNO (X))
1332
1333 /* Nonzero if X is a hard reg that can be used as a base reg.  */
1334 #define REG_OK_FOR_BASE_P(X) REGNO_OK_FOR_BASE_P (REGNO (X))
1335
1336 /* Nonzero if X is the 'ybase' register */
1337 #define REG_OK_FOR_YBASE_P(X) REGNO_OK_FOR_YBASE_P (REGNO(X))
1338
1339 #endif
1340 \f
1341 /* GO_IF_LEGITIMATE_ADDRESS recognizes an RTL expression
1342    that is a valid memory address for an instruction.
1343    The MODE argument is the machine mode for the MEM expression
1344    that wants to use this address.
1345
1346    On the 1610, the actual legitimate addresses must be N (N must fit in
1347    5 bits), *rn (register indirect), *rn++, or *rn-- */
1348
1349 #define INT_FITS_5_BITS(I)    ((unsigned long) (I) < 0x20)
1350 #define INT_FITS_16_BITS(I)   ((unsigned long) (I) < 0x10000)
1351 #define YBASE_CONST_OFFSET(I)       ((I) >= -31 && (I) <= 0)
1352 #define YBASE_OFFSET(X)       (GET_CODE (X) == CONST_INT && YBASE_CONST_OFFSET (INTVAL(X)))
1353
1354 #define FITS_16_BITS(X)       (GET_CODE (X) == CONST_INT && INT_FITS_16_BITS(INTVAL(X)))
1355 #define FITS_5_BITS(X)        (GET_CODE (X) == CONST_INT && INT_FITS_5_BITS(INTVAL(X)))
1356 #define ILLEGAL_HIMODE_ADDR(MODE, CONST)  ((MODE) == HImode && CONST == -31)
1357
1358 #define INDIRECTABLE_ADDRESS_P(X)                            \
1359     ((GET_CODE(X) == REG && REG_OK_FOR_BASE_P(X))            \
1360   || ((GET_CODE(X) == POST_DEC || GET_CODE(X) == POST_INC)   \
1361        && REG_P(XEXP(X,0)) && REG_OK_FOR_BASE_P(XEXP(X,0)))  \
1362   || (GET_CODE(X) == CONST_INT && (unsigned long) (X) < 0x20))
1363
1364
1365 #define INDEXABLE_ADDRESS_P(X,MODE)                                 \
1366    ((GET_CODE(X) == PLUS && GET_CODE (XEXP (X,0)) == REG &&         \
1367      XEXP(X,0) == stack_pointer_rtx && YBASE_OFFSET(XEXP(X,1)) &&   \
1368      !ILLEGAL_HIMODE_ADDR(MODE, INTVAL(XEXP(X,1)))) ||              \
1369     (GET_CODE(X) == PLUS && GET_CODE (XEXP (X,1)) == REG &&         \
1370      XEXP(X,1) == stack_pointer_rtx && YBASE_OFFSET(XEXP(X,0)) &&  \
1371      !ILLEGAL_HIMODE_ADDR(MODE, INTVAL(XEXP(X,0)))))
1372
1373 #define GO_IF_LEGITIMATE_ADDRESS(MODE, X, ADDR)                     \
1374 {                                                                   \
1375     if (INDIRECTABLE_ADDRESS_P(X))                                  \
1376         goto ADDR;                                                  \
1377 }
1378
1379 \f
1380 /* Try machine-dependent ways of modifying an illegitimate address
1381    to be legitimate.  If we find one, return the new, valid address.
1382    This macro is used in only one place: `memory_address' in explow.c.
1383
1384    OLDX is the address as it was before break_out_memory_refs was called.
1385    In some cases it is useful to look at this to decide what needs to be done.
1386
1387    MODE and WIN are passed so that this macro can use
1388    GO_IF_LEGITIMATE_ADDRESS.
1389
1390    It is always safe for this macro to do nothing.  It exists to recognize
1391    opportunities to optimize the output.
1392
1393    For the 1610, we need not do anything.  However, if we don't,
1394    `memory_address' will try lots of things to get a valid address, most of
1395    which will result in dead code and extra pseudos.  So we make the address
1396    valid here.
1397
1398    This is easy:  The only valid addresses are an offset from a register
1399    and we know the address isn't valid.  So just call either `force_operand'
1400    or `force_reg' unless this is a (plus (reg ...) (const_int 0)).  */
1401
1402 #define LEGITIMIZE_ADDRESS(X,OLDX,MODE,WIN)                     \
1403 { if (GET_CODE (X) == PLUS && XEXP (X, 1) == const0_rtx)        \
1404     X = XEXP (x, 0);                                            \
1405   if (GET_CODE (X) == MULT || GET_CODE (X) == PLUS)             \
1406     X = force_operand (X, 0);                                   \
1407   else                                                          \
1408     X = force_reg (Pmode, X);                                   \
1409   goto WIN;                                                     \
1410 }
1411
1412 /* Go to LABEL if ADDR (a legitimate address expression)
1413    has an effect that depends on the machine mode it is used for.
1414    On the 1610, only postdecrement and postincrement address depend thus
1415    (the amount of decrement or increment being the length of the operand).  */
1416
1417 #define GO_IF_MODE_DEPENDENT_ADDRESS(ADDR,LABEL)        \
1418  if (GET_CODE (ADDR) == POST_INC || GET_CODE (ADDR) == POST_DEC) goto LABEL
1419
1420 /* Nonzero if the constant value X is a legitimate general operand.
1421    It is given that X satisfies CONSTANT_P or is a CONST_DOUBLE.  */
1422 #define LEGITIMATE_CONSTANT_P(X) (1)
1423
1424 \f
1425 /* CONDITION CODE INFORMATION */
1426
1427 /* Store in cc_status the expressions
1428    that the condition codes will describe
1429    after execution of an instruction whose pattern is EXP.
1430    Do not alter them if the instruction would not alter the cc's.  */
1431
1432 #define NOTICE_UPDATE_CC(EXP, INSN) \
1433    notice_update_cc( (EXP) )
1434 \f
1435 /* DESCRIBING RELATIVE COSTS OF OPERATIONS */
1436
1437 /* Compute the cost of computing a constant rtl expression RTX
1438    whose rtx-code is CODE.  The body of this macro is a portion
1439    of a switch statement.  If the code is computed here,
1440    return it with a return statement.  */
1441 #define CONST_COSTS(RTX,CODE,OUTER_CODE)                                \
1442   case CONST_INT:                                                       \
1443     return (unsigned) INTVAL (RTX) < 65536 ? 0 : 2;                     \
1444   case LABEL_REF:                                                       \
1445   case SYMBOL_REF:                                                      \
1446   case CONST:                                                           \
1447     return COSTS_N_INSNS (1);                                           \
1448                                                                         \
1449   case CONST_DOUBLE:                                                    \
1450     return COSTS_N_INSNS (2);
1451
1452 /* Like CONST_COSTS but applies to nonconstant RTL expressions.
1453    This can be used, for example to indicate how costly a multiply
1454    instruction is.  */
1455 #define RTX_COSTS(X,CODE,OUTER_CODE)                            \
1456   case MEM:                                                     \
1457     return GET_MODE (X) == QImode ? COSTS_N_INSNS (2) :         \
1458                                     COSTS_N_INSNS (4);          \
1459   case DIV:                                                     \
1460   case MOD:                                                     \
1461     return COSTS_N_INSNS (38);                                  \
1462   case MULT:                                                    \
1463     if (GET_MODE (X) == QImode)                                 \
1464         return COSTS_N_INSNS (2);                               \
1465     else                                                        \
1466         return COSTS_N_INSNS (38);                              \
1467   case PLUS:                                                    \
1468   case MINUS:                                                   \
1469     if (GET_MODE_CLASS (GET_MODE (X)) == MODE_INT)              \
1470         {                                                       \
1471           return (1 +                                           \
1472                   rtx_cost (XEXP (X, 0), CODE) +                \
1473                   rtx_cost (XEXP (X, 1), CODE));                \
1474         }                                                       \
1475     else                                                        \
1476         return COSTS_N_INSNS (38);                              \
1477                                                                 \
1478   case AND: case IOR: case XOR:                                 \
1479         return (1 +                                             \
1480                 rtx_cost (XEXP (X, 0), CODE) +                  \
1481                 rtx_cost (XEXP (X, 1), CODE));                  \
1482                                                                 \
1483   case NEG: case NOT:                                           \
1484     return COSTS_N_INSNS (1);                                   \
1485   case ASHIFT:                                                  \
1486   case ASHIFTRT:                                                \
1487   case LSHIFTRT:                                                \
1488     if (GET_CODE (XEXP (X,1)) == CONST_INT)                     \
1489       {                                                         \
1490         int number = INTVAL(XEXP (X,1));                        \
1491         if (number == 1 || number == 4 || number == 8 ||        \
1492             number == 16)                                       \
1493             return COSTS_N_INSNS (1);                           \
1494         else                                                    \
1495         {                                                       \
1496           if (TARGET_BMU)                                       \
1497             return COSTS_N_INSNS (2);                           \
1498           else                                                  \
1499             return COSTS_N_INSNS (num_1600_core_shifts(number)); \
1500         }                                                       \
1501       }                                                         \
1502     if (TARGET_BMU)                                             \
1503       return COSTS_N_INSNS (1);                                 \
1504     else                                                        \
1505       return COSTS_N_INSNS (15);
1506
1507 /* An expression giving the cost of an addressing mode that contains
1508    address.  */
1509 #define ADDRESS_COST(ADDR)  dsp16xx_address_cost (ADDR)
1510
1511 /* A c expression for the cost of moving data from a register in
1512    class FROM to one in class TO. The classes are expressed using
1513    the enumeration values such as GENERAL_REGS. A value of 2 is
1514    the default.  */
1515 #define REGISTER_MOVE_COST(MODE,FROM,TO)  dsp16xx_register_move_cost (FROM, TO)
1516
1517 /* A C expression for the cost of moving data of mode MODE between
1518    a register and memory. A value of 2 is the default.  */
1519 #define MEMORY_MOVE_COST(MODE,CLASS,IN)                          \
1520   (GET_MODE_CLASS(MODE) == MODE_INT && MODE == QImode ? 12       \
1521    : 16)
1522
1523 /* A C expression for the cost of a branch instruction. A value of
1524    1 is the default; */
1525 #define BRANCH_COST 1
1526 \f
1527
1528 /* Define this because otherwise gcc will try to put the function address
1529    in any old pseudo register. We can only use pt.  */
1530 #define NO_FUNCTION_CSE
1531
1532 /* Define this macro as a C expression which is nonzero if accessing less
1533    than a word of memory (i.e a char or short) is no faster than accessing
1534    a word of memory, i.e if such access require more than one instruction
1535    or if ther is no difference in cost between byte and (aligned) word
1536    loads.  */
1537 #define SLOW_BYTE_ACCESS 1
1538
1539 /* Define this macro if unaligned accesses have a cost many times greater than
1540    aligned accesses, for example if they are emulated in a trap handler */
1541 /* define SLOW_UNALIGNED_ACCESS(MODE, ALIGN) */
1542
1543 /* Define this macro to inhibit strength reduction of memory addresses */
1544 /* #define DONT_REDUCE_ADDR */
1545
1546 \f
1547 /* DIVIDING THE OUTPUT IN SECTIONS */
1548 /* Output before read-only data.  */
1549
1550 #define DEFAULT_TEXT_SEG_NAME ".text"
1551 #define TEXT_SECTION_ASM_OP  rsect_text
1552
1553 /* Output before constants and strings */
1554 #define DEFAULT_CONST_SEG_NAME  ".const"
1555 #define READONLY_SECTION_ASM_OP rsect_const
1556 #define READONLY_DATA_SECTION   const_section
1557
1558 /* Output before writable data.  */
1559 #define DEFAULT_DATA_SEG_NAME ".data"
1560 #define DATA_SECTION_ASM_OP  rsect_data
1561
1562 #define DEFAULT_BSS_SEG_NAME ".bss"
1563 #define BSS_SECTION_ASM_OP rsect_bss
1564
1565 /* We will default to using 1610 if the user doesn't
1566    specify it.  */
1567 #define DEFAULT_CHIP_NAME "1610"
1568
1569 /* A list of names for sections other than the standard ones, which are
1570    'in_text' and 'in_data' (and .bss if BSS_SECTION_ASM_OP is defined).  */
1571 #define EXTRA_SECTIONS in_const
1572
1573 #define EXTRA_SECTION_FUNCTIONS  \
1574 extern void const_section PARAMS ((void));                         \
1575 void                                                               \
1576 const_section ()                                                   \
1577 {                                                                  \
1578     if (in_section != in_const)                                    \
1579     {                                                              \
1580         fprintf (asm_out_file, "%s\n", READONLY_SECTION_ASM_OP);   \
1581         in_section = in_const;                                     \
1582     }                                                              \
1583 }
1584 \f
1585 /* THE OVERALL FRAMEWORK OF AN ASSEMBLER FILE */
1586
1587 /* Output at beginning of assembler file.  */
1588 #define ASM_FILE_START(FILE) coff_dsp16xx_file_start (FILE) 
1589
1590 /* A C string constant describing how to begin a comment in the target
1591    assembler language.  */
1592 #define ASM_COMMENT_START ""
1593 #define ASM_COMMENT_END ""
1594
1595 /* Output to assembler file text saying following lines
1596    may contain character constants, extra white space, comments, etc.  */
1597 #define ASM_APP_ON ""
1598
1599 /* Output to assembler file text saying following lines
1600    no longer contain unusual constructs.  */
1601 #define ASM_APP_OFF ""
1602 \f
1603 /* OUTPUT OF DATA */
1604
1605 /* This is how we output a 'c' character string. For the 16xx
1606    assembler we have to do it one letter at a time */
1607
1608 #define ASCII_LENGTH 10
1609
1610 #define ASM_OUTPUT_ASCII(MYFILE, MYSTRING, MYLENGTH) \
1611   do {                                                                        \
1612     FILE *_hide_asm_out_file = (MYFILE);                                      \
1613     const unsigned char *_hide_p = (const unsigned char *) (MYSTRING);        \
1614     int _hide_thissize = (MYLENGTH);                                          \
1615     {                                                                         \
1616       FILE *asm_out_file = _hide_asm_out_file;                                \
1617       const unsigned char *p = _hide_p;                                       \
1618       int thissize = _hide_thissize;                                          \
1619       int i;                                                                  \
1620                                                                               \
1621       for (i = 0; i < thissize; i++)                                          \
1622         {                                                                     \
1623           register int c = p[i];                                              \
1624                                                                               \
1625           if (i % ASCII_LENGTH == 0) \
1626             fprintf (asm_out_file, "\tint ");                                 \
1627                                                                         \
1628           if (c >= ' ' && c < 0177 && c != '\'')                              \
1629           {                                                                   \
1630             putc ('\'', asm_out_file);                                        \
1631             putc (c, asm_out_file);                                           \
1632             putc ('\'', asm_out_file);                                        \
1633           }                                                                   \
1634           else                                                                \
1635             {                                                                 \
1636               fprintf (asm_out_file, "%d", c);                                \
1637               /* After an octal-escape, if a digit follows,                   \
1638                  terminate one string constant and start another.             \
1639                  The Vax assembler fails to stop reading the escape           \
1640                  after three digits, so this is the only way we               \
1641                  can get it to parse the data properly.                       \
1642               if (i < thissize - 1 && ISDIGIT (p[i + 1]))                     \
1643                 fprintf (asm_out_file, "\'\n\tint \'");                       \
1644                 */ \
1645           }                                                                   \
1646           /* if: \
1647              we are not at the last char (i != thissize -1) \
1648              and (we are not at a line break multiple  \
1649              but i == 0) (it will be the very first time) \
1650              then put out a comma to extend. \
1651            */ \
1652           if ((i != thissize - 1) && ((i + 1) % ASCII_LENGTH))        \
1653             fprintf(asm_out_file, ",");                               \
1654           if (!((i + 1) % ASCII_LENGTH)) \
1655             fprintf (asm_out_file, "\n");                             \
1656         }                                                                     \
1657       fprintf (asm_out_file, "\n");                                           \
1658     }                                                                         \
1659   }                                                                           \
1660   while (0)
1661
1662 /* Store in OUTPUT a string (made with alloca) containing
1663    an assembler-name for a local static variable or function
1664    named NAME. LABELNO is an integer which is different for
1665    each call.  */
1666
1667 #define ASM_FORMAT_PRIVATE_NAME(OUTPUT, NAME, LABELNO)                  \
1668   do {                                                                  \
1669     int len = strlen (NAME);                                            \
1670     char *temp = (char *) alloca (len + 3);                             \
1671     temp[0] = 'L';                                                      \
1672     strcpy (&temp[1], (NAME));                                          \
1673     temp[len + 1] = '_';                                                \
1674     temp[len + 2] = 0;                                                  \
1675     (OUTPUT) = (char *) alloca (strlen (NAME) + 11);                    \
1676     ASM_GENERATE_INTERNAL_LABEL (OUTPUT, temp, LABELNO);                \
1677   } while (0)
1678 \f
1679 /* OUTPUT OF UNINITIALIZED VARIABLES */
1680
1681 /* This says how to output an assembler line
1682    to define a global common symbol.  */
1683
1684 #define ASM_OUTPUT_COMMON(FILE, NAME, SIZE, ROUNDED)  \
1685   asm_output_common (FILE, NAME, SIZE, ROUNDED);
1686
1687 /* This says how to output an assembler line
1688    to define a local common symbol.  */
1689
1690 #define ASM_OUTPUT_LOCAL(FILE, NAME, SIZE, ROUNDED)  \
1691   asm_output_local (FILE, NAME, SIZE, ROUNDED);
1692 \f
1693 /* OUTPUT AND GENERATION OF LABELS */
1694
1695 /* This is how to output the definition of a user-level label named NAME,
1696    such as the label on a static function or variable NAME.  */
1697 #define ASM_OUTPUT_LABEL(FILE,NAME)     \
1698   do { assemble_name (FILE, NAME); fputs (":\n", FILE); } while (0)
1699
1700 /* This is how to output a command to make the user-level label named NAME
1701    defined for reference from other files.  */
1702
1703 #define ASM_GLOBALIZE_LABEL(FILE,NAME)  \
1704   do { fputs (".global ", FILE); assemble_name (FILE, NAME); fputs ("\n", FILE);} while (0)
1705
1706 /* A C statement to output to the stdio stream any text necessary
1707    for declaring the name of an external symbol named name which
1708    is referenced in this compilation but not defined.  */
1709
1710 #define ASM_OUTPUT_EXTERNAL(FILE, DECL, NAME)   \
1711 {                                       \
1712         fprintf (FILE, ".extern ");     \
1713         assemble_name (FILE, NAME);     \
1714         fprintf (FILE, "\n");           \
1715 }
1716 /* A C statement to output on stream an assembler pseudo-op to
1717    declare a library function named external.  */
1718
1719 #define ASM_OUTPUT_EXTERNAL_LIBCALL(FILE, FUN)    \
1720 {                                               \
1721         fprintf (FILE, ".extern ");             \
1722         assemble_name (FILE, XSTR (FUN, 0));    \
1723         fprintf (FILE, "\n");                   \
1724 }
1725
1726 /* The prefix to add to user-visible assembler symbols.  */
1727
1728 #define USER_LABEL_PREFIX "_"
1729
1730 /* This is how to output an internal numbered label where
1731    PREFIX is the class of label and NUM is the number within the class.  */
1732 #define ASM_OUTPUT_INTERNAL_LABEL(FILE,PREFIX,NUM)      \
1733   fprintf (FILE, "%s%d:\n", PREFIX, NUM)
1734
1735 /* This is how to store into the string LABEL
1736    the symbol_ref name of an internal numbered label where
1737    PREFIX is the class of label and NUM is the number within the class.
1738    This is suitable for output with `assemble_name'.  */
1739 #define ASM_GENERATE_INTERNAL_LABEL(LABEL,PREFIX,NUM)   \
1740   sprintf (LABEL, "*%s%d", PREFIX, NUM)
1741
1742 \f
1743 /* OUTPUT OF ASSEMBLER INSTRUCTIONS */
1744
1745 /* How to refer to registers in assembler output.
1746    This sequence is indexed by compiler's hard-register-number (see above).  */
1747
1748 #define REGISTER_NAMES \
1749 {"a0", "a0l", "a1", "a1l", "x", "y", "yl", "p", "pl",  \
1750  "r0", "r1", "r2",  "r3", "j", "k", "ybase", "pt",     \
1751  "ar0", "ar1", "ar2", "ar3",                           \
1752  "c0", "c1", "c2", "pr", "rb",                         \
1753  "*(0)", "*(1)", "*(2)", "*(3)", "*(4)", "*(5)",       \
1754  "*(6)", "*(7)", "*(8)", "*(9)", "*(10)", "*(11)",     \
1755  "*(12)", "*(13)", "*(14)", "*(15)", "*(16)", "*(17)", \
1756  "*(18)", "*(19)", "*(20)", "*(21)", "*(22)", "*(23)", \
1757  "*(24)", "*(25)", "*(26)", "*(27)", "*(28)", "*(29)", \
1758  "*(30)", "*(31)" }
1759
1760 #define HIMODE_REGISTER_NAMES \
1761 {"a0", "a0", "a1", "a1", "x", "y", "y", "p", "p",  \
1762  "r0", "r1", "r2",  "r3", "j", "k", "ybase", "pt",     \
1763  "ar0", "ar1", "ar2", "ar3",                           \
1764  "c0", "c1", "c2", "pr", "rb",                         \
1765  "*(0)", "*(1)", "*(2)", "*(3)", "*(4)", "*(5)",       \
1766  "*(6)", "*(7)", "*(8)", "*(9)", "*(10)", "*(11)",     \
1767  "*(12)", "*(13)", "*(14)", "*(15)", "*(16)", "*(17)", \
1768  "*(18)", "*(19)", "*(20)", "*(21)", "*(22)", "*(23)", \
1769  "*(24)", "*(25)", "*(26)", "*(27)", "*(28)", "*(29)", \
1770  "*(30)", "*(31)" }
1771
1772 #define PRINT_OPERAND_PUNCT_VALID_P(CODE)  0
1773
1774 /* Print operand X (an rtx) in assembler syntax to file FILE.
1775    CODE is a letter or dot (`z' in `%z0') or 0 if no letter was specified.
1776    For `%' followed by punctuation, CODE is the punctuation and X is null.
1777    
1778    DSP1610 extensions for operand codes:
1779
1780    %H - print lower 16 bits of constant
1781    %U - print upper 16 bits of constant
1782    %w - print low half of register (e.g 'a0l')
1783    %u - print upper half of register (e.g 'a0')
1784    %b - print high half of accumulator for F3 ALU instructions
1785    %h - print constant in decimal   */
1786
1787 #define PRINT_OPERAND(FILE, X, CODE) print_operand(FILE, X, CODE)
1788
1789
1790 /* Print a memory address as an operand to reference that memory location.  */
1791
1792 #define PRINT_OPERAND_ADDRESS(FILE, ADDR)  print_operand_address (FILE, ADDR)
1793
1794 /* This is how to output an insn to push a register on the stack.
1795    It need not be very fast code since it is used only for profiling  */
1796 #define ASM_OUTPUT_REG_PUSH(FILE,REGNO)    \
1797   internal_error ("profiling not implemented yet");
1798
1799 /* This is how to output an insn to pop a register from the stack.
1800    It need not be very fast code since it is used only for profiling  */
1801 #define ASM_OUTPUT_REG_POP(FILE,REGNO)     \
1802   internal_error ("profiling not implemented yet"); 
1803 \f
1804 /* OUTPUT OF DISPATCH TABLES */
1805
1806 /* This macro should be provided on machines where the addresses in a dispatch
1807    table are relative to the table's own address.  */
1808 #define ASM_OUTPUT_ADDR_DIFF_ELT(FILE, BODY, VALUE, REL)  \
1809   fprintf (FILE, "\tint L%d-L%d\n", VALUE, REL)
1810
1811 /* This macro should be provided on machines where the addresses in a dispatch
1812    table are absolute.  */
1813 #define ASM_OUTPUT_ADDR_VEC_ELT(FILE, VALUE)  \
1814   fprintf (FILE, "\tint L%d\n", VALUE)
1815
1816 /* ASSEMBLER COMMANDS FOR ALIGNMENT */
1817
1818 /* This is how to output an assembler line that says to advance 
1819    the location counter to a multiple of 2**LOG bytes. We should
1820    not have to do any alignment since the 1610 is a word machine.  */
1821 #define ASM_OUTPUT_ALIGN(FILE,LOG)
1822
1823 /* Define this macro if ASM_OUTPUT_SKIP should not be used in the text section
1824    because it fails to put zero1 in the bytes that are skipped.  */
1825 #define ASM_NO_SKIP_IN_TEXT 1
1826
1827 #define ASM_OUTPUT_SKIP(FILE,SIZE)  \
1828   fprintf (FILE, "\t%d * int 0\n", (SIZE))
1829
1830 /* CONTROLLING DEBUGGING INFORMATION FORMAT */
1831
1832 #define PREFERRED_DEBUGGING_TYPE DWARF2_DEBUG
1833
1834 #define ASM_OUTPUT_DEF(asm_out_file, LABEL1, LABEL2) \
1835          do {                                           \
1836          fprintf (asm_out_file, ".alias " ); \
1837          ASM_OUTPUT_LABELREF(asm_out_file, LABEL1);  \
1838          fprintf (asm_out_file, "=" ); \
1839          ASM_OUTPUT_LABELREF(asm_out_file, LABEL2); \
1840          fprintf (asm_out_file, "\n" );                 \
1841          } while (0)
1842
1843 \f
1844 /* MISCELLANEOUS PARAMETERS */
1845
1846 /* Specify the machine mode that this machine uses
1847    for the index in the tablejump instruction.  */
1848 #define CASE_VECTOR_MODE QImode
1849
1850 /* Define as C expression which evaluates to nonzero if the tablejump
1851    instruction expects the table to contain offsets from the address of the
1852    table.
1853    Do not define this if the table should contain absolute addresses.  */
1854 /* #define CASE_VECTOR_PC_RELATIVE 1 */
1855
1856 /* Max number of bytes we can move from memory to memory
1857    in one reasonably fast instruction.  */
1858 #define MOVE_MAX 1
1859
1860 /* Defining this macro causes the compiler to omit a sign-extend, zero-extend,
1861    or bitwise 'and' instruction that truncates the count of a shift operation
1862    to a width equal to the number of bits needed to represent the size of the
1863    object being shifted. Do not define this macro unless the truncation applies
1864    to both shift operations and bit-field operations (if any).  */
1865 /* #define SHIFT_COUNT_TRUNCATED */
1866
1867 /* Value is 1 if truncating an integer of INPREC bits to OUTPREC bits
1868    is done just by pretending it is already truncated.  */
1869 #define TRULY_NOOP_TRUNCATION(OUTPREC, INPREC) 1
1870
1871 /* When a prototype says `char' or `short', really pass an `int'.  */
1872 #define PROMOTE_PROTOTYPES 1
1873
1874 /* An alias for the machine mode used for pointers */
1875 #define Pmode  QImode
1876
1877 /* A function address in a call instruction
1878    is a byte address (for indexing purposes)
1879    so give the MEM rtx a byte's mode.  */
1880 #define FUNCTION_MODE  QImode
1881
1882 #if !defined(__DATE__)
1883 #define TARGET_VERSION fprintf (stderr, " (%s)", VERSION_INFO1)
1884 #else
1885 #define TARGET_VERSION fprintf (stderr, " (%s, %s)", VERSION_INFO1, __DATE__)
1886 #endif
1887
1888 #define VERSION_INFO1 "Lucent DSP16xx C Cross Compiler, version 1.3.0b"
1889
1890
1891 /* Define this as 1 if `char' should by default be signed; else as 0.  */
1892 #define DEFAULT_SIGNED_CHAR 1
1893
1894 /* Define this so gcc does not output a call to __main, since we
1895    are not currently supporting c++.  */
1896 #define INIT_SECTION_ASM_OP  1
1897