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