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