OSDN Git Service

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