OSDN Git Service

* i386.c (asm_output_function_prefix, load_pic_register):
[pf3gnuchains/gcc-fork.git] / gcc / config / i386 / i386.h
1 /* Definitions of target machine for GNU compiler for Intel X86
2    (386, 486, Pentium).
3    Copyright (C) 1988, 92, 94, 95, 96, 97, 1998 Free Software Foundation, Inc.
4
5 This file is part of GNU CC.
6
7 GNU CC is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2, or (at your option)
10 any later version.
11
12 GNU CC is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15 GNU General Public License for more details.
16
17 You should have received a copy of the GNU General Public License
18 along with GNU CC; see the file COPYING.  If not, write to
19 the Free Software Foundation, 59 Temple Place - Suite 330,
20 Boston, MA 02111-1307, USA. */
21
22 /* The purpose of this file is to define the characteristics of the i386,
23    independent of assembler syntax or operating system.
24
25    Three other files build on this one to describe a specific assembler syntax:
26    bsd386.h, att386.h, and sun386.h.
27
28    The actual tm.h file for a particular system should include
29    this file, and then the file for the appropriate assembler syntax.
30
31    Many macros that specify assembler syntax are omitted entirely from
32    this file because they really belong in the files for particular
33    assemblers.  These include AS1, AS2, AS3, RP, IP, LPREFIX, L_SIZE,
34    PUT_OP_SIZE, USE_STAR, ADDR_BEG, ADDR_END, PRINT_IREG, PRINT_SCALE,
35    PRINT_B_I_S, and many that start with ASM_ or end in ASM_OP.  */
36
37 /* Names to predefine in the preprocessor for this target machine.  */
38
39 #define I386 1
40
41 /* Stubs for half-pic support if not OSF/1 reference platform.  */
42
43 #ifndef HALF_PIC_P
44 #define HALF_PIC_P() 0
45 #define HALF_PIC_NUMBER_PTRS 0
46 #define HALF_PIC_NUMBER_REFS 0
47 #define HALF_PIC_ENCODE(DECL)
48 #define HALF_PIC_DECLARE(NAME)
49 #define HALF_PIC_INIT() error ("half-pic init called on systems that don't support it.")
50 #define HALF_PIC_ADDRESS_P(X) 0
51 #define HALF_PIC_PTR(X) X
52 #define HALF_PIC_FINISH(STREAM)
53 #endif
54
55 /* Define the specific costs for a given cpu */
56
57 struct processor_costs {
58   int add;                      /* cost of an add instruction */
59   int lea;                      /* cost of a lea instruction */
60   int shift_var;                /* variable shift costs */
61   int shift_const;              /* constant shift costs */
62   int mult_init;                /* cost of starting a multiply */
63   int mult_bit;                 /* cost of multiply per each bit set */
64   int divide;                   /* cost of a divide/mod */
65 };
66
67 extern struct processor_costs *ix86_cost;
68
69 /* Run-time compilation parameters selecting different hardware subsets.  */
70
71 extern int target_flags;
72
73 /* Macros used in the machine description to test the flags.  */
74
75 /* configure can arrange to make this 2, to force a 486.  */
76 #ifndef TARGET_CPU_DEFAULT
77 #define TARGET_CPU_DEFAULT 0
78 #endif
79
80 /* Masks for the -m switches */
81 #define MASK_80387              000000000001    /* Hardware floating point */
82 #define MASK_NOTUSED1           000000000002    /* bit not currently used */
83 #define MASK_NOTUSED2           000000000004    /* bit not currently used */
84 #define MASK_RTD                000000000010    /* Use ret that pops args */
85 #define MASK_ALIGN_DOUBLE       000000000020    /* align doubles to 2 word boundary */
86 #define MASK_SVR3_SHLIB         000000000040    /* Uninit locals into bss */
87 #define MASK_IEEE_FP            000000000100    /* IEEE fp comparisons */
88 #define MASK_FLOAT_RETURNS      000000000200    /* Return float in st(0) */
89 #define MASK_NO_FANCY_MATH_387  000000000400    /* Disable sin, cos, sqrt */
90 #define MASK_OMIT_LEAF_FRAME_POINTER 0x00000800 /* omit leaf frame pointers */
91                                                 /* Temporary codegen switches */
92 #define MASK_DEBUG_ADDR         000001000000    /* Debug GO_IF_LEGITIMATE_ADDRESS */
93 #define MASK_NO_WIDE_MULTIPLY   000002000000    /* Disable 32x32->64 multiplies */
94 #define MASK_NO_MOVE            000004000000    /* Don't generate mem->mem */
95 #define MASK_NO_PSEUDO          000010000000    /* Move op's args -> pseudos */
96 #define MASK_DEBUG_ARG          000020000000    /* Debug function_arg */   
97 #define MASK_SCHEDULE_PROLOGUE  000040000000    /* Emit prologue as rtl */
98 #define MASK_STACK_PROBE        000100000000    /* Enable stack probing */
99
100 /* Use the floating point instructions */
101 #define TARGET_80387 (target_flags & MASK_80387)
102
103 /* Compile using ret insn that pops args.
104    This will not work unless you use prototypes at least
105    for all functions that can take varying numbers of args.  */  
106 #define TARGET_RTD (target_flags & MASK_RTD)
107
108 /* Align doubles to a two word boundary.  This breaks compatibility with
109    the published ABI's for structures containing doubles, but produces
110    faster code on the pentium.  */
111 #define TARGET_ALIGN_DOUBLE (target_flags & MASK_ALIGN_DOUBLE)
112
113 /* Put uninitialized locals into bss, not data.
114    Meaningful only on svr3.  */
115 #define TARGET_SVR3_SHLIB (target_flags & MASK_SVR3_SHLIB)
116
117 /* Use IEEE floating point comparisons.  These handle correctly the cases
118    where the result of a comparison is unordered.  Normally SIGFPE is
119    generated in such cases, in which case this isn't needed.  */
120 #define TARGET_IEEE_FP (target_flags & MASK_IEEE_FP)
121
122 /* Functions that return a floating point value may return that value
123    in the 387 FPU or in 386 integer registers.  If set, this flag causes
124    the 387 to be used, which is compatible with most calling conventions. */
125 #define TARGET_FLOAT_RETURNS_IN_80387 (target_flags & MASK_FLOAT_RETURNS)
126
127 /* Disable generation of FP sin, cos and sqrt operations for 387.
128    This is because FreeBSD lacks these in the math-emulator-code */
129 #define TARGET_NO_FANCY_MATH_387 (target_flags & MASK_NO_FANCY_MATH_387)
130
131 /* Don't create frame pointers for leaf functions */
132 #define TARGET_OMIT_LEAF_FRAME_POINTER (target_flags & MASK_OMIT_LEAF_FRAME_POINTER)
133
134 /* Temporary switches for tuning code generation */
135
136 /* Disable 32x32->64 bit multiplies that are used for long long multiplies
137    and division by constants, but sometimes cause reload problems.  */
138 #define TARGET_NO_WIDE_MULTIPLY (target_flags & MASK_NO_WIDE_MULTIPLY)
139 #define TARGET_WIDE_MULTIPLY (!TARGET_NO_WIDE_MULTIPLY)
140
141 /* Emit/Don't emit prologue as rtl */
142 #define TARGET_SCHEDULE_PROLOGUE (target_flags & MASK_SCHEDULE_PROLOGUE)
143
144 /* Debug GO_IF_LEGITIMATE_ADDRESS */
145 #define TARGET_DEBUG_ADDR (target_flags & MASK_DEBUG_ADDR)
146
147 /* Debug FUNCTION_ARG macros */
148 #define TARGET_DEBUG_ARG (target_flags & MASK_DEBUG_ARG)
149
150 /* Hack macros for tuning code generation */
151 #define TARGET_MOVE     ((target_flags & MASK_NO_MOVE) == 0)    /* Don't generate memory->memory */
152 #define TARGET_PSEUDO   ((target_flags & MASK_NO_PSEUDO) == 0)  /* Move op's args into pseudos */
153
154 #define TARGET_386 (ix86_cpu == PROCESSOR_I386)
155 #define TARGET_486 (ix86_cpu == PROCESSOR_I486)
156 #define TARGET_PENTIUM (ix86_cpu == PROCESSOR_PENTIUM)
157 #define TARGET_PENTIUMPRO (ix86_cpu == PROCESSOR_PENTIUMPRO)
158 #define TARGET_USE_LEAVE (ix86_cpu == PROCESSOR_I386)
159 #define TARGET_PUSH_MEMORY (ix86_cpu == PROCESSOR_I386)
160 #define TARGET_ZERO_EXTEND_WITH_AND (ix86_cpu != PROCESSOR_I386 \
161                                      && ix86_cpu != PROCESSOR_PENTIUMPRO)
162 #define TARGET_DOUBLE_WITH_ADD (ix86_cpu != PROCESSOR_I386)
163 #define TARGET_USE_BIT_TEST (ix86_cpu == PROCESSOR_I386)
164 #define TARGET_UNROLL_STRLEN (ix86_cpu != PROCESSOR_I386)
165 #define TARGET_USE_Q_REG (ix86_cpu == PROCESSOR_PENTIUM \
166                           || ix86_cpu == PROCESSOR_PENTIUMPRO)
167 #define TARGET_USE_ANY_REG (ix86_cpu == PROCESSOR_I486)
168 #define TARGET_CMOVE (ix86_arch == PROCESSOR_PENTIUMPRO)
169 #define TARGET_DEEP_BRANCH_PREDICTION (ix86_cpu == PROCESSOR_PENTIUMPRO)
170 #define TARGET_STACK_PROBE (target_flags & MASK_STACK_PROBE)
171
172 #define TARGET_SWITCHES                                                 \
173 { { "80387",                     MASK_80387 },                          \
174   { "no-80387",                 -MASK_80387 },                          \
175   { "hard-float",                MASK_80387 },                          \
176   { "soft-float",               -MASK_80387 },                          \
177   { "no-soft-float",             MASK_80387 },                          \
178   { "386",                       0 },                                   \
179   { "no-386",                    0 },                                   \
180   { "486",                       0 },                                   \
181   { "no-486",                    0 },                                   \
182   { "pentium",                   0 },                                   \
183   { "pentiumpro",                0 },                                   \
184   { "rtd",                       MASK_RTD },                            \
185   { "no-rtd",                   -MASK_RTD },                            \
186   { "align-double",              MASK_ALIGN_DOUBLE },                   \
187   { "no-align-double",          -MASK_ALIGN_DOUBLE },                   \
188   { "svr3-shlib",                MASK_SVR3_SHLIB },                     \
189   { "no-svr3-shlib",            -MASK_SVR3_SHLIB },                     \
190   { "ieee-fp",                   MASK_IEEE_FP },                        \
191   { "no-ieee-fp",               -MASK_IEEE_FP },                        \
192   { "fp-ret-in-387",             MASK_FLOAT_RETURNS },                  \
193   { "no-fp-ret-in-387",         -MASK_FLOAT_RETURNS },                  \
194   { "no-fancy-math-387",         MASK_NO_FANCY_MATH_387 },              \
195   { "fancy-math-387",           -MASK_NO_FANCY_MATH_387 },              \
196   { "omit-leaf-frame-pointer",   MASK_OMIT_LEAF_FRAME_POINTER },        \
197   { "no-omit-leaf-frame-pointer",-MASK_OMIT_LEAF_FRAME_POINTER },       \
198   { "no-wide-multiply",          MASK_NO_WIDE_MULTIPLY },               \
199   { "wide-multiply",            -MASK_NO_WIDE_MULTIPLY },               \
200   { "schedule-prologue",         MASK_SCHEDULE_PROLOGUE },              \
201   { "no-schedule-prologue",     -MASK_SCHEDULE_PROLOGUE },              \
202   { "debug-addr",                MASK_DEBUG_ADDR },                     \
203   { "no-debug-addr",            -MASK_DEBUG_ADDR },                     \
204   { "move",                     -MASK_NO_MOVE },                        \
205   { "no-move",                   MASK_NO_MOVE },                        \
206   { "debug-arg",                 MASK_DEBUG_ARG },                      \
207   { "no-debug-arg",             -MASK_DEBUG_ARG },                      \
208   { "stack-arg-probe",           MASK_STACK_PROBE },                    \
209   { "no-stack-arg-probe",       -MASK_STACK_PROBE },                    \
210   { "windows",                  0 },                                    \
211   { "dll",                      0 },                                    \
212   SUBTARGET_SWITCHES                                                    \
213   { "", MASK_SCHEDULE_PROLOGUE | TARGET_DEFAULT}}
214
215 /* Which processor to schedule for. The cpu attribute defines a list that
216    mirrors this list, so changes to i386.md must be made at the same time.  */
217
218 enum processor_type
219  {PROCESSOR_I386,                       /* 80386 */
220   PROCESSOR_I486,                       /* 80486DX, 80486SX, 80486DX[24] */
221   PROCESSOR_PENTIUM,
222   PROCESSOR_PENTIUMPRO};
223
224 #define PROCESSOR_I386_STRING "i386"
225 #define PROCESSOR_I486_STRING "i486"
226 #define PROCESSOR_I586_STRING "i586"
227 #define PROCESSOR_PENTIUM_STRING "pentium"
228 #define PROCESSOR_I686_STRING "i686"
229 #define PROCESSOR_PENTIUMPRO_STRING "pentiumpro"
230
231 extern enum processor_type ix86_cpu;
232
233 extern int ix86_arch;
234
235 /* Define the default processor.  This is overridden by other tm.h files.  */
236 #define PROCESSOR_DEFAULT \
237   ((enum processor_type) TARGET_CPU_DEFAULT == PROCESSOR_I486) \
238                                              ? PROCESSOR_I486  \
239   : ((enum processor_type) TARGET_CPU_DEFAULT == PROCESSOR_PENTIUM) \
240                                                ? PROCESSOR_PENTIUM  \
241   : ((enum processor_type) TARGET_CPU_DEFAULT == PROCESSOR_PENTIUMPRO) \
242                                                ? PROCESSOR_PENTIUMPRO  \
243   : PROCESSOR_I386
244 #define PROCESSOR_DEFAULT_STRING \
245   ((enum processor_type) TARGET_CPU_DEFAULT == PROCESSOR_I486) \
246                                              ? PROCESSOR_I486_STRING  \
247   : ((enum processor_type) TARGET_CPU_DEFAULT == PROCESSOR_PENTIUM) \
248                                                ? PROCESSOR_PENTIUM_STRING  \
249   : ((enum processor_type) TARGET_CPU_DEFAULT == PROCESSOR_PENTIUMPRO) \
250                                                ? PROCESSOR_PENTIUMPRO_STRING  \
251   : PROCESSOR_I386_STRING
252
253 /* This macro is similar to `TARGET_SWITCHES' but defines names of
254    command options that have values.  Its definition is an
255    initializer with a subgrouping for each command option.
256
257    Each subgrouping contains a string constant, that defines the
258    fixed part of the option name, and the address of a variable.  The
259    variable, type `char *', is set to the variable part of the given
260    option if the fixed part matches.  The actual option name is made
261    by appending `-m' to the specified name.  */
262 #define TARGET_OPTIONS                                                  \
263 { { "cpu=",             &ix86_cpu_string},                              \
264   { "arch=",            &ix86_arch_string},                             \
265   { "reg-alloc=",       &i386_reg_alloc_order },                        \
266   { "regparm=",         &i386_regparm_string },                         \
267   { "align-loops=",     &i386_align_loops_string },                     \
268   { "align-jumps=",     &i386_align_jumps_string },                     \
269   { "align-functions=", &i386_align_funcs_string },                     \
270   { "branch-cost=",     &i386_branch_cost_string },                     \
271   SUBTARGET_OPTIONS                                                     \
272 }
273
274 /* Sometimes certain combinations of command options do not make
275    sense on a particular target machine.  You can define a macro
276    `OVERRIDE_OPTIONS' to take account of this.  This macro, if
277    defined, is executed once just after all the command options have
278    been parsed.
279
280    Don't use this macro to turn on various extra optimizations for
281    `-O'.  That is what `OPTIMIZATION_OPTIONS' is for.  */
282
283 #define OVERRIDE_OPTIONS override_options ()
284
285 /* These are meant to be redefined in the host dependent files */
286 #define SUBTARGET_SWITCHES
287 #define SUBTARGET_OPTIONS
288
289 /* Define this to change the optimizations performed by default.  */
290 #define OPTIMIZATION_OPTIONS(LEVEL,SIZE) optimization_options(LEVEL,SIZE)
291
292 /* Specs for the compiler proper */
293
294 #ifndef CC1_CPU_SPEC
295 #define CC1_CPU_SPEC "\
296 %{!mcpu*: \
297 %{m386:-mcpu=i386 -march=i386} \
298 %{mno-486:-mcpu=i386 -march=i386} \
299 %{m486:-mcpu=i486 -march=i486} \
300 %{mno-386:-mcpu=i486 -march=i486} \
301 %{mno-pentium:-mcpu=i486 -march=i486} \
302 %{mpentium:-mcpu=pentium} \
303 %{mno-pentiumpro:-mcpu=pentium} \
304 %{mpentiumpro:-mcpu=pentiumpro}}"
305 #endif
306 \f
307 #ifndef CPP_CPU_SPEC
308 #ifdef __STDC__
309 #if TARGET_CPU_DEFAULT == 1
310 #define CPP_CPU_DEFAULT "-Di486"
311 #else
312 #if TARGET_CPU_DEFAULT == 2
313 #define CPP_CPU_DEFAULT "-Di586"
314 #else
315 #if TARGET_CPU_DEFAULT == 3
316 #define CPP_CPU_DEFAULT "-Di686"
317 #else
318 #define CPP_CPU_DEFAULT ""
319 #endif
320 #endif
321 #endif /* TARGET_CPU_DEFAULT */
322
323 #define CPP_CPU_SPEC "\
324 -Di386 " CPP_CPU_DEFAULT " -Asystem(unix) -Acpu(i386) -Amachine(i386) \
325 %{mcpu=i486:-Di486} %{m486:-Di486} \
326 %{mpentium:-Dpentium -Di586} %{mcpu=pentium:-Dpentium -Di586} \
327 %{mpentiumpro:-Dpentiumpro -Di686} %{mcpu=pentiumpro:-Dpentiumpro -Di686}"
328
329 #else
330 #define CPP_CPU_SPEC "\
331 -Di386 -Asystem(unix) -Acpu(i386) -Amachine(i386) \
332 %{mcpu=i486:-Di486} %{m486:-Di486} \
333 %{mpentium:-Dpentium -Di586} %{mcpu=pentium:-Dpentium -Di586} \
334 %{mpentiumpro:-Dpentiumpro -Di686} %{mcpu=pentiumpro:-Dpentiumpro -Di686}"
335 #endif /* __STDC__ */
336 #endif /* CPP_CPU_SPEC */
337
338 #ifndef CC1_SPEC
339 #define CC1_SPEC "%(cc1_spec) "
340 #endif
341
342 /* This macro defines names of additional specifications to put in the
343    specs that can be used in various specifications like CC1_SPEC.  Its
344    definition is an initializer with a subgrouping for each command option.
345
346    Each subgrouping contains a string constant, that defines the
347    specification name, and a string constant that used by the GNU CC driver
348    program.
349
350    Do not define this macro if it does not need to do anything.  */
351
352 #ifndef SUBTARGET_EXTRA_SPECS
353 #define SUBTARGET_EXTRA_SPECS
354 #endif
355
356 #define EXTRA_SPECS                                                     \
357   { "cpp_cpu",  CPP_CPU_SPEC },                                         \
358   { "cc1_cpu",  CC1_CPU_SPEC },                                         \
359   SUBTARGET_EXTRA_SPECS
360 \f
361 /* target machine storage layout */
362
363 /* Define for XFmode extended real floating point support.
364    This will automatically cause REAL_ARITHMETIC to be defined.  */
365 #define LONG_DOUBLE_TYPE_SIZE 96
366
367 /* Define if you don't want extended real, but do want to use the
368    software floating point emulator for REAL_ARITHMETIC and
369    decimal <-> binary conversion. */
370 /* #define REAL_ARITHMETIC */
371
372 /* Define this if most significant byte of a word is the lowest numbered.  */
373 /* That is true on the 80386.  */
374
375 #define BITS_BIG_ENDIAN 0
376
377 /* Define this if most significant byte of a word is the lowest numbered.  */
378 /* That is not true on the 80386.  */
379 #define BYTES_BIG_ENDIAN 0
380
381 /* Define this if most significant word of a multiword number is the lowest
382    numbered.  */
383 /* Not true for 80386 */
384 #define WORDS_BIG_ENDIAN 0
385
386 /* number of bits in an addressable storage unit */
387 #define BITS_PER_UNIT 8
388
389 /* Width in bits of a "word", which is the contents of a machine register.
390    Note that this is not necessarily the width of data type `int';
391    if using 16-bit ints on a 80386, this would still be 32.
392    But on a machine with 16-bit registers, this would be 16.  */
393 #define BITS_PER_WORD 32
394
395 /* Width of a word, in units (bytes).  */
396 #define UNITS_PER_WORD 4
397
398 /* Width in bits of a pointer.
399    See also the macro `Pmode' defined below.  */
400 #define POINTER_SIZE 32
401
402 /* Allocation boundary (in *bits*) for storing arguments in argument list.  */
403 #define PARM_BOUNDARY 32
404
405 /* Boundary (in *bits*) on which stack pointer should be aligned.  */
406 #define STACK_BOUNDARY 32
407
408 /* Allocation boundary (in *bits*) for the code of a function.
409    For i486, we get better performance by aligning to a cache
410    line (i.e. 16 byte) boundary.  */
411 #define FUNCTION_BOUNDARY (1 << (i386_align_funcs + 3))
412
413 /* Alignment of field after `int : 0' in a structure. */
414
415 #define EMPTY_FIELD_BOUNDARY 32
416
417 /* Minimum size in bits of the largest boundary to which any
418    and all fundamental data types supported by the hardware
419    might need to be aligned. No data type wants to be aligned
420    rounder than this.  The i386 supports 64-bit floating point
421    quantities, but these can be aligned on any 32-bit boundary.
422    The published ABIs say that doubles should be aligned on word
423    boundaries, but the Pentium gets better performance with them
424    aligned on 64 bit boundaries. */
425 #define BIGGEST_ALIGNMENT (TARGET_ALIGN_DOUBLE ? 64 : 32)
426
427 /* align DFmode constants and nonaggregates */
428 #define ALIGN_DFmode (!TARGET_386)
429
430 /* Set this non-zero if move instructions will actually fail to work
431    when given unaligned data.  */
432 #define STRICT_ALIGNMENT 0
433
434 /* If bit field type is int, don't let it cross an int,
435    and give entire struct the alignment of an int.  */
436 /* Required on the 386 since it doesn't have bitfield insns.  */
437 #define PCC_BITFIELD_TYPE_MATTERS 1
438
439 /* Maximum power of 2 that code can be aligned to.  */
440 #define MAX_CODE_ALIGN  6                       /* 64 byte alignment */
441
442 /* Align loop starts for optimal branching.  */
443 #define LOOP_ALIGN(LABEL) (i386_align_loops)
444
445 /* This is how to align an instruction for optimal branching.
446    On i486 we'll get better performance by aligning on a
447    cache line (i.e. 16 byte) boundary.  */
448 #define LABEL_ALIGN_AFTER_BARRIER(LABEL) (i386_align_jumps)
449
450 \f
451 /* Standard register usage.  */
452
453 /* This processor has special stack-like registers.  See reg-stack.c
454    for details. */
455
456 #define STACK_REGS
457 #define IS_STACK_MODE(mode) (mode==DFmode || mode==SFmode || mode==XFmode)
458
459 /* Number of actual hardware registers.
460    The hardware registers are assigned numbers for the compiler
461    from 0 to just below FIRST_PSEUDO_REGISTER.
462    All registers that the compiler knows about must be given numbers,
463    even those that are not normally considered general registers.
464
465    In the 80386 we give the 8 general purpose registers the numbers 0-7.
466    We number the floating point registers 8-15.
467    Note that registers 0-7 can be accessed as a  short or int,
468    while only 0-3 may be used with byte `mov' instructions.
469
470    Reg 16 does not correspond to any hardware register, but instead
471    appears in the RTL as an argument pointer prior to reload, and is
472    eliminated during reloading in favor of either the stack or frame
473    pointer. */
474
475 #define FIRST_PSEUDO_REGISTER 17
476
477 /* 1 for registers that have pervasive standard uses
478    and are not available for the register allocator.
479    On the 80386, the stack pointer is such, as is the arg pointer. */
480 #define FIXED_REGISTERS \
481 /*ax,dx,cx,bx,si,di,bp,sp,st,st1,st2,st3,st4,st5,st6,st7,arg*/       \
482 {  0, 0, 0, 0, 0, 0, 0, 1, 0,  0,  0,  0,  0,  0,  0,  0,  1 }
483
484 /* 1 for registers not available across function calls.
485    These must include the FIXED_REGISTERS and also any
486    registers that can be used without being saved.
487    The latter must include the registers where values are returned
488    and the register where structure-value addresses are passed.
489    Aside from that, you can include as many other registers as you like.  */
490
491 #define CALL_USED_REGISTERS \
492 /*ax,dx,cx,bx,si,di,bp,sp,st,st1,st2,st3,st4,st5,st6,st7,arg*/ \
493 {  1, 1, 1, 0, 0, 0, 0, 1, 1,  1,  1,  1,  1,  1,  1,  1,  1 }
494
495 /* Order in which to allocate registers.  Each register must be
496    listed once, even those in FIXED_REGISTERS.  List frame pointer
497    late and fixed registers last.  Note that, in general, we prefer
498    registers listed in CALL_USED_REGISTERS, keeping the others
499    available for storage of persistent values.
500
501    Three different versions of REG_ALLOC_ORDER have been tried:
502
503    If the order is edx, ecx, eax, ... it produces a slightly faster compiler,
504    but slower code on simple functions returning values in eax.
505
506    If the order is eax, ecx, edx, ... it causes reload to abort when compiling
507    perl 4.036 due to not being able to create a DImode register (to hold a 2
508    word union).
509
510    If the order is eax, edx, ecx, ... it produces better code for simple
511    functions, and a slightly slower compiler.  Users complained about the code
512    generated by allocating edx first, so restore the 'natural' order of things. */
513
514 #define REG_ALLOC_ORDER \
515 /*ax,dx,cx,bx,si,di,bp,sp,st,st1,st2,st3,st4,st5,st6,st7,arg*/ \
516 {  0, 1, 2, 3, 4, 5, 6, 7, 8,  9, 10, 11, 12, 13, 14, 15, 16 }
517
518 /* A C statement (sans semicolon) to choose the order in which to
519    allocate hard registers for pseudo-registers local to a basic
520    block.
521
522    Store the desired register order in the array `reg_alloc_order'.
523    Element 0 should be the register to allocate first; element 1, the
524    next register; and so on.
525
526    The macro body should not assume anything about the contents of
527    `reg_alloc_order' before execution of the macro.
528
529    On most machines, it is not necessary to define this macro.  */
530
531 #define ORDER_REGS_FOR_LOCAL_ALLOC order_regs_for_local_alloc ()
532
533 /* Macro to conditionally modify fixed_regs/call_used_regs.  */
534 #define CONDITIONAL_REGISTER_USAGE                      \
535   {                                                     \
536     if (flag_pic)                                       \
537       {                                                 \
538         fixed_regs[PIC_OFFSET_TABLE_REGNUM] = 1;        \
539         call_used_regs[PIC_OFFSET_TABLE_REGNUM] = 1;    \
540       }                                                 \
541     if (! TARGET_80387 && ! TARGET_FLOAT_RETURNS_IN_80387) \
542       {                                                 \
543         int i;                                          \
544         HARD_REG_SET x;                                 \
545         COPY_HARD_REG_SET (x, reg_class_contents[(int)FLOAT_REGS]); \
546         for (i = 0; i < FIRST_PSEUDO_REGISTER; i++ )    \
547          if (TEST_HARD_REG_BIT (x, i))                  \
548           fixed_regs[i] = call_used_regs[i] = 1;        \
549       }                                                 \
550   }
551
552 /* Return number of consecutive hard regs needed starting at reg REGNO
553    to hold something of mode MODE.
554    This is ordinarily the length in words of a value of mode MODE
555    but can be less for certain modes in special long registers.
556
557    Actually there are no two word move instructions for consecutive 
558    registers.  And only registers 0-3 may have mov byte instructions
559    applied to them.
560    */
561
562 #define HARD_REGNO_NREGS(REGNO, MODE)   \
563   (FP_REGNO_P (REGNO) ? 1 \
564    : ((GET_MODE_SIZE (MODE) + UNITS_PER_WORD - 1) / UNITS_PER_WORD))
565
566 /* Value is 1 if hard register REGNO can hold a value of machine-mode MODE.
567    On the 80386, the first 4 cpu registers can hold any mode
568    while the floating point registers may hold only floating point.
569    Make it clear that the fp regs could not hold a 16-byte float.  */
570
571 /* The casts to int placate a compiler on a microvax,
572    for cross-compiler testing.  */
573
574 #define HARD_REGNO_MODE_OK(REGNO, MODE) \
575   ((REGNO) < 2 ? 1                                              \
576    : (REGNO) < 4 ? 1                                            \
577    : FP_REGNO_P (REGNO)                                         \
578    ? (((int) GET_MODE_CLASS (MODE) == (int) MODE_FLOAT          \
579        || (int) GET_MODE_CLASS (MODE) == (int) MODE_COMPLEX_FLOAT)      \
580       && GET_MODE_UNIT_SIZE (MODE) <= (LONG_DOUBLE_TYPE_SIZE == 96 ? 12 : 8))\
581    : (int) (MODE) != (int) QImode ? 1                           \
582    : (reload_in_progress | reload_completed) == 1)
583
584 /* Value is 1 if it is a good idea to tie two pseudo registers
585    when one has mode MODE1 and one has mode MODE2.
586    If HARD_REGNO_MODE_OK could produce different values for MODE1 and MODE2,
587    for any hard reg, then this must be 0 for correct output.  */
588
589 #define MODES_TIEABLE_P(MODE1, MODE2) ((MODE1) == (MODE2))
590
591 /* Specify the registers used for certain standard purposes.
592    The values of these macros are register numbers.  */
593
594 /* on the 386 the pc register is %eip, and is not usable as a general
595    register.  The ordinary mov instructions won't work */
596 /* #define PC_REGNUM  */
597
598 /* Register to use for pushing function arguments.  */
599 #define STACK_POINTER_REGNUM 7
600
601 /* Base register for access to local variables of the function.  */
602 #define FRAME_POINTER_REGNUM 6
603
604 /* First floating point reg */
605 #define FIRST_FLOAT_REG 8
606
607 /* First & last stack-like regs */
608 #define FIRST_STACK_REG FIRST_FLOAT_REG
609 #define LAST_STACK_REG (FIRST_FLOAT_REG + 7)
610
611 /* Value should be nonzero if functions must have frame pointers.
612    Zero means the frame pointer need not be set up (and parms
613    may be accessed via the stack pointer) in functions that seem suitable.
614    This is computed in `reload', in reload1.c.  */
615 #define FRAME_POINTER_REQUIRED (TARGET_OMIT_LEAF_FRAME_POINTER && !leaf_function_p ())  
616
617 /* Base register for access to arguments of the function.  */
618 #define ARG_POINTER_REGNUM 16
619
620 /* Register in which static-chain is passed to a function.  */
621 #define STATIC_CHAIN_REGNUM 2
622
623 /* Register to hold the addressing base for position independent
624    code access to data items.  */
625 #define PIC_OFFSET_TABLE_REGNUM 3
626
627 /* Register in which address to store a structure value
628    arrives in the function.  On the 386, the prologue
629    copies this from the stack to register %eax.  */
630 #define STRUCT_VALUE_INCOMING 0
631
632 /* Place in which caller passes the structure value address.
633    0 means push the value on the stack like an argument.  */
634 #define STRUCT_VALUE 0
635
636 /* A C expression which can inhibit the returning of certain function
637    values in registers, based on the type of value.  A nonzero value
638    says to return the function value in memory, just as large
639    structures are always returned.  Here TYPE will be a C expression
640    of type `tree', representing the data type of the value.
641
642    Note that values of mode `BLKmode' must be explicitly handled by
643    this macro.  Also, the option `-fpcc-struct-return' takes effect
644    regardless of this macro.  On most systems, it is possible to
645    leave the macro undefined; this causes a default definition to be
646    used, whose value is the constant 1 for `BLKmode' values, and 0
647    otherwise.
648
649    Do not use this macro to indicate that structures and unions
650    should always be returned in memory.  You should instead use
651    `DEFAULT_PCC_STRUCT_RETURN' to indicate this.  */
652
653 #define RETURN_IN_MEMORY(TYPE) \
654   ((TYPE_MODE (TYPE) == BLKmode) || int_size_in_bytes (TYPE) > 12)
655
656 \f
657 /* Define the classes of registers for register constraints in the
658    machine description.  Also define ranges of constants.
659
660    One of the classes must always be named ALL_REGS and include all hard regs.
661    If there is more than one class, another class must be named NO_REGS
662    and contain no registers.
663
664    The name GENERAL_REGS must be the name of a class (or an alias for
665    another name such as ALL_REGS).  This is the class of registers
666    that is allowed by "g" or "r" in a register constraint.
667    Also, registers outside this class are allocated only when
668    instructions express preferences for them.
669
670    The classes must be numbered in nondecreasing order; that is,
671    a larger-numbered class must never be contained completely
672    in a smaller-numbered class.
673
674    For any two classes, it is very desirable that there be another
675    class that represents their union.
676
677    It might seem that class BREG is unnecessary, since no useful 386
678    opcode needs reg %ebx.  But some systems pass args to the OS in ebx,
679    and the "b" register constraint is useful in asms for syscalls.  */
680
681 enum reg_class
682 {
683   NO_REGS,
684   AREG, DREG, CREG, BREG,
685   AD_REGS,                      /* %eax/%edx for DImode */
686   Q_REGS,                       /* %eax %ebx %ecx %edx */
687   SIREG, DIREG,
688   INDEX_REGS,                   /* %eax %ebx %ecx %edx %esi %edi %ebp */
689   GENERAL_REGS,                 /* %eax %ebx %ecx %edx %esi %edi %ebp %esp */
690   FP_TOP_REG, FP_SECOND_REG,    /* %st(0) %st(1) */
691   FLOAT_REGS,
692   ALL_REGS, LIM_REG_CLASSES
693 };
694
695 #define N_REG_CLASSES (int) LIM_REG_CLASSES
696
697 #define FLOAT_CLASS_P(CLASS) (reg_class_subset_p (CLASS, FLOAT_REGS))
698
699 /* Give names of register classes as strings for dump file.   */
700
701 #define REG_CLASS_NAMES \
702 {  "NO_REGS",                           \
703    "AREG", "DREG", "CREG", "BREG",      \
704    "AD_REGS",                           \
705    "Q_REGS",                            \
706    "SIREG", "DIREG",                    \
707    "INDEX_REGS",                        \
708    "GENERAL_REGS",                      \
709    "FP_TOP_REG", "FP_SECOND_REG",       \
710    "FLOAT_REGS",                        \
711    "ALL_REGS" }
712
713 /* Define which registers fit in which classes.
714    This is an initializer for a vector of HARD_REG_SET
715    of length N_REG_CLASSES.  */
716
717 #define REG_CLASS_CONTENTS \
718 {      0,                                                       \
719      0x1,    0x2,  0x4,  0x8,   /* AREG, DREG, CREG, BREG */    \
720      0x3,                       /* AD_REGS */                   \
721      0xf,                       /* Q_REGS */                    \
722     0x10,   0x20,               /* SIREG, DIREG */              \
723  0x7f,                          /* INDEX_REGS */                \
724  0x100ff,                       /* GENERAL_REGS */              \
725   0x0100, 0x0200,               /* FP_TOP_REG, FP_SECOND_REG */ \
726   0xff00,                       /* FLOAT_REGS */                \
727  0x1ffff }
728
729 /* The same information, inverted:
730    Return the class number of the smallest class containing
731    reg number REGNO.  This could be a conditional expression
732    or could index an array.  */
733
734 #define REGNO_REG_CLASS(REGNO) (regclass_map[REGNO])
735
736 /* When defined, the compiler allows registers explicitly used in the
737    rtl to be used as spill registers but prevents the compiler from
738    extending the lifetime of these registers. */
739
740 #define SMALL_REGISTER_CLASSES 1
741
742 #define QI_REG_P(X) \
743   (REG_P (X) && REGNO (X) < 4)
744 #define NON_QI_REG_P(X) \
745   (REG_P (X) && REGNO (X) >= 4 && REGNO (X) < FIRST_PSEUDO_REGISTER)
746
747 #define FP_REG_P(X) (REG_P (X) && FP_REGNO_P (REGNO (X)))
748 #define FP_REGNO_P(n) ((n) >= FIRST_STACK_REG && (n) <= LAST_STACK_REG)
749   
750 #define STACK_REG_P(xop) (REG_P (xop) &&                        \
751                           REGNO (xop) >= FIRST_STACK_REG &&     \
752                           REGNO (xop) <= LAST_STACK_REG)
753
754 #define NON_STACK_REG_P(xop) (REG_P (xop) && ! STACK_REG_P (xop))
755
756 #define STACK_TOP_P(xop) (REG_P (xop) && REGNO (xop) == FIRST_STACK_REG)
757
758 /* Try to maintain the accuracy of the death notes for regs satisfying the
759    following.  Important for stack like regs, to know when to pop. */
760
761 /* #define PRESERVE_DEATH_INFO_REGNO_P(x) FP_REGNO_P(x) */
762
763 /* 1 if register REGNO can magically overlap other regs.
764    Note that nonzero values work only in very special circumstances. */
765
766 /* #define OVERLAPPING_REGNO_P(REGNO) FP_REGNO_P (REGNO) */
767
768 /* The class value for index registers, and the one for base regs.  */
769
770 #define INDEX_REG_CLASS INDEX_REGS
771 #define BASE_REG_CLASS GENERAL_REGS
772
773 /* Get reg_class from a letter such as appears in the machine description.  */
774
775 #define REG_CLASS_FROM_LETTER(C)        \
776   ((C) == 'r' ? GENERAL_REGS :                                  \
777    (C) == 'q' ? Q_REGS :                                        \
778    (C) == 'f' ? (TARGET_80387 || TARGET_FLOAT_RETURNS_IN_80387  \
779                  ? FLOAT_REGS                                   \
780                  : NO_REGS) :                                   \
781    (C) == 't' ? (TARGET_80387 || TARGET_FLOAT_RETURNS_IN_80387  \
782                  ? FP_TOP_REG                                   \
783                  : NO_REGS) :                                   \
784    (C) == 'u' ? (TARGET_80387 || TARGET_FLOAT_RETURNS_IN_80387  \
785                  ? FP_SECOND_REG                                \
786                  : NO_REGS) :                                   \
787    (C) == 'a' ? AREG :                                          \
788    (C) == 'b' ? BREG :                                          \
789    (C) == 'c' ? CREG :                                          \
790    (C) == 'd' ? DREG :                                          \
791    (C) == 'A' ? AD_REGS :                                       \
792    (C) == 'D' ? DIREG :                                         \
793    (C) == 'S' ? SIREG : NO_REGS)
794
795 /* The letters I, J, K, L and M in a register constraint string
796    can be used to stand for particular ranges of immediate operands.
797    This macro defines what the ranges are.
798    C is the letter, and VALUE is a constant value.
799    Return 1 if VALUE is in the range specified by C.
800
801    I is for non-DImode shifts.
802    J is for DImode shifts.
803    K and L are for an `andsi' optimization.
804    M is for shifts that can be executed by the "lea" opcode.
805    */
806
807 #define CONST_OK_FOR_LETTER_P(VALUE, C)  \
808   ((C) == 'I' ? (VALUE) >= 0 && (VALUE) <= 31 : \
809    (C) == 'J' ? (VALUE) >= 0 && (VALUE) <= 63 : \
810    (C) == 'K' ? (VALUE) == 0xff :               \
811    (C) == 'L' ? (VALUE) == 0xffff :             \
812    (C) == 'M' ? (VALUE) >= 0 && (VALUE) <= 3 :  \
813    (C) == 'N' ? (VALUE) >= 0 && (VALUE) <= 255 :\
814    (C) == 'O' ? (VALUE) >= 0 && (VALUE) <= 32 : \
815    0)
816
817 /* Similar, but for floating constants, and defining letters G and H.
818    Here VALUE is the CONST_DOUBLE rtx itself.  We allow constants even if
819    TARGET_387 isn't set, because the stack register converter may need to
820    load 0.0 into the function value register. */
821
822 #define CONST_DOUBLE_OK_FOR_LETTER_P(VALUE, C)  \
823   ((C) == 'G' ? standard_80387_constant_p (VALUE) : 0)
824
825 /* Place additional restrictions on the register class to use when it
826    is necessary to be able to hold a value of mode MODE in a reload
827    register for which class CLASS would ordinarily be used. */
828
829 #define LIMIT_RELOAD_CLASS(MODE, CLASS) \
830   ((MODE) == QImode && ((CLASS) == ALL_REGS || (CLASS) == GENERAL_REGS) \
831    ? Q_REGS : (CLASS))
832
833 /* Given an rtx X being reloaded into a reg required to be
834    in class CLASS, return the class of reg to actually use.
835    In general this is just CLASS; but on some machines
836    in some cases it is preferable to use a more restrictive class.
837    On the 80386 series, we prevent floating constants from being
838    reloaded into floating registers (since no move-insn can do that)
839    and we ensure that QImodes aren't reloaded into the esi or edi reg.  */
840
841 /* Put float CONST_DOUBLE in the constant pool instead of fp regs.
842    QImode must go into class Q_REGS.
843    Narrow ALL_REGS to GENERAL_REGS.  This supports allowing movsf and
844    movdf to do mem-to-mem moves through integer regs. */
845
846 #define PREFERRED_RELOAD_CLASS(X,CLASS) \
847   (GET_CODE (X) == CONST_DOUBLE && GET_MODE (X) != VOIDmode ? NO_REGS   \
848    : GET_MODE (X) == QImode && ! reg_class_subset_p (CLASS, Q_REGS) ? Q_REGS \
849    : ((CLASS) == ALL_REGS                                               \
850       && GET_MODE_CLASS (GET_MODE (X)) == MODE_FLOAT) ? GENERAL_REGS    \
851    : (CLASS))
852
853 /* If we are copying between general and FP registers, we need a memory
854    location.  */
855
856 #define SECONDARY_MEMORY_NEEDED(CLASS1,CLASS2,MODE) \
857   ((FLOAT_CLASS_P (CLASS1) && ! FLOAT_CLASS_P (CLASS2)) \
858    || (! FLOAT_CLASS_P (CLASS1) && FLOAT_CLASS_P (CLASS2)))
859
860 /* Return the maximum number of consecutive registers
861    needed to represent mode MODE in a register of class CLASS.  */
862 /* On the 80386, this is the size of MODE in words,
863    except in the FP regs, where a single reg is always enough.  */
864 #define CLASS_MAX_NREGS(CLASS, MODE)    \
865  (FLOAT_CLASS_P (CLASS) ? 1 :           \
866   ((GET_MODE_SIZE (MODE) + UNITS_PER_WORD - 1) / UNITS_PER_WORD))
867
868 /* A C expression whose value is nonzero if pseudos that have been
869    assigned to registers of class CLASS would likely be spilled
870    because registers of CLASS are needed for spill registers.
871
872    The default value of this macro returns 1 if CLASS has exactly one
873    register and zero otherwise.  On most machines, this default
874    should be used.  Only define this macro to some other expression
875    if pseudo allocated by `local-alloc.c' end up in memory because
876    their hard registers were needed for spill registers.  If this
877    macro returns nonzero for those classes, those pseudos will only
878    be allocated by `global.c', which knows how to reallocate the
879    pseudo to another register.  If there would not be another
880    register available for reallocation, you should not change the
881    definition of this macro since the only effect of such a
882    definition would be to slow down register allocation.  */
883
884 #define CLASS_LIKELY_SPILLED_P(CLASS)                                   \
885   (((CLASS) == AREG)                                                    \
886    || ((CLASS) == DREG)                                                 \
887    || ((CLASS) == CREG)                                                 \
888    || ((CLASS) == BREG)                                                 \
889    || ((CLASS) == AD_REGS)                                              \
890    || ((CLASS) == SIREG)                                                \
891    || ((CLASS) == DIREG))
892
893 \f
894 /* Stack layout; function entry, exit and calling.  */
895
896 /* Define this if pushing a word on the stack
897    makes the stack pointer a smaller address.  */
898 #define STACK_GROWS_DOWNWARD
899
900 /* Define this if the nominal address of the stack frame
901    is at the high-address end of the local variables;
902    that is, each additional local variable allocated
903    goes at a more negative offset in the frame.  */
904 #define FRAME_GROWS_DOWNWARD
905
906 /* Offset within stack frame to start allocating local variables at.
907    If FRAME_GROWS_DOWNWARD, this is the offset to the END of the
908    first local allocated.  Otherwise, it is the offset to the BEGINNING
909    of the first local allocated.  */
910 #define STARTING_FRAME_OFFSET 0
911
912 /* If we generate an insn to push BYTES bytes,
913    this says how many the stack pointer really advances by.
914    On 386 pushw decrements by exactly 2 no matter what the position was.
915    On the 386 there is no pushb; we use pushw instead, and this
916    has the effect of rounding up to 2.  */
917
918 #define PUSH_ROUNDING(BYTES) (((BYTES) + 1) & (-2))
919
920 /* Offset of first parameter from the argument pointer register value.  */
921 #define FIRST_PARM_OFFSET(FNDECL) 0
922
923 /* Value is the number of bytes of arguments automatically
924    popped when returning from a subroutine call.
925    FUNDECL is the declaration node of the function (as a tree),
926    FUNTYPE is the data type of the function (as a tree),
927    or for a library call it is an identifier node for the subroutine name.
928    SIZE is the number of bytes of arguments passed on the stack.
929
930    On the 80386, the RTD insn may be used to pop them if the number
931      of args is fixed, but if the number is variable then the caller
932      must pop them all.  RTD can't be used for library calls now
933      because the library is compiled with the Unix compiler.
934    Use of RTD is a selectable option, since it is incompatible with
935    standard Unix calling sequences.  If the option is not selected,
936    the caller must always pop the args.
937
938    The attribute stdcall is equivalent to RTD on a per module basis.  */
939
940 #define RETURN_POPS_ARGS(FUNDECL,FUNTYPE,SIZE) \
941   (i386_return_pops_args (FUNDECL, FUNTYPE, SIZE))
942
943 /* Define how to find the value returned by a function.
944    VALTYPE is the data type of the value (as a tree).
945    If the precise function being called is known, FUNC is its FUNCTION_DECL;
946    otherwise, FUNC is 0.  */
947 #define FUNCTION_VALUE(VALTYPE, FUNC)  \
948    gen_rtx_REG (TYPE_MODE (VALTYPE), \
949             VALUE_REGNO (TYPE_MODE (VALTYPE)))
950
951 /* Define how to find the value returned by a library function
952    assuming the value has mode MODE.  */
953
954 #define LIBCALL_VALUE(MODE) \
955   gen_rtx_REG (MODE, VALUE_REGNO (MODE))
956
957 /* Define the size of the result block used for communication between
958    untyped_call and untyped_return.  The block contains a DImode value
959    followed by the block used by fnsave and frstor.  */
960
961 #define APPLY_RESULT_SIZE (8+108)
962
963 /* 1 if N is a possible register number for function argument passing.  */
964 #define FUNCTION_ARG_REGNO_P(N) ((N) >= 0 && (N) < REGPARM_MAX)
965
966 /* Define a data type for recording info about an argument list
967    during the scan of that argument list.  This data type should
968    hold all necessary information about the function itself
969    and about the args processed so far, enough to enable macros
970    such as FUNCTION_ARG to determine where the next arg should go.  */
971
972 typedef struct i386_args {
973   int words;                    /* # words passed so far */
974   int nregs;                    /* # registers available for passing */
975   int regno;                    /* next available register number */
976 } CUMULATIVE_ARGS;
977
978 /* Initialize a variable CUM of type CUMULATIVE_ARGS
979    for a call to a function whose data type is FNTYPE.
980    For a library call, FNTYPE is 0.  */
981
982 #define INIT_CUMULATIVE_ARGS(CUM,FNTYPE,LIBNAME,INDIRECT)       \
983   (init_cumulative_args (&CUM, FNTYPE, LIBNAME))
984
985 /* Update the data in CUM to advance over an argument
986    of mode MODE and data type TYPE.
987    (TYPE is null for libcalls where that information may not be available.)  */
988
989 #define FUNCTION_ARG_ADVANCE(CUM, MODE, TYPE, NAMED)    \
990   (function_arg_advance (&CUM, MODE, TYPE, NAMED))
991
992 /* Define where to put the arguments to a function.
993    Value is zero to push the argument on the stack,
994    or a hard register in which to store the argument.
995
996    MODE is the argument's machine mode.
997    TYPE is the data type of the argument (as a tree).
998     This is null for libcalls where that information may
999     not be available.
1000    CUM is a variable of type CUMULATIVE_ARGS which gives info about
1001     the preceding args and about the function being called.
1002    NAMED is nonzero if this argument is a named parameter
1003     (otherwise it is an extra parameter matching an ellipsis).  */
1004
1005 #define FUNCTION_ARG(CUM, MODE, TYPE, NAMED) \
1006   (function_arg (&CUM, MODE, TYPE, NAMED))
1007
1008 /* For an arg passed partly in registers and partly in memory,
1009    this is the number of registers used.
1010    For args passed entirely in registers or entirely in memory, zero.  */
1011
1012 #define FUNCTION_ARG_PARTIAL_NREGS(CUM, MODE, TYPE, NAMED) \
1013   (function_arg_partial_nregs (&CUM, MODE, TYPE, NAMED))
1014
1015 /* This macro is invoked just before the start of a function.
1016    It is used here to output code for -fpic that will load the
1017    return address into %ebx.  */
1018
1019 #undef ASM_OUTPUT_FUNCTION_PREFIX
1020 #define ASM_OUTPUT_FUNCTION_PREFIX(FILE, FNNAME) \
1021   asm_output_function_prefix (FILE, FNNAME)
1022
1023 /* This macro generates the assembly code for function entry.
1024    FILE is a stdio stream to output the code to.
1025    SIZE is an int: how many units of temporary storage to allocate.
1026    Refer to the array `regs_ever_live' to determine which registers
1027    to save; `regs_ever_live[I]' is nonzero if register number I
1028    is ever used in the function.  This macro is responsible for
1029    knowing which registers should not be saved even if used.  */
1030
1031 #define FUNCTION_PROLOGUE(FILE, SIZE)     \
1032   function_prologue (FILE, SIZE)
1033
1034 /* Output assembler code to FILE to increment profiler label # LABELNO
1035    for profiling a function entry.  */
1036
1037 #define FUNCTION_PROFILER(FILE, LABELNO)  \
1038 {                                                                       \
1039   if (flag_pic)                                                         \
1040     {                                                                   \
1041       fprintf (FILE, "\tleal %sP%d@GOTOFF(%%ebx),%%edx\n",              \
1042                LPREFIX, (LABELNO));                                     \
1043       fprintf (FILE, "\tcall *_mcount@GOT(%%ebx)\n");                   \
1044     }                                                                   \
1045   else                                                                  \
1046     {                                                                   \
1047       fprintf (FILE, "\tmovl $%sP%d,%%edx\n", LPREFIX, (LABELNO));      \
1048       fprintf (FILE, "\tcall _mcount\n");                               \
1049     }                                                                   \
1050 }
1051
1052
1053 /* There are three profiling modes for basic blocks available.
1054    The modes are selected at compile time by using the options
1055    -a or -ax of the gnu compiler.
1056    The variable `profile_block_flag' will be set according to the
1057    selected option.
1058
1059    profile_block_flag == 0, no option used:
1060
1061       No profiling done.
1062
1063    profile_block_flag == 1, -a option used.
1064
1065       Count frequency of execution of every basic block.
1066
1067    profile_block_flag == 2, -ax option used.
1068
1069       Generate code to allow several different profiling modes at run time. 
1070       Available modes are:
1071              Produce a trace of all basic blocks.
1072              Count frequency of jump instructions executed.
1073       In every mode it is possible to start profiling upon entering
1074       certain functions and to disable profiling of some other functions.
1075
1076     The result of basic-block profiling will be written to a file `bb.out'.
1077     If the -ax option is used parameters for the profiling will be read
1078     from file `bb.in'.
1079
1080 */
1081
1082 /* The following macro shall output assembler code to FILE
1083    to initialize basic-block profiling.
1084
1085    If profile_block_flag == 2
1086
1087         Output code to call the subroutine `__bb_init_trace_func'
1088         and pass two parameters to it. The first parameter is
1089         the address of a block allocated in the object module.
1090         The second parameter is the number of the first basic block
1091         of the function.
1092
1093         The name of the block is a local symbol made with this statement:
1094         
1095             ASM_GENERATE_INTERNAL_LABEL (BUFFER, "LPBX", 0);
1096
1097         Of course, since you are writing the definition of
1098         `ASM_GENERATE_INTERNAL_LABEL' as well as that of this macro, you
1099         can take a short cut in the definition of this macro and use the
1100         name that you know will result.
1101
1102         The number of the first basic block of the function is
1103         passed to the macro in BLOCK_OR_LABEL.
1104
1105         If described in a virtual assembler language the code to be
1106         output looks like:
1107
1108                 parameter1 <- LPBX0
1109                 parameter2 <- BLOCK_OR_LABEL
1110                 call __bb_init_trace_func
1111
1112     else if profile_block_flag != 0
1113
1114         Output code to call the subroutine `__bb_init_func'
1115         and pass one single parameter to it, which is the same
1116         as the first parameter to `__bb_init_trace_func'.
1117
1118         The first word of this parameter is a flag which will be nonzero if
1119         the object module has already been initialized.  So test this word
1120         first, and do not call `__bb_init_func' if the flag is nonzero.
1121         Note: When profile_block_flag == 2 the test need not be done
1122         but `__bb_init_trace_func' *must* be called.
1123
1124         BLOCK_OR_LABEL may be used to generate a label number as a
1125         branch destination in case `__bb_init_func' will not be called.
1126
1127         If described in a virtual assembler language the code to be
1128         output looks like:
1129
1130                 cmp (LPBX0),0
1131                 jne local_label
1132                 parameter1 <- LPBX0
1133                 call __bb_init_func
1134 local_label:
1135
1136 */
1137
1138 #undef  FUNCTION_BLOCK_PROFILER
1139 #define FUNCTION_BLOCK_PROFILER(FILE, BLOCK_OR_LABEL)                   \
1140 do                                                                      \
1141   {                                                                     \
1142     static int num_func = 0;                                            \
1143     rtx xops[8];                                                        \
1144     char block_table[80], false_label[80];                              \
1145                                                                         \
1146     ASM_GENERATE_INTERNAL_LABEL (block_table, "LPBX", 0);               \
1147                                                                         \
1148     xops[1] = gen_rtx_SYMBOL_REF (VOIDmode, block_table);               \
1149     xops[5] = stack_pointer_rtx;                                        \
1150     xops[7] = gen_rtx_REG (Pmode, 0);   /* eax */                       \
1151                                                                         \
1152     CONSTANT_POOL_ADDRESS_P (xops[1]) = TRUE;                           \
1153                                                                         \
1154     switch (profile_block_flag)                                         \
1155       {                                                                 \
1156                                                                         \
1157       case 2:                                                           \
1158                                                                         \
1159         xops[2] = GEN_INT ((BLOCK_OR_LABEL));                           \
1160         xops[3] = gen_rtx_MEM (Pmode, gen_rtx_SYMBOL_REF (VOIDmode, "__bb_init_trace_func")); \
1161         xops[6] = GEN_INT (8);                                          \
1162                                                                         \
1163         output_asm_insn (AS1(push%L2,%2), xops);                        \
1164         if (!flag_pic)                                                  \
1165           output_asm_insn (AS1(push%L1,%1), xops);                      \
1166         else                                                            \
1167           {                                                             \
1168             output_asm_insn (AS2 (lea%L7,%a1,%7), xops);                \
1169             output_asm_insn (AS1 (push%L7,%7), xops);                   \
1170           }                                                             \
1171                                                                         \
1172         output_asm_insn (AS1(call,%P3), xops);                          \
1173         output_asm_insn (AS2(add%L0,%6,%5), xops);                      \
1174                                                                         \
1175         break;                                                          \
1176                                                                         \
1177       default:                                                          \
1178                                                                         \
1179         ASM_GENERATE_INTERNAL_LABEL (false_label, "LPBZ", num_func);    \
1180                                                                         \
1181         xops[0] = const0_rtx;                                           \
1182         xops[2] = gen_rtx_MEM (Pmode, gen_rtx_SYMBOL_REF (VOIDmode, false_label)); \
1183         xops[3] = gen_rtx_MEM (Pmode, gen_rtx_SYMBOL_REF (VOIDmode, "__bb_init_func")); \
1184         xops[4] = gen_rtx_MEM (Pmode, xops[1]);                 \
1185         xops[6] = GEN_INT (4);                                          \
1186                                                                         \
1187         CONSTANT_POOL_ADDRESS_P (xops[2]) = TRUE;                       \
1188                                                                         \
1189         output_asm_insn (AS2(cmp%L4,%0,%4), xops);                      \
1190         output_asm_insn (AS1(jne,%2), xops);                            \
1191                                                                         \
1192         if (!flag_pic)                                                  \
1193           output_asm_insn (AS1(push%L1,%1), xops);                      \
1194         else                                                            \
1195           {                                                             \
1196             output_asm_insn (AS2 (lea%L7,%a1,%7), xops);                \
1197             output_asm_insn (AS1 (push%L7,%7), xops);                   \
1198           }                                                             \
1199                                                                         \
1200         output_asm_insn (AS1(call,%P3), xops);                          \
1201         output_asm_insn (AS2(add%L0,%6,%5), xops);                      \
1202         ASM_OUTPUT_INTERNAL_LABEL (FILE, "LPBZ", num_func);             \
1203         num_func++;                                                     \
1204                                                                         \
1205         break;                                                          \
1206                                                                         \
1207     }                                                                   \
1208   }                                                                     \
1209 while (0)
1210
1211 /* The following macro shall output assembler code to FILE
1212    to increment a counter associated with basic block number BLOCKNO.
1213
1214    If profile_block_flag == 2
1215
1216         Output code to initialize the global structure `__bb' and
1217         call the function `__bb_trace_func' which will increment the
1218         counter.
1219
1220         `__bb' consists of two words. In the first word the number
1221         of the basic block has to be stored. In the second word
1222         the address of a block allocated in the object module 
1223         has to be stored.
1224
1225         The basic block number is given by BLOCKNO.
1226
1227         The address of the block is given by the label created with 
1228
1229             ASM_GENERATE_INTERNAL_LABEL (BUFFER, "LPBX", 0);
1230
1231         by FUNCTION_BLOCK_PROFILER.
1232
1233         Of course, since you are writing the definition of
1234         `ASM_GENERATE_INTERNAL_LABEL' as well as that of this macro, you
1235         can take a short cut in the definition of this macro and use the
1236         name that you know will result.
1237
1238         If described in a virtual assembler language the code to be
1239         output looks like:
1240
1241                 move BLOCKNO -> (__bb)
1242                 move LPBX0 -> (__bb+4)
1243                 call __bb_trace_func
1244
1245         Note that function `__bb_trace_func' must not change the
1246         machine state, especially the flag register. To grant
1247         this, you must output code to save and restore registers
1248         either in this macro or in the macros MACHINE_STATE_SAVE
1249         and MACHINE_STATE_RESTORE. The last two macros will be
1250         used in the function `__bb_trace_func', so you must make
1251         sure that the function prologue does not change any 
1252         register prior to saving it with MACHINE_STATE_SAVE.
1253
1254    else if profile_block_flag != 0
1255
1256         Output code to increment the counter directly.
1257         Basic blocks are numbered separately from zero within each
1258         compiled object module. The count associated with block number
1259         BLOCKNO is at index BLOCKNO in an array of words; the name of 
1260         this array is a local symbol made with this statement:
1261
1262             ASM_GENERATE_INTERNAL_LABEL (BUFFER, "LPBX", 2);
1263
1264         Of course, since you are writing the definition of
1265         `ASM_GENERATE_INTERNAL_LABEL' as well as that of this macro, you
1266         can take a short cut in the definition of this macro and use the
1267         name that you know will result. 
1268
1269         If described in a virtual assembler language the code to be
1270         output looks like:
1271
1272                 inc (LPBX2+4*BLOCKNO)
1273
1274 */
1275
1276 #define BLOCK_PROFILER(FILE, BLOCKNO)                                   \
1277 do                                                                      \
1278   {                                                                     \
1279     rtx xops[8], cnt_rtx;                                               \
1280     char counts[80];                                                    \
1281     char *block_table = counts;                                         \
1282                                                                         \
1283     switch (profile_block_flag)                                         \
1284       {                                                                 \
1285                                                                         \
1286       case 2:                                                           \
1287                                                                         \
1288         ASM_GENERATE_INTERNAL_LABEL (block_table, "LPBX", 0);           \
1289                                                                         \
1290         xops[1] = gen_rtx_SYMBOL_REF (VOIDmode, block_table);           \
1291         xops[2] = GEN_INT ((BLOCKNO));                                  \
1292         xops[3] = gen_rtx_MEM (Pmode, gen_rtx_SYMBOL_REF (VOIDmode, "__bb_trace_func")); \
1293         xops[4] = gen_rtx_SYMBOL_REF (VOIDmode, "__bb");                \
1294         xops[5] = plus_constant (xops[4], 4);                           \
1295         xops[0] = gen_rtx_MEM (SImode, xops[4]);                        \
1296         xops[6] = gen_rtx_MEM (SImode, xops[5]);                        \
1297                                                                         \
1298         CONSTANT_POOL_ADDRESS_P (xops[1]) = TRUE;                       \
1299                                                                         \
1300         fprintf(FILE, "\tpushf\n");                                     \
1301         output_asm_insn (AS2(mov%L0,%2,%0), xops);                      \
1302         if (flag_pic)                                                   \
1303           {                                                             \
1304             xops[7] = gen_rtx_REG (Pmode, 0);   /* eax */               \
1305             output_asm_insn (AS1(push%L7,%7), xops);                    \
1306             output_asm_insn (AS2(lea%L7,%a1,%7), xops);                 \
1307             output_asm_insn (AS2(mov%L6,%7,%6), xops);                  \
1308             output_asm_insn (AS1(pop%L7,%7), xops);                     \
1309           }                                                             \
1310         else                                                            \
1311           output_asm_insn (AS2(mov%L6,%1,%6), xops);                    \
1312         output_asm_insn (AS1(call,%P3), xops);                          \
1313         fprintf(FILE, "\tpopf\n");                                      \
1314                                                                         \
1315         break;                                                          \
1316                                                                         \
1317       default:                                                          \
1318                                                                         \
1319         ASM_GENERATE_INTERNAL_LABEL (counts, "LPBX", 2);                \
1320         cnt_rtx = gen_rtx_SYMBOL_REF (VOIDmode, counts);                \
1321         SYMBOL_REF_FLAG (cnt_rtx) = TRUE;                               \
1322                                                                         \
1323         if (BLOCKNO)                                                    \
1324           cnt_rtx = plus_constant (cnt_rtx, (BLOCKNO)*4);               \
1325                                                                         \
1326         if (flag_pic)                                                   \
1327           cnt_rtx = gen_rtx_PLUS (Pmode, pic_offset_table_rtx, cnt_rtx);        \
1328                                                                         \
1329         xops[0] = gen_rtx_MEM (SImode, cnt_rtx);                        \
1330         output_asm_insn (AS1(inc%L0,%0), xops);                         \
1331                                                                         \
1332         break;                                                          \
1333                                                                         \
1334     }                                                                   \
1335   }                                                                     \
1336 while (0)
1337
1338 /* The following macro shall output assembler code to FILE
1339    to indicate a return from function during basic-block profiling.
1340
1341    If profiling_block_flag == 2:
1342
1343         Output assembler code to call function `__bb_trace_ret'.
1344
1345         Note that function `__bb_trace_ret' must not change the
1346         machine state, especially the flag register. To grant
1347         this, you must output code to save and restore registers
1348         either in this macro or in the macros MACHINE_STATE_SAVE_RET
1349         and MACHINE_STATE_RESTORE_RET. The last two macros will be
1350         used in the function `__bb_trace_ret', so you must make
1351         sure that the function prologue does not change any 
1352         register prior to saving it with MACHINE_STATE_SAVE_RET.
1353
1354    else if profiling_block_flag != 0:
1355
1356         The macro will not be used, so it need not distinguish
1357         these cases.
1358 */
1359
1360 #define FUNCTION_BLOCK_PROFILER_EXIT(FILE) \
1361 do                                                                      \
1362   {                                                                     \
1363     rtx xops[1];                                                        \
1364                                                                         \
1365     xops[0] = gen_rtx_MEM (Pmode, gen_rtx_SYMBOL_REF (VOIDmode, "__bb_trace_ret")); \
1366                                                                         \
1367     output_asm_insn (AS1(call,%P0), xops);                              \
1368                                                                         \
1369   }                                                                     \
1370 while (0)
1371
1372 /* The function `__bb_trace_func' is called in every basic block
1373    and is not allowed to change the machine state. Saving (restoring)
1374    the state can either be done in the BLOCK_PROFILER macro,
1375    before calling function (rsp. after returning from function)
1376    `__bb_trace_func', or it can be done inside the function by
1377    defining the macros:
1378
1379         MACHINE_STATE_SAVE(ID)
1380         MACHINE_STATE_RESTORE(ID)
1381
1382    In the latter case care must be taken, that the prologue code
1383    of function `__bb_trace_func' does not already change the
1384    state prior to saving it with MACHINE_STATE_SAVE.
1385
1386    The parameter `ID' is a string identifying a unique macro use.
1387
1388    On the i386 the initialization code at the begin of
1389    function `__bb_trace_func' contains a `sub' instruction
1390    therefore we handle save and restore of the flag register 
1391    in the BLOCK_PROFILER macro. */
1392
1393 #define MACHINE_STATE_SAVE(ID) \
1394   asm ("        pushl %eax"); \
1395   asm ("        pushl %ecx"); \
1396   asm ("        pushl %edx"); \
1397   asm ("        pushl %esi");
1398
1399 #define MACHINE_STATE_RESTORE(ID) \
1400   asm ("        popl %esi"); \
1401   asm ("        popl %edx"); \
1402   asm ("        popl %ecx"); \
1403   asm ("        popl %eax");
1404
1405 /* EXIT_IGNORE_STACK should be nonzero if, when returning from a function,
1406    the stack pointer does not matter.  The value is tested only in
1407    functions that have frame pointers.
1408    No definition is equivalent to always zero.  */
1409 /* Note on the 386 it might be more efficient not to define this since 
1410    we have to restore it ourselves from the frame pointer, in order to
1411    use pop */
1412
1413 #define EXIT_IGNORE_STACK 1
1414
1415 /* This macro generates the assembly code for function exit,
1416    on machines that need it.  If FUNCTION_EPILOGUE is not defined
1417    then individual return instructions are generated for each
1418    return statement.  Args are same as for FUNCTION_PROLOGUE.
1419
1420    The function epilogue should not depend on the current stack pointer!
1421    It should use the frame pointer only.  This is mandatory because
1422    of alloca; we also take advantage of it to omit stack adjustments
1423    before returning.
1424
1425    If the last non-note insn in the function is a BARRIER, then there
1426    is no need to emit a function prologue, because control does not fall
1427    off the end.  This happens if the function ends in an "exit" call, or
1428    if a `return' insn is emitted directly into the function. */
1429
1430 #if 0
1431 #define FUNCTION_BEGIN_EPILOGUE(FILE)           \
1432 do {                                            \
1433   rtx last = get_last_insn ();                  \
1434   if (last && GET_CODE (last) == NOTE)          \
1435     last = prev_nonnote_insn (last);            \
1436 /*  if (! last || GET_CODE (last) != BARRIER)   \
1437     function_epilogue (FILE, SIZE);*/           \
1438 } while (0)
1439 #endif
1440
1441 #define FUNCTION_EPILOGUE(FILE, SIZE)     \
1442   function_epilogue (FILE, SIZE)
1443
1444 /* Output assembler code for a block containing the constant parts
1445    of a trampoline, leaving space for the variable parts.  */
1446
1447 /* On the 386, the trampoline contains three instructions:
1448      mov #STATIC,ecx
1449      mov #FUNCTION,eax
1450      jmp @eax  */
1451 #define TRAMPOLINE_TEMPLATE(FILE)                       \
1452 {                                                       \
1453   ASM_OUTPUT_CHAR (FILE, GEN_INT (0xb9));               \
1454   ASM_OUTPUT_SHORT (FILE, const0_rtx);                  \
1455   ASM_OUTPUT_SHORT (FILE, const0_rtx);                  \
1456   ASM_OUTPUT_CHAR (FILE, GEN_INT (0xb8));               \
1457   ASM_OUTPUT_SHORT (FILE, const0_rtx);                  \
1458   ASM_OUTPUT_SHORT (FILE, const0_rtx);                  \
1459   ASM_OUTPUT_CHAR (FILE, GEN_INT (0xff));               \
1460   ASM_OUTPUT_CHAR (FILE, GEN_INT (0xe0));               \
1461 }
1462
1463 /* Length in units of the trampoline for entering a nested function.  */
1464
1465 #define TRAMPOLINE_SIZE 12
1466
1467 /* Emit RTL insns to initialize the variable parts of a trampoline.
1468    FNADDR is an RTX for the address of the function's pure code.
1469    CXT is an RTX for the static chain value for the function.  */
1470
1471 #define INITIALIZE_TRAMPOLINE(TRAMP, FNADDR, CXT)                       \
1472 {                                                                       \
1473   emit_move_insn (gen_rtx_MEM (SImode, plus_constant (TRAMP, 1)), CXT); \
1474   emit_move_insn (gen_rtx_MEM (SImode, plus_constant (TRAMP, 6)), FNADDR); \
1475 }
1476 \f
1477 /* Definitions for register eliminations.
1478
1479    This is an array of structures.  Each structure initializes one pair
1480    of eliminable registers.  The "from" register number is given first,
1481    followed by "to".  Eliminations of the same "from" register are listed
1482    in order of preference.
1483
1484    We have two registers that can be eliminated on the i386.  First, the
1485    frame pointer register can often be eliminated in favor of the stack
1486    pointer register.  Secondly, the argument pointer register can always be
1487    eliminated; it is replaced with either the stack or frame pointer. */
1488
1489 #define ELIMINABLE_REGS                         \
1490 {{ ARG_POINTER_REGNUM, STACK_POINTER_REGNUM},   \
1491  { ARG_POINTER_REGNUM, FRAME_POINTER_REGNUM},   \
1492  { FRAME_POINTER_REGNUM, STACK_POINTER_REGNUM}}
1493
1494 /* Given FROM and TO register numbers, say whether this elimination is allowed.
1495    Frame pointer elimination is automatically handled.
1496
1497    For the i386, if frame pointer elimination is being done, we would like to
1498    convert ap into sp, not fp.
1499
1500    All other eliminations are valid.  */
1501
1502 #define CAN_ELIMINATE(FROM, TO)                                 \
1503  ((FROM) == ARG_POINTER_REGNUM && (TO) == STACK_POINTER_REGNUM  \
1504   ? ! frame_pointer_needed                                      \
1505   : 1)
1506
1507 /* Define the offset between two registers, one to be eliminated, and the other
1508    its replacement, at the start of a routine.  */
1509
1510 #define INITIAL_ELIMINATION_OFFSET(FROM, TO, OFFSET)                    \
1511 {                                                                       \
1512   if ((FROM) == ARG_POINTER_REGNUM && (TO) == FRAME_POINTER_REGNUM)     \
1513     (OFFSET) = 8;       /* Skip saved PC and previous frame pointer */  \
1514   else                                                                  \
1515     {                                                                   \
1516       int regno;                                                        \
1517       int offset = 0;                                                   \
1518                                                                         \
1519       for (regno = 0; regno < FIRST_PSEUDO_REGISTER; regno++)           \
1520         if ((regs_ever_live[regno] && ! call_used_regs[regno])          \
1521             || ((current_function_uses_pic_offset_table                 \
1522                  || current_function_uses_const_pool)                   \
1523                 && flag_pic && regno == PIC_OFFSET_TABLE_REGNUM))       \
1524           offset += 4;                                                  \
1525                                                                         \
1526       (OFFSET) = offset + get_frame_size ();                            \
1527                                                                         \
1528       if ((FROM) == ARG_POINTER_REGNUM && (TO) == STACK_POINTER_REGNUM) \
1529         (OFFSET) += 4;  /* Skip saved PC */                             \
1530     }                                                                   \
1531 }
1532 \f
1533 /* Addressing modes, and classification of registers for them.  */
1534
1535 /* #define HAVE_POST_INCREMENT */
1536 /* #define HAVE_POST_DECREMENT */
1537
1538 /* #define HAVE_PRE_DECREMENT */
1539 /* #define HAVE_PRE_INCREMENT */
1540
1541 /* Macros to check register numbers against specific register classes.  */
1542
1543 /* These assume that REGNO is a hard or pseudo reg number.
1544    They give nonzero only if REGNO is a hard reg of the suitable class
1545    or a pseudo reg currently allocated to a suitable hard reg.
1546    Since they use reg_renumber, they are safe only once reg_renumber
1547    has been allocated, which happens in local-alloc.c.  */
1548
1549 #define REGNO_OK_FOR_INDEX_P(REGNO) \
1550   ((REGNO) < STACK_POINTER_REGNUM \
1551    || (unsigned) reg_renumber[REGNO] < STACK_POINTER_REGNUM)
1552
1553 #define REGNO_OK_FOR_BASE_P(REGNO) \
1554   ((REGNO) <= STACK_POINTER_REGNUM \
1555    || (REGNO) == ARG_POINTER_REGNUM \
1556    || (unsigned) reg_renumber[REGNO] <= STACK_POINTER_REGNUM)
1557
1558 #define REGNO_OK_FOR_SIREG_P(REGNO) ((REGNO) == 4 || reg_renumber[REGNO] == 4)
1559 #define REGNO_OK_FOR_DIREG_P(REGNO) ((REGNO) == 5 || reg_renumber[REGNO] == 5)
1560
1561 /* The macros REG_OK_FOR..._P assume that the arg is a REG rtx
1562    and check its validity for a certain class.
1563    We have two alternate definitions for each of them.
1564    The usual definition accepts all pseudo regs; the other rejects
1565    them unless they have been allocated suitable hard regs.
1566    The symbol REG_OK_STRICT causes the latter definition to be used.
1567
1568    Most source files want to accept pseudo regs in the hope that
1569    they will get allocated to the class that the insn wants them to be in.
1570    Source files for reload pass need to be strict.
1571    After reload, it makes no difference, since pseudo regs have
1572    been eliminated by then.  */
1573
1574
1575 /* Non strict versions, pseudos are ok */
1576 #define REG_OK_FOR_INDEX_NONSTRICT_P(X)                                 \
1577   (REGNO (X) < STACK_POINTER_REGNUM                                     \
1578    || REGNO (X) >= FIRST_PSEUDO_REGISTER)
1579
1580 #define REG_OK_FOR_BASE_NONSTRICT_P(X)                                  \
1581   (REGNO (X) <= STACK_POINTER_REGNUM                                    \
1582    || REGNO (X) == ARG_POINTER_REGNUM                                   \
1583    || REGNO (X) >= FIRST_PSEUDO_REGISTER)
1584
1585 #define REG_OK_FOR_STRREG_NONSTRICT_P(X)                                \
1586   (REGNO (X) == 4 || REGNO (X) == 5 || REGNO (X) >= FIRST_PSEUDO_REGISTER)
1587
1588 /* Strict versions, hard registers only */
1589 #define REG_OK_FOR_INDEX_STRICT_P(X) REGNO_OK_FOR_INDEX_P (REGNO (X))
1590 #define REG_OK_FOR_BASE_STRICT_P(X)  REGNO_OK_FOR_BASE_P (REGNO (X))
1591 #define REG_OK_FOR_STRREG_STRICT_P(X)                                   \
1592   (REGNO_OK_FOR_DIREG_P (REGNO (X)) || REGNO_OK_FOR_SIREG_P (REGNO (X)))
1593
1594 #ifndef REG_OK_STRICT
1595 #define REG_OK_FOR_INDEX_P(X)  REG_OK_FOR_INDEX_NONSTRICT_P(X)
1596 #define REG_OK_FOR_BASE_P(X)   REG_OK_FOR_BASE_NONSTRICT_P(X)
1597 #define REG_OK_FOR_STRREG_P(X) REG_OK_FOR_STRREG_NONSTRICT_P(X)
1598
1599 #else
1600 #define REG_OK_FOR_INDEX_P(X)  REG_OK_FOR_INDEX_STRICT_P(X)
1601 #define REG_OK_FOR_BASE_P(X)   REG_OK_FOR_BASE_STRICT_P(X)
1602 #define REG_OK_FOR_STRREG_P(X) REG_OK_FOR_STRREG_STRICT_P(X)
1603 #endif
1604
1605 /* GO_IF_LEGITIMATE_ADDRESS recognizes an RTL expression
1606    that is a valid memory address for an instruction.
1607    The MODE argument is the machine mode for the MEM expression
1608    that wants to use this address.
1609
1610    The other macros defined here are used only in GO_IF_LEGITIMATE_ADDRESS,
1611    except for CONSTANT_ADDRESS_P which is usually machine-independent.
1612
1613    See legitimize_pic_address in i386.c for details as to what
1614    constitutes a legitimate address when -fpic is used.  */
1615
1616 #define MAX_REGS_PER_ADDRESS 2
1617
1618 #define CONSTANT_ADDRESS_P(X)   \
1619   (GET_CODE (X) == LABEL_REF || GET_CODE (X) == SYMBOL_REF              \
1620    || GET_CODE (X) == CONST_INT || GET_CODE (X) == CONST                \
1621    || GET_CODE (X) == HIGH)
1622
1623 /* Nonzero if the constant value X is a legitimate general operand.
1624    It is given that X satisfies CONSTANT_P or is a CONST_DOUBLE.  */
1625
1626 #define LEGITIMATE_CONSTANT_P(X) 1
1627
1628 #ifdef REG_OK_STRICT
1629 #define GO_IF_LEGITIMATE_ADDRESS(MODE, X, ADDR)                         \
1630 {                                                                       \
1631   if (legitimate_address_p (MODE, X, 1))                                \
1632     goto ADDR;                                                          \
1633 }
1634
1635 #else
1636 #define GO_IF_LEGITIMATE_ADDRESS(MODE, X, ADDR)                         \
1637 {                                                                       \
1638   if (legitimate_address_p (MODE, X, 0))                                \
1639     goto ADDR;                                                          \
1640 }
1641
1642 #endif
1643
1644 /* Try machine-dependent ways of modifying an illegitimate address
1645    to be legitimate.  If we find one, return the new, valid address.
1646    This macro is used in only one place: `memory_address' in explow.c.
1647
1648    OLDX is the address as it was before break_out_memory_refs was called.
1649    In some cases it is useful to look at this to decide what needs to be done.
1650
1651    MODE and WIN are passed so that this macro can use
1652    GO_IF_LEGITIMATE_ADDRESS.
1653
1654    It is always safe for this macro to do nothing.  It exists to recognize
1655    opportunities to optimize the output.
1656
1657    For the 80386, we handle X+REG by loading X into a register R and
1658    using R+REG.  R will go in a general reg and indexing will be used.
1659    However, if REG is a broken-out memory address or multiplication,
1660    nothing needs to be done because REG can certainly go in a general reg.
1661
1662    When -fpic is used, special handling is needed for symbolic references.
1663    See comments by legitimize_pic_address in i386.c for details.  */
1664
1665 #define LEGITIMIZE_ADDRESS(X, OLDX, MODE, WIN)                          \
1666 {                                                                       \
1667   (X) = legitimize_address (X, OLDX, MODE);                             \
1668   if (memory_address_p (MODE, X))                                       \
1669     goto WIN;                                                           \
1670 }
1671
1672 #define REWRITE_ADDRESS(x) rewrite_address(x)
1673
1674 /* Nonzero if the constant value X is a legitimate general operand
1675    when generating PIC code.  It is given that flag_pic is on and 
1676    that X satisfies CONSTANT_P or is a CONST_DOUBLE.  */
1677
1678 #define LEGITIMATE_PIC_OPERAND_P(X) \
1679   (! SYMBOLIC_CONST (X)                                                 \
1680    || (GET_CODE (X) == SYMBOL_REF && CONSTANT_POOL_ADDRESS_P (X)))
1681
1682 #define SYMBOLIC_CONST(X)       \
1683 (GET_CODE (X) == SYMBOL_REF                                             \
1684  || GET_CODE (X) == LABEL_REF                                           \
1685  || (GET_CODE (X) == CONST && symbolic_reference_mentioned_p (X)))
1686
1687 /* Go to LABEL if ADDR (a legitimate address expression)
1688    has an effect that depends on the machine mode it is used for.
1689    On the 80386, only postdecrement and postincrement address depend thus
1690    (the amount of decrement or increment being the length of the operand).  */
1691 #define GO_IF_MODE_DEPENDENT_ADDRESS(ADDR,LABEL)        \
1692  if (GET_CODE (ADDR) == POST_INC || GET_CODE (ADDR) == POST_DEC) goto LABEL
1693 \f
1694 /* Define this macro if references to a symbol must be treated
1695    differently depending on something about the variable or
1696    function named by the symbol (such as what section it is in).
1697
1698    On i386, if using PIC, mark a SYMBOL_REF for a non-global symbol
1699    so that we may access it directly in the GOT.  */
1700
1701 #define ENCODE_SECTION_INFO(DECL) \
1702 do                                                                      \
1703   {                                                                     \
1704     if (flag_pic)                                                       \
1705       {                                                                 \
1706         rtx rtl = (TREE_CODE_CLASS (TREE_CODE (DECL)) != 'd'            \
1707                    ? TREE_CST_RTL (DECL) : DECL_RTL (DECL));            \
1708                                                                         \
1709         if (TARGET_DEBUG_ADDR                                           \
1710             && TREE_CODE_CLASS (TREE_CODE (DECL)) == 'd')               \
1711           {                                                             \
1712             fprintf (stderr, "Encode %s, public = %d\n",                \
1713                      IDENTIFIER_POINTER (DECL_NAME (DECL)),             \
1714                      TREE_PUBLIC (DECL));                               \
1715           }                                                             \
1716                                                                         \
1717         SYMBOL_REF_FLAG (XEXP (rtl, 0))                                 \
1718           = (TREE_CODE_CLASS (TREE_CODE (DECL)) != 'd'                  \
1719              || ! TREE_PUBLIC (DECL));                                  \
1720       }                                                                 \
1721   }                                                                     \
1722 while (0)
1723
1724 /* Initialize data used by insn expanders.  This is called from
1725    init_emit, once for each function, before code is generated.
1726    For 386, clear stack slot assignments remembered from previous
1727    functions. */
1728
1729 #define INIT_EXPANDERS clear_386_stack_locals ()
1730
1731 /* The `FINALIZE_PIC' macro serves as a hook to emit these special
1732    codes once the function is being compiled into assembly code, but
1733    not before.  (It is not done before, because in the case of
1734    compiling an inline function, it would lead to multiple PIC
1735    prologues being included in functions which used inline functions
1736    and were compiled to assembly language.)  */
1737
1738 #define FINALIZE_PIC                                                    \
1739 do                                                                      \
1740   {                                                                     \
1741     extern int current_function_uses_pic_offset_table;                  \
1742                                                                         \
1743     current_function_uses_pic_offset_table |= profile_flag | profile_block_flag; \
1744   }                                                                     \
1745 while (0)
1746
1747 \f
1748 /* If defined, a C expression whose value is nonzero if IDENTIFIER
1749    with arguments ARGS is a valid machine specific attribute for DECL.
1750    The attributes in ATTRIBUTES have previously been assigned to DECL.  */
1751
1752 #define VALID_MACHINE_DECL_ATTRIBUTE(DECL, ATTRIBUTES, NAME, ARGS) \
1753   (i386_valid_decl_attribute_p (DECL, ATTRIBUTES, NAME, ARGS))
1754
1755 /* If defined, a C expression whose value is nonzero if IDENTIFIER
1756    with arguments ARGS is a valid machine specific attribute for TYPE.
1757    The attributes in ATTRIBUTES have previously been assigned to TYPE.  */
1758
1759 #define VALID_MACHINE_TYPE_ATTRIBUTE(TYPE, ATTRIBUTES, NAME, ARGS) \
1760   (i386_valid_type_attribute_p (TYPE, ATTRIBUTES, NAME, ARGS))
1761
1762 /* If defined, a C expression whose value is zero if the attributes on
1763    TYPE1 and TYPE2 are incompatible, one if they are compatible, and
1764    two if they are nearly compatible (which causes a warning to be
1765    generated).  */
1766
1767 #define COMP_TYPE_ATTRIBUTES(TYPE1, TYPE2) \
1768   (i386_comp_type_attributes (TYPE1, TYPE2))
1769
1770 /* If defined, a C statement that assigns default attributes to newly
1771    defined TYPE.  */
1772
1773 /* #define SET_DEFAULT_TYPE_ATTRIBUTES (TYPE) */
1774
1775 /* Max number of args passed in registers.  If this is more than 3, we will
1776    have problems with ebx (register #4), since it is a caller save register and
1777    is also used as the pic register in ELF.  So for now, don't allow more than
1778    3 registers to be passed in registers.  */
1779
1780 #define REGPARM_MAX 3
1781
1782 \f
1783 /* Specify the machine mode that this machine uses
1784    for the index in the tablejump instruction.  */
1785 #define CASE_VECTOR_MODE Pmode
1786
1787 /* Define as C expression which evaluates to nonzero if the tablejump
1788    instruction expects the table to contain offsets from the address of the
1789    table.
1790    Do not define this if the table should contain absolute addresses. */
1791 /* #define CASE_VECTOR_PC_RELATIVE 1 */
1792
1793 /* Specify the tree operation to be used to convert reals to integers.
1794    This should be changed to take advantage of fist --wfs ??
1795  */
1796 #define IMPLICIT_FIX_EXPR FIX_ROUND_EXPR
1797
1798 /* This is the kind of divide that is easiest to do in the general case.  */
1799 #define EASY_DIV_EXPR TRUNC_DIV_EXPR
1800
1801 /* Define this as 1 if `char' should by default be signed; else as 0.  */
1802 #define DEFAULT_SIGNED_CHAR 1
1803
1804 /* Max number of bytes we can move from memory to memory
1805    in one reasonably fast instruction.  */
1806 #define MOVE_MAX 4
1807
1808 /* The number of scalar move insns which should be generated instead
1809    of a string move insn or a library call.  Increasing the value
1810    will always make code faster, but eventually incurs high cost in
1811    increased code size.
1812
1813    If you don't define this, a reasonable default is used.
1814
1815    Make this large on i386, since the block move is very inefficient with small
1816    blocks, and the hard register needs of the block move require much reload
1817    work. */
1818
1819 #define MOVE_RATIO 5
1820
1821 /* Define if shifts truncate the shift count
1822    which implies one can omit a sign-extension or zero-extension
1823    of a shift count.  */
1824 /* On i386, shifts do truncate the count.  But bit opcodes don't. */
1825
1826 /* #define SHIFT_COUNT_TRUNCATED */
1827
1828 /* Value is 1 if truncating an integer of INPREC bits to OUTPREC bits
1829    is done just by pretending it is already truncated.  */
1830 #define TRULY_NOOP_TRUNCATION(OUTPREC, INPREC) 1
1831
1832 /* We assume that the store-condition-codes instructions store 0 for false
1833    and some other value for true.  This is the value stored for true.  */
1834
1835 #define STORE_FLAG_VALUE 1
1836
1837 /* When a prototype says `char' or `short', really pass an `int'.
1838    (The 386 can't easily push less than an int.)  */
1839
1840 #define PROMOTE_PROTOTYPES
1841
1842 /* Specify the machine mode that pointers have.
1843    After generation of rtl, the compiler makes no further distinction
1844    between pointers and any other objects of this machine mode.  */
1845 #define Pmode SImode
1846
1847 /* A function address in a call instruction
1848    is a byte address (for indexing purposes)
1849    so give the MEM rtx a byte's mode.  */
1850 #define FUNCTION_MODE QImode
1851 \f
1852 /* A part of a C `switch' statement that describes the relative costs
1853    of constant RTL expressions.  It must contain `case' labels for
1854    expression codes `const_int', `const', `symbol_ref', `label_ref'
1855    and `const_double'.  Each case must ultimately reach a `return'
1856    statement to return the relative cost of the use of that kind of
1857    constant value in an expression.  The cost may depend on the
1858    precise value of the constant, which is available for examination
1859    in X, and the rtx code of the expression in which it is contained,
1860    found in OUTER_CODE.
1861   
1862    CODE is the expression code--redundant, since it can be obtained
1863    with `GET_CODE (X)'.  */
1864
1865 #define CONST_COSTS(RTX,CODE,OUTER_CODE) \
1866   case CONST_INT:                                               \
1867     return (unsigned) INTVAL (RTX) < 256 ? 0 : 1;               \
1868   case CONST:                                                   \
1869   case LABEL_REF:                                               \
1870   case SYMBOL_REF:                                              \
1871     return flag_pic && SYMBOLIC_CONST (RTX) ? 2 : 1;            \
1872                                                                 \
1873   case CONST_DOUBLE:                                            \
1874     {                                                           \
1875       int code;                                                 \
1876       if (GET_MODE (RTX) == VOIDmode)                           \
1877         return 2;                                               \
1878                                                                 \
1879       code = standard_80387_constant_p (RTX);                   \
1880       return code == 1 ? 0 :                                    \
1881              code == 2 ? 1 :                                    \
1882                          2;                                     \
1883     }
1884
1885 /* Delete the definition here when TOPLEVEL_COSTS_N_INSNS gets added to cse.c */
1886 #define TOPLEVEL_COSTS_N_INSNS(N) {total = COSTS_N_INSNS (N); break;}
1887
1888 /* Like `CONST_COSTS' but applies to nonconstant RTL expressions.
1889    This can be used, for example, to indicate how costly a multiply
1890    instruction is.  In writing this macro, you can use the construct
1891    `COSTS_N_INSNS (N)' to specify a cost equal to N fast
1892    instructions.  OUTER_CODE is the code of the expression in which X
1893    is contained.
1894
1895    This macro is optional; do not define it if the default cost
1896    assumptions are adequate for the target machine.  */
1897
1898 #define RTX_COSTS(X,CODE,OUTER_CODE)                                    \
1899   case ASHIFT:                                                          \
1900     if (GET_CODE (XEXP (X, 1)) == CONST_INT                             \
1901         && GET_MODE (XEXP (X, 0)) == SImode)                            \
1902       {                                                                 \
1903         HOST_WIDE_INT value = INTVAL (XEXP (X, 1));                     \
1904                                                                         \
1905         if (value == 1)                                                 \
1906           return COSTS_N_INSNS (ix86_cost->add)                         \
1907                                 + rtx_cost(XEXP (X, 0), OUTER_CODE);    \
1908                                                                         \
1909         if (value == 2 || value == 3)                                   \
1910           return COSTS_N_INSNS (ix86_cost->lea)                         \
1911                                  + rtx_cost(XEXP (X, 0), OUTER_CODE);   \
1912       }                                                                 \
1913     /* fall through */                                                  \
1914                                                                         \
1915   case ROTATE:                                                          \
1916   case ASHIFTRT:                                                        \
1917   case LSHIFTRT:                                                        \
1918   case ROTATERT:                                                        \
1919     if (GET_MODE (XEXP (X, 0)) == DImode)                               \
1920       {                                                                 \
1921         if (GET_CODE (XEXP (X, 1)) == CONST_INT)                        \
1922           {                                                             \
1923             if (INTVAL (XEXP (X, 1)) > 32)                              \
1924               return COSTS_N_INSNS(ix86_cost->shift_const + 2);         \
1925             return COSTS_N_INSNS(ix86_cost->shift_const * 2);           \
1926           }                                                             \
1927         return ((GET_CODE (XEXP (X, 1)) == AND                          \
1928                  ? COSTS_N_INSNS(ix86_cost->shift_var * 2)              \
1929                  : COSTS_N_INSNS(ix86_cost->shift_var * 6 + 2))         \
1930                 + rtx_cost(XEXP (X, 0), OUTER_CODE));                   \
1931       }                                                                 \
1932     return COSTS_N_INSNS (GET_CODE (XEXP (X, 1)) == CONST_INT           \
1933                           ? ix86_cost->shift_const                      \
1934                           : ix86_cost->shift_var)                       \
1935       + rtx_cost(XEXP (X, 0), OUTER_CODE);                              \
1936                                                                         \
1937   case MULT:                                                            \
1938     if (GET_CODE (XEXP (X, 1)) == CONST_INT)                            \
1939       {                                                                 \
1940         unsigned HOST_WIDE_INT value = INTVAL (XEXP (X, 1));            \
1941         int nbits = 0;                                                  \
1942                                                                         \
1943         if (value == 2)                                                 \
1944           return COSTS_N_INSNS (ix86_cost->add)                         \
1945                                  + rtx_cost(XEXP (X, 0), OUTER_CODE);   \
1946         if (value == 4 || value == 8)                                   \
1947           return COSTS_N_INSNS (ix86_cost->lea)                         \
1948                                  + rtx_cost(XEXP (X, 0), OUTER_CODE);   \
1949                                                                         \
1950         while (value != 0)                                              \
1951           {                                                             \
1952             nbits++;                                                    \
1953             value >>= 1;                                                \
1954           }                                                             \
1955                                                                         \
1956         if (nbits == 1)                                                 \
1957           return COSTS_N_INSNS (ix86_cost->shift_const)                 \
1958             + rtx_cost(XEXP (X, 0), OUTER_CODE);                        \
1959                                                                         \
1960         return COSTS_N_INSNS (ix86_cost->mult_init                      \
1961                               + nbits * ix86_cost->mult_bit)            \
1962           + rtx_cost(XEXP (X, 0), OUTER_CODE);                          \
1963       }                                                                 \
1964                                                                         \
1965     else                        /* This is arbitrary */                 \
1966       TOPLEVEL_COSTS_N_INSNS (ix86_cost->mult_init                      \
1967                               + 7 * ix86_cost->mult_bit);               \
1968                                                                         \
1969   case DIV:                                                             \
1970   case UDIV:                                                            \
1971   case MOD:                                                             \
1972   case UMOD:                                                            \
1973     TOPLEVEL_COSTS_N_INSNS (ix86_cost->divide);                         \
1974                                                                         \
1975   case PLUS:                                                            \
1976     if (GET_CODE (XEXP (X, 0)) == REG                                   \
1977         && GET_MODE (XEXP (X, 0)) == SImode                             \
1978         && GET_CODE (XEXP (X, 1)) == PLUS)                              \
1979       return COSTS_N_INSNS (ix86_cost->lea);                            \
1980                                                                         \
1981     /* fall through */                                                  \
1982   case AND:                                                             \
1983   case IOR:                                                             \
1984   case XOR:                                                             \
1985   case MINUS:                                                           \
1986     if (GET_MODE (X) == DImode)                                         \
1987       return COSTS_N_INSNS (ix86_cost->add) * 2                         \
1988         + (rtx_cost (XEXP (X, 0), OUTER_CODE)                           \
1989            << (GET_MODE (XEXP (X, 0)) != DImode))                       \
1990         + (rtx_cost (XEXP (X, 1), OUTER_CODE)                           \
1991            << (GET_MODE (XEXP (X, 1)) != DImode));                      \
1992   case NEG:                                                             \
1993   case NOT:                                                             \
1994     if (GET_MODE (X) == DImode)                                         \
1995       TOPLEVEL_COSTS_N_INSNS (ix86_cost->add * 2)                       \
1996     TOPLEVEL_COSTS_N_INSNS (ix86_cost->add)
1997
1998
1999 /* An expression giving the cost of an addressing mode that contains
2000    ADDRESS.  If not defined, the cost is computed from the ADDRESS
2001    expression and the `CONST_COSTS' values.
2002
2003    For most CISC machines, the default cost is a good approximation
2004    of the true cost of the addressing mode.  However, on RISC
2005    machines, all instructions normally have the same length and
2006    execution time.  Hence all addresses will have equal costs.
2007
2008    In cases where more than one form of an address is known, the form
2009    with the lowest cost will be used.  If multiple forms have the
2010    same, lowest, cost, the one that is the most complex will be used.
2011
2012    For example, suppose an address that is equal to the sum of a
2013    register and a constant is used twice in the same basic block.
2014    When this macro is not defined, the address will be computed in a
2015    register and memory references will be indirect through that
2016    register.  On machines where the cost of the addressing mode
2017    containing the sum is no higher than that of a simple indirect
2018    reference, this will produce an additional instruction and
2019    possibly require an additional register.  Proper specification of
2020    this macro eliminates this overhead for such machines.
2021
2022    Similar use of this macro is made in strength reduction of loops.
2023
2024    ADDRESS need not be valid as an address.  In such a case, the cost
2025    is not relevant and can be any value; invalid addresses need not be
2026    assigned a different cost.
2027
2028    On machines where an address involving more than one register is as
2029    cheap as an address computation involving only one register,
2030    defining `ADDRESS_COST' to reflect this can cause two registers to
2031    be live over a region of code where only one would have been if
2032    `ADDRESS_COST' were not defined in that manner.  This effect should
2033    be considered in the definition of this macro.  Equivalent costs
2034    should probably only be given to addresses with different numbers
2035    of registers on machines with lots of registers.
2036
2037    This macro will normally either not be defined or be defined as a
2038    constant.
2039
2040    For i386, it is better to use a complex address than let gcc copy
2041    the address into a reg and make a new pseudo.  But not if the address
2042    requires to two regs - that would mean more pseudos with longer
2043    lifetimes.  */
2044
2045 #define ADDRESS_COST(RTX) \
2046   ((CONSTANT_P (RTX)                                            \
2047     || (GET_CODE (RTX) == PLUS && CONSTANT_P (XEXP (RTX, 1))    \
2048         && REG_P (XEXP (RTX, 0)))) ? 0                          \
2049    : REG_P (RTX) ? 1                                            \
2050    : 2)
2051
2052 /* A C expression for the cost of moving data of mode M between a
2053    register and memory.  A value of 2 is the default; this cost is
2054    relative to those in `REGISTER_MOVE_COST'.
2055
2056    If moving between registers and memory is more expensive than
2057    between two registers, you should define this macro to express the
2058    relative cost.
2059
2060    On the i386, copying between floating-point and fixed-point
2061    registers is expensive.  */
2062
2063 #define REGISTER_MOVE_COST(CLASS1, CLASS2)                              \
2064   (((FLOAT_CLASS_P (CLASS1) && ! FLOAT_CLASS_P (CLASS2))                \
2065     || (! FLOAT_CLASS_P (CLASS1) && FLOAT_CLASS_P (CLASS2))) ? 10       \
2066    : 2)
2067
2068
2069 /* A C expression for the cost of moving data of mode M between a
2070    register and memory.  A value of 2 is the default; this cost is
2071    relative to those in `REGISTER_MOVE_COST'.
2072
2073    If moving between registers and memory is more expensive than
2074    between two registers, you should define this macro to express the
2075    relative cost.  */
2076
2077 /* #define MEMORY_MOVE_COST(M,C,I) 2  */
2078
2079 /* A C expression for the cost of a branch instruction.  A value of 1
2080    is the default; other values are interpreted relative to that.  */
2081
2082 #define BRANCH_COST i386_branch_cost
2083
2084 /* Define this macro as a C expression which is nonzero if accessing
2085    less than a word of memory (i.e. a `char' or a `short') is no
2086    faster than accessing a word of memory, i.e., if such access
2087    require more than one instruction or if there is no difference in
2088    cost between byte and (aligned) word loads.
2089
2090    When this macro is not defined, the compiler will access a field by
2091    finding the smallest containing object; when it is defined, a
2092    fullword load will be used if alignment permits.  Unless bytes
2093    accesses are faster than word accesses, using word accesses is
2094    preferable since it may eliminate subsequent memory access if
2095    subsequent accesses occur to other fields in the same word of the
2096    structure, but to different bytes.  */
2097
2098 #define SLOW_BYTE_ACCESS 0
2099
2100 /* Nonzero if access to memory by shorts is slow and undesirable.  */
2101 #define SLOW_SHORT_ACCESS 0
2102
2103 /* Define this macro if zero-extension (of a `char' or `short' to an
2104    `int') can be done faster if the destination is a register that is
2105    known to be zero.
2106
2107    If you define this macro, you must have instruction patterns that
2108    recognize RTL structures like this:
2109
2110           (set (strict_low_part (subreg:QI (reg:SI ...) 0)) ...)
2111
2112    and likewise for `HImode'.  */
2113
2114 /* #define SLOW_ZERO_EXTEND */
2115
2116 /* Define this macro to be the value 1 if unaligned accesses have a
2117    cost many times greater than aligned accesses, for example if they
2118    are emulated in a trap handler.
2119
2120    When this macro is non-zero, the compiler will act as if
2121    `STRICT_ALIGNMENT' were non-zero when generating code for block
2122    moves.  This can cause significantly more instructions to be
2123    produced.  Therefore, do not set this macro non-zero if unaligned
2124    accesses only add a cycle or two to the time for a memory access.
2125
2126    If the value of this macro is always zero, it need not be defined.  */
2127
2128 /* #define SLOW_UNALIGNED_ACCESS 0 */
2129
2130 /* Define this macro to inhibit strength reduction of memory
2131    addresses.  (On some machines, such strength reduction seems to do
2132    harm rather than good.)  */
2133
2134 /* #define DONT_REDUCE_ADDR */
2135
2136 /* Define this macro if it is as good or better to call a constant
2137    function address than to call an address kept in a register.
2138
2139    Desirable on the 386 because a CALL with a constant address is
2140    faster than one with a register address.  */
2141
2142 #define NO_FUNCTION_CSE
2143
2144 /* Define this macro if it is as good or better for a function to call
2145    itself with an explicit address than to call an address kept in a
2146    register.  */
2147
2148 #define NO_RECURSIVE_FUNCTION_CSE
2149
2150 /* A C statement (sans semicolon) to update the integer variable COST
2151    based on the relationship between INSN that is dependent on
2152    DEP_INSN through the dependence LINK.  The default is to make no
2153    adjustment to COST.  This can be used for example to specify to
2154    the scheduler that an output- or anti-dependence does not incur
2155    the same cost as a data-dependence.  */
2156
2157 #define ADJUST_COST(insn,link,dep_insn,cost)                            \
2158   {                                                                     \
2159     rtx next_inst;                                                      \
2160     if (GET_CODE (dep_insn) == CALL_INSN)                               \
2161       (cost) = 0;                                                       \
2162                                                                         \
2163     else if (GET_CODE (dep_insn) == INSN                                \
2164         && GET_CODE (PATTERN (dep_insn)) == SET                         \
2165         && GET_CODE (SET_DEST (PATTERN (dep_insn))) == REG              \
2166         && GET_CODE (insn) == INSN                                      \
2167         && GET_CODE (PATTERN (insn)) == SET                             \
2168         && !reg_overlap_mentioned_p (SET_DEST (PATTERN (dep_insn)),     \
2169                                      SET_SRC (PATTERN (insn))))         \
2170       {                                                                 \
2171         (cost) = 0;                                                     \
2172       }                                                                 \
2173                                                                         \
2174     else if (GET_CODE (insn) == JUMP_INSN)                              \
2175       {                                                                 \
2176         (cost) = 0;                                                     \
2177       }                                                                 \
2178                                                                         \
2179     if (TARGET_PENTIUM)                                                 \
2180       {                                                                 \
2181         if (cost !=0 && is_fp_insn (insn) && is_fp_insn (dep_insn)      \
2182             && !is_fp_dest (dep_insn))                                  \
2183           {                                                             \
2184             (cost) = 0;                                                 \
2185           }                                                             \
2186                                                                         \
2187         if (agi_dependent (insn, dep_insn))                             \
2188           {                                                             \
2189             (cost) = 3;                                                 \
2190           }                                                             \
2191         else if (GET_CODE (insn) == INSN                                \
2192                  && GET_CODE (PATTERN (insn)) == SET                    \
2193                  && SET_DEST (PATTERN (insn)) == cc0_rtx                \
2194                  && (next_inst = next_nonnote_insn (insn))              \
2195                  && GET_CODE (next_inst) == JUMP_INSN)                  \
2196           { /* compare probably paired with jump */                     \
2197             (cost) = 0;                                                 \
2198           }                                                             \
2199       }                                                                 \
2200     else                                                                \
2201       if (!is_fp_dest (dep_insn))                                       \
2202         {                                                               \
2203           if(!agi_dependent (insn, dep_insn))                           \
2204             (cost) = 0;                                                 \
2205           else if (TARGET_486)                                          \
2206             (cost) = 2;                                                 \
2207         }                                                               \
2208       else                                                              \
2209         if (is_fp_store (insn) && is_fp_insn (dep_insn)                 \
2210             && NEXT_INSN (insn) && NEXT_INSN (NEXT_INSN (insn))         \
2211             && NEXT_INSN (NEXT_INSN (NEXT_INSN (insn)))                 \
2212             && (GET_CODE (NEXT_INSN (insn)) == INSN)                    \
2213             && (GET_CODE (NEXT_INSN (NEXT_INSN (insn))) == JUMP_INSN)   \
2214             && (GET_CODE (NEXT_INSN (NEXT_INSN (NEXT_INSN (insn)))) == NOTE) \
2215             && (NOTE_LINE_NUMBER (NEXT_INSN (NEXT_INSN (NEXT_INSN (insn)))) \
2216                 == NOTE_INSN_LOOP_END))                                 \
2217           {                                                             \
2218             (cost) = 3;                                                 \
2219           }                                                             \
2220   }
2221
2222
2223 #define ADJUST_BLOCKAGE(last_insn,insn,blockage)                        \
2224 {                                                                       \
2225   if (is_fp_store (last_insn) && is_fp_insn (insn)                      \
2226       && NEXT_INSN (last_insn) && NEXT_INSN (NEXT_INSN (last_insn))     \
2227       && NEXT_INSN (NEXT_INSN (NEXT_INSN (last_insn)))                  \
2228       && (GET_CODE (NEXT_INSN (last_insn)) == INSN)                     \
2229       && (GET_CODE (NEXT_INSN (NEXT_INSN (last_insn))) == JUMP_INSN)    \
2230       && (GET_CODE (NEXT_INSN (NEXT_INSN (NEXT_INSN (last_insn)))) == NOTE) \
2231       && (NOTE_LINE_NUMBER (NEXT_INSN (NEXT_INSN (NEXT_INSN (last_insn)))) \
2232           == NOTE_INSN_LOOP_END))                                       \
2233     {                                                                   \
2234       (blockage) = 3;                                                   \
2235     }                                                                   \
2236 }
2237
2238 \f
2239 /* Add any extra modes needed to represent the condition code.
2240
2241    For the i386, we need separate modes when floating-point equality
2242    comparisons are being done.  */
2243
2244 #define EXTRA_CC_MODES CCFPEQmode
2245
2246 /* Define the names for the modes specified above.  */
2247 #define EXTRA_CC_NAMES "CCFPEQ"
2248
2249 /* Given a comparison code (EQ, NE, etc.) and the first operand of a COMPARE,
2250    return the mode to be used for the comparison.
2251
2252    For floating-point equality comparisons, CCFPEQmode should be used.
2253    VOIDmode should be used in all other cases.  */
2254
2255 #define SELECT_CC_MODE(OP,X,Y) \
2256   (GET_MODE_CLASS (GET_MODE (X)) == MODE_FLOAT                  \
2257    && ((OP) == EQ || (OP) == NE) ? CCFPEQmode : VOIDmode)
2258
2259 /* Define the information needed to generate branch and scc insns.  This is
2260    stored from the compare operation.  Note that we can't use "rtx" here
2261    since it hasn't been defined!  */
2262
2263 extern struct rtx_def *(*i386_compare_gen)(), *(*i386_compare_gen_eq)();
2264
2265 /* Tell final.c how to eliminate redundant test instructions.  */
2266
2267 /* Here we define machine-dependent flags and fields in cc_status
2268    (see `conditions.h').  */
2269
2270 /* Set if the cc value was actually from the 80387 and
2271    we are testing eax directly (i.e. no sahf) */
2272 #define CC_TEST_AX 020000
2273
2274 /* Set if the cc value is actually in the 80387, so a floating point
2275    conditional branch must be output.  */
2276 #define CC_IN_80387 04000
2277
2278 /* Set if the CC value was stored in a nonstandard way, so that
2279    the state of equality is indicated by zero in the carry bit.  */
2280 #define CC_Z_IN_NOT_C 010000
2281
2282 /* Set if the CC value was actually from the 80387 and loaded directly
2283    into the eflags instead of via eax/sahf.  */
2284 #define CC_FCOMI 040000
2285
2286 /* Store in cc_status the expressions
2287    that the condition codes will describe
2288    after execution of an instruction whose pattern is EXP.
2289    Do not alter them if the instruction would not alter the cc's.  */
2290
2291 #define NOTICE_UPDATE_CC(EXP, INSN) \
2292   notice_update_cc((EXP))
2293
2294 /* Output a signed jump insn.  Use template NORMAL ordinarily, or
2295    FLOAT following a floating point comparison.
2296    Use NO_OV following an arithmetic insn that set the cc's
2297    before a test insn that was deleted.
2298    NO_OV may be zero, meaning final should reinsert the test insn
2299    because the jump cannot be handled properly without it.  */
2300
2301 #define OUTPUT_JUMP(NORMAL, FLOAT, NO_OV)                       \
2302 {                                                               \
2303   if (cc_prev_status.flags & CC_IN_80387)                       \
2304     return FLOAT;                                               \
2305   if (cc_prev_status.flags & CC_NO_OVERFLOW)                    \
2306     return NO_OV;                                               \
2307   return NORMAL;                                                \
2308 }
2309 \f
2310 /* Control the assembler format that we output, to the extent
2311    this does not vary between assemblers.  */
2312
2313 /* How to refer to registers in assembler output.
2314    This sequence is indexed by compiler's hard-register-number (see above). */
2315
2316 /* In order to refer to the first 8 regs as 32 bit regs prefix an "e"
2317    For non floating point regs, the following are the HImode names.
2318
2319    For float regs, the stack top is sometimes referred to as "%st(0)"
2320    instead of just "%st".  PRINT_REG handles this with the "y" code.  */
2321
2322 #define HI_REGISTER_NAMES \
2323 {"ax","dx","cx","bx","si","di","bp","sp",          \
2324  "st","st(1)","st(2)","st(3)","st(4)","st(5)","st(6)","st(7)","" }
2325
2326 #define REGISTER_NAMES HI_REGISTER_NAMES
2327
2328 /* Table of additional register names to use in user input.  */
2329
2330 #define ADDITIONAL_REGISTER_NAMES \
2331 { { "eax", 0 }, { "edx", 1 }, { "ecx", 2 }, { "ebx", 3 },       \
2332   { "esi", 4 }, { "edi", 5 }, { "ebp", 6 }, { "esp", 7 },       \
2333   { "al", 0 }, { "dl", 1 }, { "cl", 2 }, { "bl", 3 },           \
2334   { "ah", 0 }, { "dh", 1 }, { "ch", 2 }, { "bh", 3 } }
2335
2336 /* Note we are omitting these since currently I don't know how
2337 to get gcc to use these, since they want the same but different
2338 number as al, and ax.
2339 */
2340
2341 /* note the last four are not really qi_registers, but
2342    the md will have to never output movb into one of them
2343    only a movw .  There is no movb into the last four regs */
2344
2345 #define QI_REGISTER_NAMES \
2346 {"al", "dl", "cl", "bl", "si", "di", "bp", "sp",}
2347
2348 /* These parallel the array above, and can be used to access bits 8:15
2349    of regs 0 through 3. */
2350
2351 #define QI_HIGH_REGISTER_NAMES \
2352 {"ah", "dh", "ch", "bh", }
2353
2354 /* How to renumber registers for dbx and gdb.  */
2355
2356 /* {0,2,1,3,6,7,4,5,12,13,14,15,16,17}  */
2357 #define DBX_REGISTER_NUMBER(n) \
2358 ((n) == 0 ? 0 : \
2359  (n) == 1 ? 2 : \
2360  (n) == 2 ? 1 : \
2361  (n) == 3 ? 3 : \
2362  (n) == 4 ? 6 : \
2363  (n) == 5 ? 7 : \
2364  (n) == 6 ? 4 : \
2365  (n) == 7 ? 5 : \
2366  (n) + 4)
2367
2368 /* Before the prologue, RA is at 0(%esp).  */
2369 #define INCOMING_RETURN_ADDR_RTX \
2370   gen_rtx_MEM (VOIDmode, gen_rtx_REG (VOIDmode, STACK_POINTER_REGNUM))
2371
2372 /* After the prologue, RA is at -4(AP) in the current frame.  */
2373 #define RETURN_ADDR_RTX(COUNT, FRAME)                                   \
2374   ((COUNT) == 0                                                         \
2375    ? gen_rtx_MEM (Pmode, gen_rtx_PLUS (Pmode, arg_pointer_rtx, GEN_INT(-4)))\
2376    : gen_rtx_MEM (Pmode, gen_rtx_PLUS (Pmode, (FRAME), GEN_INT(4))))
2377
2378 /* PC is dbx register 8; let's use that column for RA. */
2379 #define DWARF_FRAME_RETURN_COLUMN       8
2380
2381 /* Before the prologue, the top of the frame is at 4(%esp).  */
2382 #define INCOMING_FRAME_SP_OFFSET 4
2383
2384 /* This is how to output the definition of a user-level label named NAME,
2385    such as the label on a static function or variable NAME.  */
2386
2387 #define ASM_OUTPUT_LABEL(FILE,NAME)     \
2388   (assemble_name (FILE, NAME), fputs (":\n", FILE))
2389
2390 /* This is how to output an assembler line defining a `double' constant.  */
2391
2392 #define ASM_OUTPUT_DOUBLE(FILE,VALUE)                                   \
2393 do { long l[2];                                                         \
2394      REAL_VALUE_TO_TARGET_DOUBLE (VALUE, l);                            \
2395      fprintf (FILE, "%s 0x%lx,0x%lx\n", ASM_LONG, l[0], l[1]);          \
2396    } while (0)
2397
2398 /* This is how to output a `long double' extended real constant. */
2399
2400 #undef ASM_OUTPUT_LONG_DOUBLE
2401 #define ASM_OUTPUT_LONG_DOUBLE(FILE,VALUE)              \
2402 do { long l[3];                                         \
2403      REAL_VALUE_TO_TARGET_LONG_DOUBLE (VALUE, l);       \
2404      fprintf (FILE, "%s 0x%lx,0x%lx,0x%lx\n", ASM_LONG, l[0], l[1], l[2]); \
2405    } while (0)
2406
2407 /* This is how to output an assembler line defining a `float' constant.  */
2408
2409 #define ASM_OUTPUT_FLOAT(FILE,VALUE)                    \
2410 do { long l;                                            \
2411      REAL_VALUE_TO_TARGET_SINGLE (VALUE, l);            \
2412      fprintf ((FILE), "%s 0x%lx\n", ASM_LONG, l);       \
2413    } while (0)
2414
2415 /* Store in OUTPUT a string (made with alloca) containing
2416    an assembler-name for a local static variable named NAME.
2417    LABELNO is an integer which is different for each call.  */
2418
2419 #define ASM_FORMAT_PRIVATE_NAME(OUTPUT, NAME, LABELNO)  \
2420 ( (OUTPUT) = (char *) alloca (strlen ((NAME)) + 10),    \
2421   sprintf ((OUTPUT), "%s.%d", (NAME), (LABELNO)))
2422
2423
2424
2425 /* This is how to output an assembler line defining an `int' constant.  */
2426
2427 #define ASM_OUTPUT_INT(FILE,VALUE)  \
2428 ( fprintf (FILE, "%s ", ASM_LONG),              \
2429   output_addr_const (FILE,(VALUE)),             \
2430   putc('\n',FILE))
2431
2432 /* Likewise for `char' and `short' constants.  */
2433 /* is this supposed to do align too?? */
2434
2435 #define ASM_OUTPUT_SHORT(FILE,VALUE)  \
2436 ( fprintf (FILE, "%s ", ASM_SHORT),             \
2437   output_addr_const (FILE,(VALUE)),             \
2438   putc('\n',FILE))
2439
2440 /*
2441 #define ASM_OUTPUT_SHORT(FILE,VALUE)  \
2442 ( fprintf (FILE, "%s ", ASM_BYTE_OP),           \
2443   output_addr_const (FILE,(VALUE)),             \
2444   fputs (",", FILE),                            \
2445   output_addr_const (FILE,(VALUE)),             \
2446   fputs (" >> 8\n",FILE))
2447 */
2448
2449
2450 #define ASM_OUTPUT_CHAR(FILE,VALUE)  \
2451 ( fprintf (FILE, "%s ", ASM_BYTE_OP),           \
2452   output_addr_const (FILE, (VALUE)),            \
2453   putc ('\n', FILE))
2454
2455 /* This is how to output an assembler line for a numeric constant byte.  */
2456
2457 #define ASM_OUTPUT_BYTE(FILE,VALUE)  \
2458   fprintf ((FILE), "%s 0x%x\n", ASM_BYTE_OP, (VALUE))
2459
2460 /* This is how to output an insn to push a register on the stack.
2461    It need not be very fast code.  */
2462
2463 #define ASM_OUTPUT_REG_PUSH(FILE,REGNO)  \
2464   fprintf (FILE, "\tpushl %%e%s\n", reg_names[REGNO])
2465
2466 /* This is how to output an insn to pop a register from the stack.
2467    It need not be very fast code.  */
2468
2469 #define ASM_OUTPUT_REG_POP(FILE,REGNO)  \
2470   fprintf (FILE, "\tpopl %%e%s\n", reg_names[REGNO])
2471
2472 /* This is how to output an element of a case-vector that is absolute.
2473      */
2474
2475 #define ASM_OUTPUT_ADDR_VEC_ELT(FILE, VALUE)  \
2476   fprintf (FILE, "%s %s%d\n", ASM_LONG, LPREFIX, VALUE)
2477
2478 /* This is how to output an element of a case-vector that is relative.
2479    We don't use these on the 386 yet, because the ATT assembler can't do
2480    forward reference the differences.  
2481  */
2482
2483 #define ASM_OUTPUT_ADDR_DIFF_ELT(FILE, BODY, VALUE, REL) \
2484   fprintf (FILE, "\t.word %s%d-%s%d\n",LPREFIX, VALUE,LPREFIX, REL)
2485
2486 /* Define the parentheses used to group arithmetic operations
2487    in assembler code.  */
2488
2489 #define ASM_OPEN_PAREN ""
2490 #define ASM_CLOSE_PAREN ""
2491
2492 /* Define results of standard character escape sequences.  */
2493 #define TARGET_BELL 007
2494 #define TARGET_BS 010
2495 #define TARGET_TAB 011
2496 #define TARGET_NEWLINE 012
2497 #define TARGET_VT 013
2498 #define TARGET_FF 014
2499 #define TARGET_CR 015
2500 \f
2501 /* Print operand X (an rtx) in assembler syntax to file FILE.
2502    CODE is a letter or dot (`z' in `%z0') or 0 if no letter was specified.
2503    The CODE z takes the size of operand from the following digit, and
2504    outputs b,w,or l respectively.
2505
2506    On the 80386, we use several such letters:
2507    f -- float insn (print a CONST_DOUBLE as a float rather than in hex).
2508    L,W,B,Q,S,T -- print the opcode suffix for specified size of operand.
2509    R -- print the prefix for register names.
2510    z -- print the opcode suffix for the size of the current operand.
2511    * -- print a star (in certain assembler syntax)
2512    P -- if PIC, print an @PLT suffix.
2513    X -- don't print any sort of PIC '@' suffix for a symbol.
2514    J -- print jump insn for arithmetic_comparison_operator.
2515    s -- ??? something to do with double shifts.  not actually used, afaik.
2516    C -- print a conditional move suffix corresponding to the op code.
2517    c -- likewise, but reverse the condition.
2518    F,f -- likewise, but for floating-point.  */
2519
2520 #define PRINT_OPERAND_PUNCT_VALID_P(CODE)                               \
2521   ((CODE) == '*')
2522
2523 /* Print the name of a register based on its machine mode and number.
2524    If CODE is 'w', pretend the mode is HImode.
2525    If CODE is 'b', pretend the mode is QImode.
2526    If CODE is 'k', pretend the mode is SImode.
2527    If CODE is 'h', pretend the reg is the `high' byte register.
2528    If CODE is 'y', print "st(0)" instead of "st", if the reg is stack op. */
2529
2530 extern char *hi_reg_name[];
2531 extern char *qi_reg_name[];
2532 extern char *qi_high_reg_name[];
2533
2534 #define PRINT_REG(X, CODE, FILE) \
2535   do { if (REGNO (X) == ARG_POINTER_REGNUM)             \
2536          abort ();                                      \
2537        fprintf (FILE, "%s", RP);                        \
2538        switch ((CODE == 'w' ? 2                         \
2539                 : CODE == 'b' ? 1                       \
2540                 : CODE == 'k' ? 4                       \
2541                 : CODE == 'y' ? 3                       \
2542                 : CODE == 'h' ? 0                       \
2543                 : GET_MODE_SIZE (GET_MODE (X))))        \
2544          {                                              \
2545          case 3:                                        \
2546            if (STACK_TOP_P (X))                         \
2547              {                                          \
2548                fputs ("st(0)", FILE);                   \
2549                break;                                   \
2550              }                                          \
2551          case 4:                                        \
2552          case 8:                                        \
2553          case 12:                                       \
2554            if (! FP_REG_P (X)) fputs ("e", FILE);       \
2555          case 2:                                        \
2556            fputs (hi_reg_name[REGNO (X)], FILE);        \
2557            break;                                       \
2558          case 1:                                        \
2559            fputs (qi_reg_name[REGNO (X)], FILE);        \
2560            break;                                       \
2561          case 0:                                        \
2562            fputs (qi_high_reg_name[REGNO (X)], FILE);   \
2563            break;                                       \
2564          }                                              \
2565      } while (0)
2566
2567 #define PRINT_OPERAND(FILE, X, CODE)  \
2568   print_operand (FILE, X, CODE)
2569
2570 #define PRINT_OPERAND_ADDRESS(FILE, ADDR)  \
2571   print_operand_address (FILE, ADDR)
2572
2573 /* Print the name of a register for based on its machine mode and number.
2574    This macro is used to print debugging output.
2575    This macro is different from PRINT_REG in that it may be used in
2576    programs that are not linked with aux-output.o.  */
2577
2578 #define DEBUG_PRINT_REG(X, CODE, FILE) \
2579   do { static char *hi_name[] = HI_REGISTER_NAMES;      \
2580        static char *qi_name[] = QI_REGISTER_NAMES;      \
2581        fprintf (FILE, "%d %s", REGNO (X), RP);  \
2582        if (REGNO (X) == ARG_POINTER_REGNUM)             \
2583          { fputs ("argp", FILE); break; }               \
2584        if (STACK_TOP_P (X))                             \
2585          { fputs ("st(0)", FILE); break; }              \
2586        if (FP_REG_P (X))                                \
2587          { fputs (hi_name[REGNO(X)], FILE); break; }    \
2588        switch (GET_MODE_SIZE (GET_MODE (X)))            \
2589          {                                              \
2590          default:                                       \
2591            fputs ("e", FILE);                           \
2592          case 2:                                        \
2593            fputs (hi_name[REGNO (X)], FILE);            \
2594            break;                                       \
2595          case 1:                                        \
2596            fputs (qi_name[REGNO (X)], FILE);            \
2597            break;                                       \
2598          }                                              \
2599      } while (0)
2600
2601 /* Output the prefix for an immediate operand, or for an offset operand.  */
2602 #define PRINT_IMMED_PREFIX(FILE)  fputs (IP, (FILE))
2603 #define PRINT_OFFSET_PREFIX(FILE)  fputs (IP, (FILE))
2604
2605 /* Routines in libgcc that return floats must return them in an fp reg,
2606    just as other functions do which return such values.
2607    These macros make that happen.  */
2608
2609 #define FLOAT_VALUE_TYPE float
2610 #define INTIFY(FLOATVAL) FLOATVAL
2611
2612 /* Nonzero if INSN magically clobbers register REGNO.  */
2613
2614 /* #define INSN_CLOBBERS_REGNO_P(INSN, REGNO)   \
2615     (FP_REGNO_P (REGNO)                         \
2616      && (GET_CODE (INSN) == JUMP_INSN || GET_CODE (INSN) == BARRIER))
2617 */
2618
2619 /* a letter which is not needed by the normal asm syntax, which
2620    we can use for operand syntax in the extended asm */
2621
2622 #define ASM_OPERAND_LETTER '#'
2623 #define RET return ""
2624 #define AT_SP(mode) (gen_rtx_MEM ((mode), stack_pointer_rtx))
2625 \f
2626 /* Helper macros to expand a binary/unary operator if needed */
2627 #define IX86_EXPAND_BINARY_OPERATOR(OP, MODE, OPERANDS)                 \
2628 do {                                                                    \
2629   if (!ix86_expand_binary_operator (OP, MODE, OPERANDS))                \
2630     FAIL;                                                               \
2631 } while (0)
2632
2633 #define IX86_EXPAND_UNARY_OPERATOR(OP, MODE, OPERANDS)                  \
2634 do {                                                                    \
2635   if (!ix86_expand_unary_operator (OP, MODE, OPERANDS,))                \
2636     FAIL;                                                               \
2637 } while (0)
2638
2639 \f
2640 /* Functions in i386.c */
2641 extern void override_options ();
2642 extern void order_regs_for_local_alloc ();
2643 extern char *output_strlen_unroll ();
2644 extern struct rtx_def *i386_sext16_if_const ();
2645 extern int i386_aligned_p ();
2646 extern int i386_cc_probably_useless_p ();
2647 extern int i386_valid_decl_attribute_p ();
2648 extern int i386_valid_type_attribute_p ();
2649 extern int i386_return_pops_args ();
2650 extern int i386_comp_type_attributes ();
2651 extern void init_cumulative_args ();
2652 extern void function_arg_advance ();
2653 extern struct rtx_def *function_arg ();
2654 extern int function_arg_partial_nregs ();
2655 extern char *output_strlen_unroll ();
2656 extern void output_op_from_reg ();
2657 extern void output_to_reg ();
2658 extern char *singlemove_string ();
2659 extern char *output_move_double ();
2660 extern char *output_move_memory ();
2661 extern char *output_move_pushmem ();
2662 extern int standard_80387_constant_p ();
2663 extern char *output_move_const_single ();
2664 extern int symbolic_operand ();
2665 extern int call_insn_operand ();
2666 extern int expander_call_insn_operand ();
2667 extern int symbolic_reference_mentioned_p ();
2668 extern int ix86_expand_binary_operator ();
2669 extern int ix86_binary_operator_ok ();
2670 extern int ix86_expand_unary_operator ();
2671 extern int ix86_unary_operator_ok ();
2672 extern void emit_pic_move ();
2673 extern void function_prologue ();
2674 extern int simple_386_epilogue ();
2675 extern void function_epilogue ();
2676 extern int legitimate_address_p ();
2677 extern struct rtx_def *legitimize_pic_address ();
2678 extern struct rtx_def *legitimize_address ();
2679 extern void print_operand ();
2680 extern void print_operand_address ();
2681 extern void notice_update_cc ();
2682 extern void split_di ();
2683 extern int binary_387_op ();
2684 extern int shift_op ();
2685 extern int VOIDmode_compare_op ();
2686 extern char *output_387_binary_op ();
2687 extern char *output_fix_trunc ();
2688 extern char *output_float_compare ();
2689 extern char *output_fp_cc0_set ();
2690 extern void save_386_machine_status ();
2691 extern void restore_386_machine_status ();
2692 extern void clear_386_stack_locals ();
2693 extern struct rtx_def *assign_386_stack_local ();
2694 extern int is_mul ();
2695 extern int is_div ();
2696 extern int last_to_set_cc ();
2697 extern int doesnt_set_condition_code ();
2698 extern int sets_condition_code ();
2699 extern int str_immediate_operand ();
2700 extern int is_fp_insn ();
2701 extern int is_fp_dest ();
2702 extern int is_fp_store ();
2703 extern int agi_dependent ();
2704 extern int reg_mentioned_in_mem ();
2705
2706 #ifdef NOTYET
2707 extern struct rtx_def *copy_all_rtx ();
2708 extern void rewrite_address ();
2709 #endif
2710
2711 /* Variables in i386.c */
2712 extern char *ix86_cpu_string;                   /* for -mcpu=<xxx> */
2713 extern char *ix86_arch_string;                  /* for -march=<xxx> */
2714 extern char *i386_reg_alloc_order;              /* register allocation order */
2715 extern char *i386_regparm_string;               /* # registers to use to pass args */
2716 extern char *i386_align_loops_string;           /* power of two alignment for loops */
2717 extern char *i386_align_jumps_string;           /* power of two alignment for non-loop jumps */
2718 extern char *i386_align_funcs_string;           /* power of two alignment for functions */
2719 extern char *i386_branch_cost_string;           /* values 1-5: see jump.c */
2720 extern int i386_regparm;                        /* i386_regparm_string as a number */
2721 extern int i386_align_loops;                    /* power of two alignment for loops */
2722 extern int i386_align_jumps;                    /* power of two alignment for non-loop jumps */
2723 extern int i386_align_funcs;                    /* power of two alignment for functions */
2724 extern int i386_branch_cost;                    /* values 1-5: see jump.c */
2725 extern char *hi_reg_name[];                     /* names for 16 bit regs */
2726 extern char *qi_reg_name[];                     /* names for 8 bit regs (low) */
2727 extern char *qi_high_reg_name[];                /* names for 8 bit regs (high) */
2728 extern enum reg_class regclass_map[];           /* smalled class containing REGNO */
2729 extern struct rtx_def *i386_compare_op0;        /* operand 0 for comparisons */
2730 extern struct rtx_def *i386_compare_op1;        /* operand 1 for comparisons */
2731
2732 /* External variables used */
2733 extern int optimize;                            /* optimization level */
2734 extern int obey_regdecls;                       /* TRUE if stupid register allocation */
2735
2736 /* External functions used */
2737 extern struct rtx_def *force_operand ();
2738
2739 \f
2740 /*
2741 Local variables:
2742 version-control: t
2743 End:
2744 */