OSDN Git Service

1e50320cafbe16507450c655ce549f579079b082
[pf3gnuchains/gcc-fork.git] / gcc / expr.h
1 /* Definitions for code generation pass of GNU compiler.
2    Copyright (C) 1987, 1991, 1992, 1993, 1994, 1995, 1996, 1997, 1998,
3    1999, 2000, 2001, 2002, 2003 Free Software Foundation, Inc.
4
5 This file is part of GCC.
6
7 GCC is free software; you can redistribute it and/or modify it under
8 the terms of the GNU General Public License as published by the Free
9 Software Foundation; either version 2, or (at your option) any later
10 version.
11
12 GCC is distributed in the hope that it will be useful, but WITHOUT ANY
13 WARRANTY; without even the implied warranty of MERCHANTABILITY or
14 FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
15 for more details.
16
17 You should have received a copy of the GNU General Public License
18 along with GCC; see the file COPYING.  If not, write to the Free
19 Software Foundation, 59 Temple Place - Suite 330, Boston, MA
20 02111-1307, USA.  */
21
22 /* The default branch cost is 1.  */
23 #ifndef BRANCH_COST
24 #define BRANCH_COST 1
25 #endif
26
27 /* Macros to access the slots of a QUEUED rtx.
28    Here rather than in rtl.h because only the expansion pass
29    should ever encounter a QUEUED.  */
30
31 /* The variable for which an increment is queued.  */
32 #define QUEUED_VAR(P) XEXP (P, 0)
33 /* If the increment has been emitted, this is the insn
34    that does the increment.  It is zero before the increment is emitted.
35    If more than one insn is emitted, this is the first insn.  */
36 #define QUEUED_INSN(P) XEXP (P, 1)
37 /* If a pre-increment copy has been generated, this is the copy
38    (it is a temporary reg).  Zero if no copy made yet.  */
39 #define QUEUED_COPY(P) XEXP (P, 2)
40 /* This is the body to use for the insn to do the increment.
41    It is used to emit the increment.  */
42 #define QUEUED_BODY(P) XEXP (P, 3)
43 /* Next QUEUED in the queue.  */
44 #define QUEUED_NEXT(P) XEXP (P, 4)
45
46 /* This is the 4th arg to `expand_expr'.
47    EXPAND_STACK_PARM means we are possibly expanding a call param onto
48    the stack.  Choosing a value of 2 isn't special;  It just allows
49    some code optimization in store_expr.
50    EXPAND_SUM means it is ok to return a PLUS rtx or MULT rtx.
51    EXPAND_INITIALIZER is similar but also record any labels on forced_labels.
52    EXPAND_CONST_ADDRESS means it is ok to return a MEM whose address
53     is a constant that is not a legitimate address.
54    EXPAND_WRITE means we are only going to write to the resulting rtx.
55    EXPAND_MEMORY means we are interested in a memory result, even if
56     the memory is constant and we could have propagated a constant value.  */
57 enum expand_modifier {EXPAND_NORMAL = 0, EXPAND_STACK_PARM = 2, EXPAND_SUM,
58                       EXPAND_CONST_ADDRESS, EXPAND_INITIALIZER, EXPAND_WRITE,
59                       EXPAND_MEMORY};
60
61 /* Prevent the compiler from deferring stack pops.  See
62    inhibit_defer_pop for more information.  */
63 #define NO_DEFER_POP (inhibit_defer_pop += 1)
64
65 /* Allow the compiler to defer stack pops.  See inhibit_defer_pop for
66    more information.  */
67 #define OK_DEFER_POP (inhibit_defer_pop -= 1)
68 \f
69 enum direction {none, upward, downward};
70
71 #ifdef TREE_CODE /* Don't lose if tree.h not included.  */
72 /* Structure to record the size of a sequence of arguments
73    as the sum of a tree-expression and a constant.  This structure is
74    also used to store offsets from the stack, which might be negative,
75    so the variable part must be ssizetype, not sizetype.  */
76
77 struct args_size
78 {
79   HOST_WIDE_INT constant;
80   tree var;
81 };
82
83 /* Package up various arg related fields of struct args for
84    locate_and_pad_parm.  */
85 struct locate_and_pad_arg_data
86 {
87   /* Size of this argument on the stack, rounded up for any padding it
88      gets.  If REG_PARM_STACK_SPACE is defined, then register parms are
89      counted here, otherwise they aren't.  */
90   struct args_size size;
91   /* Offset of this argument from beginning of stack-args.  */
92   struct args_size offset;
93   /* Offset to the start of the stack slot.  Different from OFFSET
94      if this arg pads downward.  */
95   struct args_size slot_offset;
96   /* The amount that the stack pointer needs to be adjusted to
97      force alignment for the next argument.  */
98   struct args_size alignment_pad;
99 };
100 #endif
101
102 /* Add the value of the tree INC to the `struct args_size' TO.  */
103
104 #define ADD_PARM_SIZE(TO, INC)                          \
105 do {                                                    \
106   tree inc = (INC);                                     \
107   if (host_integerp (inc, 0))                           \
108     (TO).constant += tree_low_cst (inc, 0);             \
109   else if ((TO).var == 0)                               \
110     (TO).var = convert (ssizetype, inc);                \
111   else                                                  \
112     (TO).var = size_binop (PLUS_EXPR, (TO).var,         \
113                            convert (ssizetype, inc));   \
114 } while (0)
115
116 #define SUB_PARM_SIZE(TO, DEC)                          \
117 do {                                                    \
118   tree dec = (DEC);                                     \
119   if (host_integerp (dec, 0))                           \
120     (TO).constant -= tree_low_cst (dec, 0);             \
121   else if ((TO).var == 0)                               \
122     (TO).var = size_binop (MINUS_EXPR, ssize_int (0),   \
123                            convert (ssizetype, dec));   \
124   else                                                  \
125     (TO).var = size_binop (MINUS_EXPR, (TO).var,        \
126                            convert (ssizetype, dec));   \
127 } while (0)
128
129 /* Convert the implicit sum in a `struct args_size' into a tree
130    of type ssizetype.  */
131 #define ARGS_SIZE_TREE(SIZE)                                    \
132 ((SIZE).var == 0 ? ssize_int ((SIZE).constant)                  \
133  : size_binop (PLUS_EXPR, convert (ssizetype, (SIZE).var),      \
134                ssize_int ((SIZE).constant)))
135
136 /* Convert the implicit sum in a `struct args_size' into an rtx.  */
137 #define ARGS_SIZE_RTX(SIZE)                                     \
138 ((SIZE).var == 0 ? GEN_INT ((SIZE).constant)                    \
139  : expand_expr (ARGS_SIZE_TREE (SIZE), NULL_RTX, VOIDmode, 0))
140
141 /* Supply a default definition for FUNCTION_ARG_PADDING:
142    usually pad upward, but pad short args downward on
143    big-endian machines.  */
144
145 #ifndef FUNCTION_ARG_PADDING
146 #define FUNCTION_ARG_PADDING(MODE, TYPE)                                \
147   (! BYTES_BIG_ENDIAN                                                   \
148    ? upward                                                             \
149    : (((MODE) == BLKmode                                                \
150        ? ((TYPE) && TREE_CODE (TYPE_SIZE (TYPE)) == INTEGER_CST         \
151           && int_size_in_bytes (TYPE) < (PARM_BOUNDARY / BITS_PER_UNIT)) \
152        : GET_MODE_BITSIZE (MODE) < PARM_BOUNDARY)                       \
153       ? downward : upward))
154 #endif
155
156 /* Supply a default definition for FUNCTION_ARG_BOUNDARY.  Normally, we let
157    FUNCTION_ARG_PADDING, which also pads the length, handle any needed
158    alignment.  */
159
160 #ifndef FUNCTION_ARG_BOUNDARY
161 #define FUNCTION_ARG_BOUNDARY(MODE, TYPE)       PARM_BOUNDARY
162 #endif
163
164 /* Define to nonzero if complex arguments should be split into their
165    corresponding components.  */
166 #ifndef SPLIT_COMPLEX_ARGS
167 #define SPLIT_COMPLEX_ARGS 0
168 #endif
169 tree split_complex_types (tree);
170 tree split_complex_values (tree);
171
172 /* Provide a default value for STRICT_ARGUMENT_NAMING.  */
173 #ifndef STRICT_ARGUMENT_NAMING
174 #define STRICT_ARGUMENT_NAMING 0
175 #endif
176
177 /* Provide a default value for PRETEND_OUTGOING_VARARGS_NAMED.  */
178 #ifdef SETUP_INCOMING_VARARGS
179 #ifndef PRETEND_OUTGOING_VARARGS_NAMED
180 #define PRETEND_OUTGOING_VARARGS_NAMED 1
181 #endif
182 #else
183 /* It is an error to define PRETEND_OUTGOING_VARARGS_NAMED without
184    defining SETUP_INCOMING_VARARGS.  */
185 #define PRETEND_OUTGOING_VARARGS_NAMED 0
186 #endif
187
188 /* Nonzero if we do not know how to pass TYPE solely in registers.  */
189 extern bool default_must_pass_in_stack PARAMS((enum machine_mode, tree));
190 #ifndef MUST_PASS_IN_STACK
191 #define MUST_PASS_IN_STACK(MODE,TYPE) default_must_pass_in_stack(MODE, TYPE)
192 #endif
193
194 /* Nonzero if type TYPE should be returned in memory.
195    Most machines can use the following default definition.  */
196
197 #ifndef RETURN_IN_MEMORY
198 #define RETURN_IN_MEMORY(TYPE) (TYPE_MODE (TYPE) == BLKmode)
199 #endif
200
201 /* Supply a default definition of STACK_SAVEAREA_MODE for emit_stack_save.
202    Normally move_insn, so Pmode stack pointer.  */
203
204 #ifndef STACK_SAVEAREA_MODE
205 #define STACK_SAVEAREA_MODE(LEVEL) Pmode
206 #endif
207
208 /* Supply a default definition of STACK_SIZE_MODE for
209    allocate_dynamic_stack_space.  Normally PLUS/MINUS, so word_mode.  */
210
211 #ifndef STACK_SIZE_MODE
212 #define STACK_SIZE_MODE word_mode
213 #endif
214
215 /* Provide default values for the macros controlling stack checking.  */
216
217 #ifndef STACK_CHECK_BUILTIN
218 #define STACK_CHECK_BUILTIN 0
219 #endif
220
221 /* The default interval is one page.  */
222 #ifndef STACK_CHECK_PROBE_INTERVAL
223 #define STACK_CHECK_PROBE_INTERVAL 4096
224 #endif
225
226 /* The default is to do a store into the stack.  */
227 #ifndef STACK_CHECK_PROBE_LOAD
228 #define STACK_CHECK_PROBE_LOAD 0
229 #endif
230
231 /* This value is arbitrary, but should be sufficient for most machines.  */
232 #ifndef STACK_CHECK_PROTECT
233 #define STACK_CHECK_PROTECT (75 * UNITS_PER_WORD)
234 #endif
235
236 /* Make the maximum frame size be the largest we can and still only need
237    one probe per function.  */
238 #ifndef STACK_CHECK_MAX_FRAME_SIZE
239 #define STACK_CHECK_MAX_FRAME_SIZE \
240   (STACK_CHECK_PROBE_INTERVAL - UNITS_PER_WORD)
241 #endif
242
243 /* This is arbitrary, but should be large enough everywhere.  */
244 #ifndef STACK_CHECK_FIXED_FRAME_SIZE
245 #define STACK_CHECK_FIXED_FRAME_SIZE (4 * UNITS_PER_WORD)
246 #endif
247
248 /* Provide a reasonable default for the maximum size of an object to
249    allocate in the fixed frame.  We may need to be able to make this
250    controllable by the user at some point.  */
251 #ifndef STACK_CHECK_MAX_VAR_SIZE
252 #define STACK_CHECK_MAX_VAR_SIZE (STACK_CHECK_MAX_FRAME_SIZE / 100)
253 #endif
254 \f
255 /* Functions from optabs.c, commonly used, and without need for the optabs
256    tables:  */
257
258 /* Passed to expand_simple_binop and expand_binop to say which options
259    to try to use if the requested operation can't be open-coded on the
260    requisite mode.  Either OPTAB_LIB or OPTAB_LIB_WIDEN says try using
261    a library call.  Either OPTAB_WIDEN or OPTAB_LIB_WIDEN says try
262    using a wider mode.  OPTAB_MUST_WIDEN says try widening and don't
263    try anything else.  */
264
265 enum optab_methods
266 {
267   OPTAB_DIRECT,
268   OPTAB_LIB,
269   OPTAB_WIDEN,
270   OPTAB_LIB_WIDEN,
271   OPTAB_MUST_WIDEN
272 };
273
274 /* Generate code for a simple binary or unary operation.  "Simple" in
275    this case means "can be unambiguously described by a (mode, code)
276    pair and mapped to a single optab."  */
277 extern rtx expand_simple_binop PARAMS ((enum machine_mode, enum rtx_code, rtx,
278                                         rtx, rtx, int, enum optab_methods));
279 extern rtx expand_simple_unop PARAMS ((enum machine_mode, enum rtx_code,
280                                        rtx, rtx, int));
281
282 /* Report whether the machine description contains an insn which can
283    perform the operation described by CODE and MODE.  */
284 extern int have_insn_for PARAMS ((enum rtx_code, enum machine_mode));
285
286 /* Emit code to make a call to a constant function or a library call.  */
287 extern void emit_libcall_block PARAMS ((rtx, rtx, rtx, rtx));
288
289 /* Create but don't emit one rtl instruction to perform certain operations.
290    Modes must match; operands must meet the operation's predicates.
291    Likewise for subtraction and for just copying.
292    These do not call protect_from_queue; caller must do so.  */
293 extern rtx gen_add2_insn PARAMS ((rtx, rtx));
294 extern rtx gen_add3_insn PARAMS ((rtx, rtx, rtx));
295 extern rtx gen_sub2_insn PARAMS ((rtx, rtx));
296 extern rtx gen_sub3_insn PARAMS ((rtx, rtx, rtx));
297 extern rtx gen_move_insn PARAMS ((rtx, rtx));
298 extern int have_add2_insn PARAMS ((rtx, rtx));
299 extern int have_sub2_insn PARAMS ((rtx, rtx));
300
301 /* Emit a pair of rtl insns to compare two rtx's and to jump
302    to a label if the comparison is true.  */
303 extern void emit_cmp_and_jump_insns PARAMS ((rtx, rtx, enum rtx_code, rtx,
304                                              enum machine_mode, int, rtx));
305
306 /* Generate code to indirectly jump to a location given in the rtx LOC.  */
307 extern void emit_indirect_jump PARAMS ((rtx));
308
309 #ifdef HAVE_conditional_move
310 /* Emit a conditional move operation.  */
311 rtx emit_conditional_move PARAMS ((rtx, enum rtx_code, rtx, rtx,
312                                    enum machine_mode, rtx, rtx,
313                                    enum machine_mode, int));
314
315 /* Return nonzero if the conditional move is supported.  */
316 int can_conditionally_move_p PARAMS ((enum machine_mode mode));
317
318 #endif
319 rtx emit_conditional_add PARAMS ((rtx, enum rtx_code, rtx, rtx,
320                                   enum machine_mode, rtx, rtx,
321                                   enum machine_mode, int));
322
323 \f
324 /* Functions from expmed.c:  */
325
326 /* Arguments MODE, RTX: return an rtx for the negation of that value.
327    May emit insns.  */
328 extern rtx negate_rtx PARAMS ((enum machine_mode, rtx));
329
330 /* Expand a logical AND operation.  */
331 extern rtx expand_and PARAMS ((enum machine_mode, rtx, rtx, rtx));
332
333 /* Emit a store-flag operation.  */
334 extern rtx emit_store_flag PARAMS ((rtx, enum rtx_code, rtx, rtx,
335                                     enum machine_mode, int, int));
336
337 /* Like emit_store_flag, but always succeeds.  */
338 extern rtx emit_store_flag_force PARAMS ((rtx, enum rtx_code, rtx, rtx,
339                                           enum machine_mode, int, int));
340
341 /* Functions from loop.c:  */
342
343 /* Given an insn and condition, return a canonical description of
344    the test being made.  */
345 extern rtx canonicalize_condition PARAMS ((rtx, rtx, int, rtx *, rtx));
346
347 /* Given a JUMP_INSN, return a canonical description of the test
348    being made.  */
349 extern rtx get_condition PARAMS ((rtx, rtx *));
350
351 /* Generate a conditional trap instruction.  */
352 extern rtx gen_cond_trap PARAMS ((enum rtx_code, rtx, rtx, rtx));
353 \f
354 /* Functions from builtins.c:  */
355 extern rtx expand_builtin PARAMS ((tree, rtx, rtx, enum machine_mode, int));
356 extern void std_expand_builtin_va_start PARAMS ((tree, rtx));
357 extern rtx std_expand_builtin_va_arg PARAMS ((tree, tree));
358 extern rtx expand_builtin_va_arg PARAMS ((tree, tree));
359 extern void default_init_builtins PARAMS ((void));
360 extern rtx default_expand_builtin PARAMS ((tree, rtx, rtx,
361                                            enum machine_mode, int));
362 extern void expand_builtin_setjmp_setup PARAMS ((rtx, rtx));
363 extern void expand_builtin_setjmp_receiver PARAMS ((rtx));
364 extern void expand_builtin_longjmp PARAMS ((rtx, rtx));
365 extern rtx expand_builtin_saveregs PARAMS ((void));
366 extern void expand_builtin_trap PARAMS ((void));
367 extern HOST_WIDE_INT get_varargs_alias_set PARAMS ((void));
368 extern HOST_WIDE_INT get_frame_alias_set PARAMS ((void));
369 extern void record_base_value           PARAMS ((unsigned int, rtx, int));
370 extern void record_alias_subset         PARAMS ((HOST_WIDE_INT,
371                                                  HOST_WIDE_INT));
372 extern HOST_WIDE_INT new_alias_set              PARAMS ((void));
373 extern int can_address_p                PARAMS ((tree));
374 \f
375 /* Functions from expr.c:  */
376
377 /* This is run once per compilation to set up which modes can be used
378    directly in memory and to initialize the block move optab.  */
379 extern void init_expr_once PARAMS ((void));
380
381 /* This is run at the start of compiling a function.  */
382 extern void init_expr PARAMS ((void));
383
384 /* This is run at the end of compiling a function.  */
385 extern void finish_expr_for_function PARAMS ((void));
386
387 /* Use protect_from_queue to convert a QUEUED expression
388    into something that you can put immediately into an instruction.  */
389 extern rtx protect_from_queue PARAMS ((rtx, int));
390
391 /* Perform all the pending incrementations.  */
392 extern void emit_queue PARAMS ((void));
393
394 /* Tell if something has a queued subexpression.  */
395 extern int queued_subexp_p PARAMS ((rtx));
396
397 /* Emit some rtl insns to move data between rtx's, converting machine modes.
398    Both modes must be floating or both fixed.  */
399 extern void convert_move PARAMS ((rtx, rtx, int));
400
401 /* Convert an rtx to specified machine mode and return the result.  */
402 extern rtx convert_to_mode PARAMS ((enum machine_mode, rtx, int));
403
404 /* Convert an rtx to MODE from OLDMODE and return the result.  */
405 extern rtx convert_modes PARAMS ((enum machine_mode, enum machine_mode,
406                                   rtx, int));
407
408 /* Emit code to move a block Y to a block X.  */
409
410 enum block_op_methods
411 {
412   BLOCK_OP_NORMAL,
413   BLOCK_OP_NO_LIBCALL,
414   BLOCK_OP_CALL_PARM
415 };
416
417 extern void init_block_move_fn PARAMS ((const char *));
418 extern void init_block_clear_fn PARAMS ((const char *));
419
420 extern rtx emit_block_move PARAMS ((rtx, rtx, rtx, enum block_op_methods));
421
422 /* Copy all or part of a value X into registers starting at REGNO.
423    The number of registers to be filled is NREGS.  */
424 extern void move_block_to_reg PARAMS ((int, rtx, int, enum machine_mode));
425
426 /* Copy all or part of a BLKmode value X out of registers starting at REGNO.
427    The number of registers to be filled is NREGS.  */
428 extern void move_block_from_reg PARAMS ((int, rtx, int));
429
430 /* Generate a non-consecutive group of registers represented by a PARALLEL.  */
431 extern rtx gen_group_rtx PARAMS ((rtx));
432
433 /* Load a BLKmode value into non-consecutive registers represented by a
434    PARALLEL.  */
435 extern void emit_group_load PARAMS ((rtx, rtx, int));
436
437 /* Move a non-consecutive group of registers represented by a PARALLEL into
438    a non-consecutive group of registers represented by a PARALLEL.  */
439 extern void emit_group_move PARAMS ((rtx, rtx));
440
441 /* Store a BLKmode value from non-consecutive registers represented by a
442    PARALLEL.  */
443 extern void emit_group_store PARAMS ((rtx, rtx, int));
444
445 #ifdef TREE_CODE
446 /* Copy BLKmode object from a set of registers.  */
447 extern rtx copy_blkmode_from_reg PARAMS ((rtx, rtx, tree));
448 #endif
449
450 /* Mark REG as holding a parameter for the next CALL_INSN.  */
451 extern void use_reg PARAMS ((rtx *, rtx));
452
453 /* Mark NREGS consecutive regs, starting at REGNO, as holding parameters
454    for the next CALL_INSN.  */
455 extern void use_regs PARAMS ((rtx *, int, int));
456
457 /* Mark a PARALLEL as holding a parameter for the next CALL_INSN.  */
458 extern void use_group_regs PARAMS ((rtx *, rtx));
459
460 /* Write zeros through the storage of OBJECT.
461    If OBJECT has BLKmode, SIZE is its length in bytes.  */
462 extern rtx clear_storage PARAMS ((rtx, rtx));
463
464 /* Determine whether the LEN bytes can be moved by using several move
465    instructions.  Return nonzero if a call to move_by_pieces should
466    succeed.  */
467 extern int can_move_by_pieces PARAMS ((unsigned HOST_WIDE_INT, unsigned int));
468
469 /* Return nonzero if it is desirable to store LEN bytes generated by
470    CONSTFUN with several move instructions by store_by_pieces
471    function.  CONSTFUNDATA is a pointer which will be passed as argument
472    in every CONSTFUN call.
473    ALIGN is maximum alignment we can assume.  */
474 extern int can_store_by_pieces PARAMS ((unsigned HOST_WIDE_INT,
475                                         rtx (*) (PTR, HOST_WIDE_INT,
476                                                  enum machine_mode),
477                                         PTR, unsigned int));
478
479 /* Generate several move instructions to store LEN bytes generated by
480    CONSTFUN to block TO.  (A MEM rtx with BLKmode).  CONSTFUNDATA is a
481    pointer which will be passed as argument in every CONSTFUN call.
482    ALIGN is maximum alignment we can assume.
483    Returns TO + LEN.  */
484 extern rtx store_by_pieces PARAMS ((rtx, unsigned HOST_WIDE_INT,
485                                     rtx (*) (PTR, HOST_WIDE_INT,
486                                              enum machine_mode),
487                                     PTR, unsigned int, int));
488
489 /* Emit insns to set X from Y.  */
490 extern rtx emit_move_insn PARAMS ((rtx, rtx));
491
492 /* Emit insns to set X from Y, with no frills.  */
493 extern rtx emit_move_insn_1 PARAMS ((rtx, rtx));
494
495 /* Push a block of length SIZE (perhaps variable)
496    and return an rtx to address the beginning of the block.  */
497 extern rtx push_block PARAMS ((rtx, int, int));
498
499 #ifdef TREE_CODE
500 /* Generate code to push something onto the stack, given its mode and type.  */
501 extern void emit_push_insn PARAMS ((rtx, enum machine_mode, tree, rtx,
502                                     unsigned int, int, rtx, int, rtx, rtx,
503                                     int, rtx));
504
505 /* Expand an assignment that stores the value of FROM into TO.  */
506 extern rtx expand_assignment PARAMS ((tree, tree, int, int));
507
508 /* Generate code for computing expression EXP,
509    and storing the value into TARGET.
510    If SUGGEST_REG is nonzero, copy the value through a register
511    and return that register, if that is possible.  */
512 extern rtx store_expr PARAMS ((tree, rtx, int));
513 #endif
514
515 /* Given an rtx that may include add and multiply operations,
516    generate them as insns and return a pseudo-reg containing the value.
517    Useful after calling expand_expr with 1 as sum_ok.  */
518 extern rtx force_operand PARAMS ((rtx, rtx));
519
520 /* Return an object on the placeholder list that matches EXP, a
521    PLACEHOLDER_EXPR.  An object "matches" if it is of the type of the
522    PLACEHOLDER_EXPR or a pointer type to it.  For further information, see
523    tree.def.  If no such object is found, abort.  If PLIST is nonzero, it is
524    a location which initially points to a starting location in the
525    placeholder list (zero means start of the list) and where a pointer into
526    the placeholder list at which the object is found is placed.  */
527 extern tree find_placeholder PARAMS ((tree, tree *));
528
529 /* Generate code for computing expression EXP.
530    An rtx for the computed value is returned.  The value is never null.
531    In the case of a void EXP, const0_rtx is returned.  */
532 extern rtx expand_expr PARAMS ((tree, rtx, enum machine_mode,
533                                 enum expand_modifier));
534
535 /* At the start of a function, record that we have no previously-pushed
536    arguments waiting to be popped.  */
537 extern void init_pending_stack_adjust PARAMS ((void));
538
539 /* When exiting from function, if safe, clear out any pending stack adjust
540    so the adjustment won't get done.  */
541 extern void clear_pending_stack_adjust PARAMS ((void));
542
543 /* Pop any previously-pushed arguments that have not been popped yet.  */
544 extern void do_pending_stack_adjust PARAMS ((void));
545
546 #ifdef TREE_CODE
547 /* Return the tree node and offset if a given argument corresponds to
548    a string constant.  */
549 extern tree string_constant PARAMS ((tree, tree *));
550
551 /* Generate code to evaluate EXP and jump to LABEL if the value is zero.  */
552 extern void jumpifnot PARAMS ((tree, rtx));
553
554 /* Generate code to evaluate EXP and jump to LABEL if the value is nonzero.  */
555 extern void jumpif PARAMS ((tree, rtx));
556
557 /* Generate code to evaluate EXP and jump to IF_FALSE_LABEL if
558    the result is zero, or IF_TRUE_LABEL if the result is one.  */
559 extern void do_jump PARAMS ((tree, rtx, rtx));
560 #endif
561
562 /* Generate rtl to compare two rtx's, will call emit_cmp_insn.  */
563 extern rtx compare_from_rtx PARAMS ((rtx, rtx, enum rtx_code, int,
564                                      enum machine_mode, rtx));
565 extern void do_compare_rtx_and_jump PARAMS ((rtx, rtx, enum rtx_code, int,
566                                              enum machine_mode, rtx,
567                                              rtx, rtx));
568
569 /* Two different ways of generating switch statements.  */
570 extern int try_casesi    PARAMS ((tree, tree, tree, tree, rtx, rtx));
571 extern int try_tablejump PARAMS ((tree, tree, tree, tree, rtx, rtx));
572
573 /* Smallest number of adjacent cases before we use a jump table.
574    XXX Should be a target hook.  */
575 extern unsigned int case_values_threshold PARAMS ((void));
576
577 \f
578 #ifdef TREE_CODE
579 /* rtl.h and tree.h were included.  */
580 /* Return an rtx for the size in bytes of the value of an expr.  */
581 extern rtx expr_size PARAMS ((tree));
582
583 /* Return a wide integer for the size in bytes of the value of EXP, or -1
584    if the size can vary or is larger than an integer.  */
585 extern HOST_WIDE_INT int_expr_size PARAMS ((tree));
586
587 extern rtx lookup_static_chain PARAMS ((tree));
588
589 /* Convert a stack slot address ADDR valid in function FNDECL
590    into an address valid in this function (using a static chain).  */
591 extern rtx fix_lexical_addr PARAMS ((rtx, tree));
592
593 /* Return the address of the trampoline for entering nested fn FUNCTION.  */
594 extern rtx trampoline_address PARAMS ((tree));
595
596 /* Return an rtx that refers to the value returned by a function
597    in its original home.  This becomes invalid if any more code is emitted.  */
598 extern rtx hard_function_value PARAMS ((tree, tree, int));
599
600 extern rtx prepare_call_address PARAMS ((rtx, tree, rtx *, int, int));
601
602 extern rtx expand_call PARAMS ((tree, rtx, int));
603
604 extern rtx expand_shift PARAMS ((enum tree_code, enum machine_mode, rtx, tree,
605                                  rtx, int));
606 extern rtx expand_divmod PARAMS ((int, enum tree_code, enum machine_mode, rtx,
607                                   rtx, rtx, int));
608 extern void locate_and_pad_parm PARAMS ((enum machine_mode, tree, int, int,
609                                          tree, struct args_size *,
610                                          struct locate_and_pad_arg_data *));
611 extern rtx expand_inline_function PARAMS ((tree, tree, rtx, int, tree, rtx));
612
613 /* Return the CODE_LABEL rtx for a LABEL_DECL, creating it if necessary.  */
614 extern rtx label_rtx PARAMS ((tree));
615
616 /* As label_rtx, but additionally the label is placed on the forced label
617    list of its containing function (i.e. it is treated as reachable even
618    if how is not obvious).  */
619 extern rtx force_label_rtx PARAMS ((tree));
620 #endif
621
622 /* Indicate how an input argument register was promoted.  */
623 extern rtx promoted_input_arg PARAMS ((unsigned int, enum machine_mode *,
624                                        int *));
625
626 /* Return an rtx like arg but sans any constant terms.
627    Returns the original rtx if it has no constant terms.
628    The constant terms are added and stored via a second arg.  */
629 extern rtx eliminate_constant_term PARAMS ((rtx, rtx *));
630
631 /* Convert arg to a valid memory address for specified machine mode,
632    by emitting insns to perform arithmetic if nec.  */
633 extern rtx memory_address PARAMS ((enum machine_mode, rtx));
634
635 /* Like `memory_address' but pretent `flag_force_addr' is 0.  */
636 extern rtx memory_address_noforce PARAMS ((enum machine_mode, rtx));
637
638 /* Set the alias set of MEM to SET.  */
639 extern void set_mem_alias_set PARAMS ((rtx, HOST_WIDE_INT));
640
641 /* Set the alignment of MEM to ALIGN bits.  */
642 extern void set_mem_align PARAMS ((rtx, unsigned int));
643
644 /* Set the expr for MEM to EXPR.  */
645 extern void set_mem_expr PARAMS ((rtx, tree));
646
647 /* Set the offset for MEM to OFFSET.  */
648 extern void set_mem_offset PARAMS ((rtx, rtx));
649
650 /* Set the size for MEM to SIZE.  */
651 extern void set_mem_size PARAMS ((rtx, rtx));
652
653 /* Return a memory reference like MEMREF, but with its mode changed
654    to MODE and its address changed to ADDR.
655    (VOIDmode means don't change the mode.
656    NULL for ADDR means don't change the address.)  */
657 extern rtx change_address PARAMS ((rtx, enum machine_mode, rtx));
658
659 /* Return a memory reference like MEMREF, but with its mode changed
660    to MODE and its address offset by OFFSET bytes.  */
661 #define adjust_address(MEMREF, MODE, OFFSET) \
662   adjust_address_1 (MEMREF, MODE, OFFSET, 1, 1)
663
664 /* Likewise, but the reference is not required to be valid.  */
665 #define adjust_address_nv(MEMREF, MODE, OFFSET) \
666   adjust_address_1 (MEMREF, MODE, OFFSET, 0, 1)
667
668 /* Return a memory reference like MEMREF, but with its mode changed
669    to MODE and its address changed to ADDR, which is assumed to be
670    increased by OFFSET bytes from MEMREF.  */
671 #define adjust_automodify_address(MEMREF, MODE, ADDR, OFFSET) \
672   adjust_automodify_address_1 (MEMREF, MODE, ADDR, OFFSET, 1)
673
674 /* Likewise, but the reference is not required to be valid.  */
675 #define adjust_automodify_address_nv(MEMREF, MODE, ADDR, OFFSET) \
676   adjust_automodify_address_1 (MEMREF, MODE, ADDR, OFFSET, 0)
677
678 extern rtx adjust_address_1 PARAMS ((rtx, enum machine_mode, HOST_WIDE_INT,
679                                      int, int));
680 extern rtx adjust_automodify_address_1 PARAMS ((rtx, enum machine_mode,
681                                                 rtx, HOST_WIDE_INT, int));
682
683 /* Return a memory reference like MEMREF, but whose address is changed by
684    adding OFFSET, an RTX, to it.  POW2 is the highest power of two factor
685    known to be in OFFSET (possibly 1).  */
686 extern rtx offset_address PARAMS ((rtx, rtx, unsigned HOST_WIDE_INT));
687
688 /* Return a memory reference like MEMREF, but with its address changed to
689    ADDR.  The caller is asserting that the actual piece of memory pointed
690    to is the same, just the form of the address is being changed, such as
691    by putting something into a register.  */
692 extern rtx replace_equiv_address PARAMS ((rtx, rtx));
693
694 /* Likewise, but the reference is not required to be valid.  */
695 extern rtx replace_equiv_address_nv PARAMS ((rtx, rtx));
696
697 /* Return a memory reference like MEMREF, but with its mode widened to
698    MODE and adjusted by OFFSET.  */
699 extern rtx widen_memory_access PARAMS ((rtx, enum machine_mode, HOST_WIDE_INT));
700
701 /* Return a memory reference like MEMREF, but which is known to have a
702    valid address.  */
703 extern rtx validize_mem PARAMS ((rtx));
704
705 #ifdef TREE_CODE
706 /* Given REF, either a MEM or a REG, and T, either the type of X or
707    the expression corresponding to REF, set RTX_UNCHANGING_P if
708    appropriate.  */
709 extern void maybe_set_unchanging PARAMS ((rtx, tree));
710
711 /* Given REF, a MEM, and T, either the type of X or the expression
712    corresponding to REF, set the memory attributes.  OBJECTP is nonzero
713    if we are making a new object of this type.  */
714 extern void set_mem_attributes PARAMS ((rtx, tree, int));
715
716 /* Similar, except that BITPOS has not yet been applied to REF, so if
717    we alter MEM_OFFSET according to T then we should subtract BITPOS
718    expecting that it'll be added back in later.  */
719 extern void set_mem_attributes_minus_bitpos PARAMS ((rtx, tree, int,
720                                                      HOST_WIDE_INT));
721 #endif
722
723 /* Assemble the static constant template for function entry trampolines.  */
724 extern rtx assemble_trampoline_template PARAMS ((void));
725
726 /* Given rtx, return new rtx whose address won't be affected by
727    any side effects.  It has been copied to a new temporary reg.  */
728 extern rtx stabilize PARAMS ((rtx));
729
730 /* Given an rtx, copy all regs it refers to into new temps
731    and return a modified copy that refers to the new temps.  */
732 extern rtx copy_all_regs PARAMS ((rtx));
733
734 /* Copy given rtx to a new temp reg and return that.  */
735 extern rtx copy_to_reg PARAMS ((rtx));
736
737 /* Like copy_to_reg but always make the reg Pmode.  */
738 extern rtx copy_addr_to_reg PARAMS ((rtx));
739
740 /* Like copy_to_reg but always make the reg the specified mode MODE.  */
741 extern rtx copy_to_mode_reg PARAMS ((enum machine_mode, rtx));
742
743 /* Copy given rtx to given temp reg and return that.  */
744 extern rtx copy_to_suggested_reg PARAMS ((rtx, rtx, enum machine_mode));
745
746 /* Copy a value to a register if it isn't already a register.
747    Args are mode (in case value is a constant) and the value.  */
748 extern rtx force_reg PARAMS ((enum machine_mode, rtx));
749
750 /* Return given rtx, copied into a new temp reg if it was in memory.  */
751 extern rtx force_not_mem PARAMS ((rtx));
752
753 #ifdef TREE_CODE
754 /* Return mode and signedness to use when object is promoted.  */
755 extern enum machine_mode promote_mode PARAMS ((tree, enum machine_mode,
756                                                int *, int));
757 #endif
758
759 /* Remove some bytes from the stack.  An rtx says how many.  */
760 extern void adjust_stack PARAMS ((rtx));
761
762 /* Add some bytes to the stack.  An rtx says how many.  */
763 extern void anti_adjust_stack PARAMS ((rtx));
764
765 /* This enum is used for the following two functions.  */
766 enum save_level {SAVE_BLOCK, SAVE_FUNCTION, SAVE_NONLOCAL};
767
768 /* Save the stack pointer at the specified level.  */
769 extern void emit_stack_save PARAMS ((enum save_level, rtx *, rtx));
770
771 /* Restore the stack pointer from a save area of the specified level.  */
772 extern void emit_stack_restore PARAMS ((enum save_level, rtx, rtx));
773
774 /* Allocate some space on the stack dynamically and return its address.  An rtx
775    says how many bytes.  */
776 extern rtx allocate_dynamic_stack_space PARAMS ((rtx, rtx, int));
777
778 /* Probe a range of stack addresses from FIRST to FIRST+SIZE, inclusive.
779    FIRST is a constant and size is a Pmode RTX.  These are offsets from the
780    current stack pointer.  STACK_GROWS_DOWNWARD says whether to add or
781    subtract from the stack.  If SIZE is constant, this is done
782    with a fixed number of probes.  Otherwise, we must make a loop.  */
783 extern void probe_stack_range PARAMS ((HOST_WIDE_INT, rtx));
784
785 /* Return an rtx that refers to the value returned by a library call
786    in its original home.  This becomes invalid if any more code is emitted.  */
787 extern rtx hard_libcall_value PARAMS ((enum machine_mode));
788
789 /* Given an rtx, return an rtx for a value rounded up to a multiple
790    of STACK_BOUNDARY / BITS_PER_UNIT.  */
791 extern rtx round_push PARAMS ((rtx));
792
793 /* Return the mode desired by operand N of a particular bitfield
794    insert/extract insn, or MAX_MACHINE_MODE if no such insn is
795    available.  */
796
797 enum extraction_pattern { EP_insv, EP_extv, EP_extzv };
798 extern enum machine_mode
799 mode_for_extraction PARAMS ((enum extraction_pattern, int));
800
801 extern rtx store_bit_field PARAMS ((rtx, unsigned HOST_WIDE_INT,
802                                     unsigned HOST_WIDE_INT,
803                                     enum machine_mode, rtx, HOST_WIDE_INT));
804 extern rtx extract_bit_field PARAMS ((rtx, unsigned HOST_WIDE_INT,
805                                       unsigned HOST_WIDE_INT, int, rtx,
806                                       enum machine_mode, enum machine_mode,
807                                       HOST_WIDE_INT));
808 extern rtx expand_mult PARAMS ((enum machine_mode, rtx, rtx, rtx, int));
809 extern bool const_mult_add_overflow_p PARAMS ((rtx, rtx, rtx, enum machine_mode, int));
810 extern rtx expand_mult_add PARAMS ((rtx, rtx, rtx, rtx,enum machine_mode, int));
811 extern rtx expand_mult_highpart_adjust PARAMS ((enum machine_mode, rtx, rtx, rtx, rtx, int));
812
813 extern rtx assemble_static_space PARAMS ((unsigned HOST_WIDE_INT));
814 extern int safe_from_p PARAMS ((rtx, tree, int));
815
816 /* Call this once to initialize the contents of the optabs
817    appropriately for the current target machine.  */
818 extern void init_optabs                         PARAMS ((void));
819 extern void init_all_optabs                     PARAMS ((void));
820
821 /* Call this to initialize an optab function entry.  */
822 extern rtx init_one_libfunc                     PARAMS ((const char *));
823
824 extern void do_jump_by_parts_equality_rtx       PARAMS ((rtx, rtx, rtx));
825 extern void do_jump_by_parts_greater_rtx        PARAMS ((enum machine_mode,
826                                                          int, rtx, rtx, rtx,
827                                                          rtx));
828
829 #ifdef TREE_CODE   /* Don't lose if tree.h not included.  */
830 extern void mark_seen_cases                     PARAMS ((tree, unsigned char *,
831                                                          HOST_WIDE_INT, int));
832 #endif
833
834 extern int vector_mode_valid_p          PARAMS ((enum machine_mode));
835
836 extern tree placeholder_list;