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