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