OSDN Git Service

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