gcc/expr.h

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