expr.h 31.1 KB
Newer Older
Richard Kenner committed
1
/* Definitions for code generation pass of GNU compiler.
Jeff Law committed
2
   Copyright (C) 1987, 1991, 1992, 1993, 1994, 1995, 1996, 1997, 1998,
3
   1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009
4
   Free Software Foundation, Inc.
Richard Kenner committed
5

6
This file is part of GCC.
Richard Kenner committed
7

8 9
GCC is free software; you can redistribute it and/or modify it under
the terms of the GNU General Public License as published by the Free
10
Software Foundation; either version 3, or (at your option) any later
11
version.
Richard Kenner committed
12

13 14 15 16
GCC is distributed in the hope that it will be useful, but WITHOUT ANY
WARRANTY; without even the implied warranty of MERCHANTABILITY or
FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
for more details.
Richard Kenner committed
17 18

You should have received a copy of the GNU General Public License
19 20
along with GCC; see the file COPYING3.  If not see
<http://www.gnu.org/licenses/>.  */
Richard Kenner committed
21

22 23 24 25 26 27 28 29 30
#ifndef GCC_EXPR_H
#define GCC_EXPR_H

/* For inhibit_defer_pop */
#include "function.h"
/* For XEXP, GEN_INT, rtx_code */
#include "rtl.h"
/* For optimize_size */
#include "flags.h"
31 32
/* For host_integerp, tree_low_cst, fold_convert, size_binop, ssize_int,
   TREE_CODE, TYPE_SIZE, int_size_in_bytes,    */
33 34 35 36
#include "tree.h"
/* For GET_MODE_BITSIZE, word_mode */
#include "machmode.h"

Richard Kenner committed
37 38
/* The default branch cost is 1.  */
#ifndef BRANCH_COST
39
#define BRANCH_COST(speed_p, predictable_p) 1
Richard Kenner committed
40 41 42
#endif

/* This is the 4th arg to `expand_expr'.
43
   EXPAND_STACK_PARM means we are possibly expanding a call param onto
44
   the stack.
Richard Kenner committed
45 46 47
   EXPAND_SUM means it is ok to return a PLUS rtx or MULT rtx.
   EXPAND_INITIALIZER is similar but also record any labels on forced_labels.
   EXPAND_CONST_ADDRESS means it is ok to return a MEM whose address
48
    is a constant that is not a legitimate address.
49 50 51
   EXPAND_WRITE means we are only going to write to the resulting rtx.
   EXPAND_MEMORY means we are interested in a memory result, even if
    the memory is constant and we could have propagated a constant value.  */
52
enum expand_modifier {EXPAND_NORMAL = 0, EXPAND_STACK_PARM, EXPAND_SUM,
53 54
		      EXPAND_CONST_ADDRESS, EXPAND_INITIALIZER, EXPAND_WRITE,
		      EXPAND_MEMORY};
Richard Kenner committed
55

56 57 58 59 60 61 62
/* Prevent the compiler from deferring stack pops.  See
   inhibit_defer_pop for more information.  */
#define NO_DEFER_POP (inhibit_defer_pop += 1)

/* Allow the compiler to defer stack pops.  See inhibit_defer_pop for
   more information.  */
#define OK_DEFER_POP (inhibit_defer_pop -= 1)
Richard Kenner committed
63

64
/* If a memory-to-memory move would take MOVE_RATIO or more simple
65
   move-instruction sequences, we will do a movmem or libcall instead.  */
66 67

#ifndef MOVE_RATIO
68
#if defined (HAVE_movmemqi) || defined (HAVE_movmemhi) || defined (HAVE_movmemsi) || defined (HAVE_movmemdi) || defined (HAVE_movmemti)
69
#define MOVE_RATIO(speed) 2
70 71
#else
/* If we are optimizing for space (-Os), cut down the default move ratio.  */
72
#define MOVE_RATIO(speed) ((speed) ? 15 : 3)
73 74 75 76
#endif
#endif

/* If a clear memory operation would take CLEAR_RATIO or more simple
77
   move-instruction sequences, we will do a setmem or libcall instead.  */
78 79

#ifndef CLEAR_RATIO
80
#if defined (HAVE_setmemqi) || defined (HAVE_setmemhi) || defined (HAVE_setmemsi) || defined (HAVE_setmemdi) || defined (HAVE_setmemti)
81
#define CLEAR_RATIO(speed) 2
82 83
#else
/* If we are optimizing for space, cut down the default clear ratio.  */
84
#define CLEAR_RATIO(speed) ((speed) ? 15 :3)
85 86
#endif
#endif
87 88 89 90 91

/* If a memory set (to value other than zero) operation would take
   SET_RATIO or more simple move-instruction sequences, we will do a movmem
   or libcall instead.  */
#ifndef SET_RATIO
92
#define SET_RATIO(speed) MOVE_RATIO(speed)
93
#endif
94

95 96
enum direction {none, upward, downward};

Richard Kenner committed
97
/* Structure to record the size of a sequence of arguments
98 99 100
   as the sum of a tree-expression and a constant.  This structure is
   also used to store offsets from the stack, which might be negative,
   so the variable part must be ssizetype, not sizetype.  */
Richard Kenner committed
101 102 103

struct args_size
{
104
  HOST_WIDE_INT constant;
Richard Kenner committed
105 106
  tree var;
};
107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123

/* Package up various arg related fields of struct args for
   locate_and_pad_parm.  */
struct locate_and_pad_arg_data
{
  /* Size of this argument on the stack, rounded up for any padding it
     gets.  If REG_PARM_STACK_SPACE is defined, then register parms are
     counted here, otherwise they aren't.  */
  struct args_size size;
  /* Offset of this argument from beginning of stack-args.  */
  struct args_size offset;
  /* Offset to the start of the stack slot.  Different from OFFSET
     if this arg pads downward.  */
  struct args_size slot_offset;
  /* The amount that the stack pointer needs to be adjusted to
     force alignment for the next argument.  */
  struct args_size alignment_pad;
124 125
  /* Which way we should pad this arg.  */
  enum direction where_pad;
126 127
  /* slot_offset is at least this aligned.  */
  unsigned int boundary;
128
};
Richard Kenner committed
129 130 131

/* Add the value of the tree INC to the `struct args_size' TO.  */

132 133 134 135 136 137 138 139 140 141
#define ADD_PARM_SIZE(TO, INC)					\
do {								\
  tree inc = (INC);						\
  if (host_integerp (inc, 0))					\
    (TO).constant += tree_low_cst (inc, 0);			\
  else if ((TO).var == 0)					\
    (TO).var = fold_convert (ssizetype, inc);			\
  else								\
    (TO).var = size_binop (PLUS_EXPR, (TO).var,			\
			   fold_convert (ssizetype, inc));	\
142 143
} while (0)

144 145 146 147 148 149 150 151 152 153 154
#define SUB_PARM_SIZE(TO, DEC)					\
do {								\
  tree dec = (DEC);						\
  if (host_integerp (dec, 0))					\
    (TO).constant -= tree_low_cst (dec, 0);			\
  else if ((TO).var == 0)					\
    (TO).var = size_binop (MINUS_EXPR, ssize_int (0),		\
			   fold_convert (ssizetype, dec));	\
  else								\
    (TO).var = size_binop (MINUS_EXPR, (TO).var,		\
			   fold_convert (ssizetype, dec));	\
155
} while (0)
Richard Kenner committed
156

157 158 159 160
/* Convert the implicit sum in a `struct args_size' into a tree
   of type ssizetype.  */
#define ARGS_SIZE_TREE(SIZE)					\
((SIZE).var == 0 ? ssize_int ((SIZE).constant)			\
161
 : size_binop (PLUS_EXPR, fold_convert (ssizetype, (SIZE).var),	\
162
	       ssize_int ((SIZE).constant)))
163

Richard Kenner committed
164
/* Convert the implicit sum in a `struct args_size' into an rtx.  */
165 166
#define ARGS_SIZE_RTX(SIZE)					\
((SIZE).var == 0 ? GEN_INT ((SIZE).constant)			\
167
 : expand_normal (ARGS_SIZE_TREE (SIZE)))
Richard Kenner committed
168 169

/* Supply a default definition for FUNCTION_ARG_PADDING:
Richard Stallman committed
170
   usually pad upward, but pad short args downward on
Richard Kenner committed
171 172
   big-endian machines.  */

173
#define DEFAULT_FUNCTION_ARG_PADDING(MODE, TYPE)			\
174 175 176 177 178 179 180
  (! BYTES_BIG_ENDIAN							\
   ? upward								\
   : (((MODE) == BLKmode						\
       ? ((TYPE) && TREE_CODE (TYPE_SIZE (TYPE)) == INTEGER_CST		\
	  && int_size_in_bytes (TYPE) < (PARM_BOUNDARY / BITS_PER_UNIT)) \
       : GET_MODE_BITSIZE (MODE) < PARM_BOUNDARY)			\
      ? downward : upward))
181 182 183 184

#ifndef FUNCTION_ARG_PADDING
#define FUNCTION_ARG_PADDING(MODE, TYPE)	\
  DEFAULT_FUNCTION_ARG_PADDING ((MODE), (TYPE))
Richard Kenner committed
185 186 187 188 189
#endif

/* Supply a default definition for FUNCTION_ARG_BOUNDARY.  Normally, we let
   FUNCTION_ARG_PADDING, which also pads the length, handle any needed
   alignment.  */
Kazu Hirata committed
190

Richard Kenner committed
191 192 193 194
#ifndef FUNCTION_ARG_BOUNDARY
#define FUNCTION_ARG_BOUNDARY(MODE, TYPE)	PARM_BOUNDARY
#endif

195 196 197 198 199 200 201
/* Supply a default definition of STACK_SAVEAREA_MODE for emit_stack_save.
   Normally move_insn, so Pmode stack pointer.  */

#ifndef STACK_SAVEAREA_MODE
#define STACK_SAVEAREA_MODE(LEVEL) Pmode
#endif

202 203 204 205 206 207 208
/* Supply a default definition of STACK_SIZE_MODE for
   allocate_dynamic_stack_space.  Normally PLUS/MINUS, so word_mode.  */

#ifndef STACK_SIZE_MODE
#define STACK_SIZE_MODE word_mode
#endif

209 210
/* Provide default values for the macros controlling stack checking.  */

211
/* The default is neither full builtin stack checking...  */
212 213 214 215
#ifndef STACK_CHECK_BUILTIN
#define STACK_CHECK_BUILTIN 0
#endif

216 217 218 219 220
/* ...nor static builtin stack checking.  */
#ifndef STACK_CHECK_STATIC_BUILTIN
#define STACK_CHECK_STATIC_BUILTIN 0
#endif

221 222 223
/* The default interval is one page (4096 bytes).  */
#ifndef STACK_CHECK_PROBE_INTERVAL_EXP
#define STACK_CHECK_PROBE_INTERVAL_EXP 12
224 225 226 227 228 229 230
#endif

/* The default is to do a store into the stack.  */
#ifndef STACK_CHECK_PROBE_LOAD
#define STACK_CHECK_PROBE_LOAD 0
#endif

231 232 233 234 235
/* The default is not to move the stack pointer.  */
#ifndef STACK_CHECK_MOVING_SP
#define STACK_CHECK_MOVING_SP 0
#endif

236 237 238 239 240 241 242 243 244 245 246 247 248 249 250
/* This is a kludge to try to capture the discrepancy between the old
   mechanism (generic stack checking) and the new mechanism (static
   builtin stack checking).  STACK_CHECK_PROTECT needs to be bumped
   for the latter because part of the protection area is effectively
   included in STACK_CHECK_MAX_FRAME_SIZE for the former.  */
#ifdef STACK_CHECK_PROTECT
#define STACK_OLD_CHECK_PROTECT STACK_CHECK_PROTECT
#else
#define STACK_OLD_CHECK_PROTECT \
 (USING_SJLJ_EXCEPTIONS ? 75 * UNITS_PER_WORD : 8 * 1024)
#endif

/* Minimum amount of stack required to recover from an anticipated stack
   overflow detection.  The default value conveys an estimate of the amount
   of stack required to propagate an exception.  */
251
#ifndef STACK_CHECK_PROTECT
252 253
#define STACK_CHECK_PROTECT \
 (USING_SJLJ_EXCEPTIONS ? 75 * UNITS_PER_WORD : 12 * 1024)
254 255 256 257 258 259
#endif

/* Make the maximum frame size be the largest we can and still only need
   one probe per function.  */
#ifndef STACK_CHECK_MAX_FRAME_SIZE
#define STACK_CHECK_MAX_FRAME_SIZE \
260
  ((1 << STACK_CHECK_PROBE_INTERVAL_EXP) - UNITS_PER_WORD)
261 262 263 264 265 266 267 268 269 270 271 272 273
#endif

/* This is arbitrary, but should be large enough everywhere.  */
#ifndef STACK_CHECK_FIXED_FRAME_SIZE
#define STACK_CHECK_FIXED_FRAME_SIZE (4 * UNITS_PER_WORD)
#endif

/* Provide a reasonable default for the maximum size of an object to
   allocate in the fixed frame.  We may need to be able to make this
   controllable by the user at some point.  */
#ifndef STACK_CHECK_MAX_VAR_SIZE
#define STACK_CHECK_MAX_VAR_SIZE (STACK_CHECK_MAX_FRAME_SIZE / 100)
#endif
Richard Kenner committed
274

275 276 277 278 279 280 281 282 283 284 285
/* This structure is used to pass around information about exploded
   unary, binary and trinary expressions between expand_expr_real_1 and
   friends.  */
typedef struct separate_ops
{
  enum tree_code code;
  tree type;
  tree op0, op1, op2;
  location_t location;
} *sepops;

286 287
/* Functions from optabs.c, commonly used, and without need for the optabs
   tables:  */
Richard Kenner committed
288

289 290 291 292 293 294 295 296 297 298 299 300 301 302 303 304 305 306 307
/* Passed to expand_simple_binop and expand_binop to say which options
   to try to use if the requested operation can't be open-coded on the
   requisite mode.  Either OPTAB_LIB or OPTAB_LIB_WIDEN says try using
   a library call.  Either OPTAB_WIDEN or OPTAB_LIB_WIDEN says try
   using a wider mode.  OPTAB_MUST_WIDEN says try widening and don't
   try anything else.  */

enum optab_methods
{
  OPTAB_DIRECT,
  OPTAB_LIB,
  OPTAB_WIDEN,
  OPTAB_LIB_WIDEN,
  OPTAB_MUST_WIDEN
};

/* Generate code for a simple binary or unary operation.  "Simple" in
   this case means "can be unambiguously described by a (mode, code)
   pair and mapped to a single optab."  */
308 309 310 311
extern rtx expand_simple_binop (enum machine_mode, enum rtx_code, rtx,
				rtx, rtx, int, enum optab_methods);
extern rtx expand_simple_unop (enum machine_mode, enum rtx_code, rtx, rtx,
			       int);
312 313 314

/* Report whether the machine description contains an insn which can
   perform the operation described by CODE and MODE.  */
315
extern int have_insn_for (enum rtx_code, enum machine_mode);
316

Paolo Bonzini committed
317 318 319
extern rtx prepare_operand (int, rtx, int, enum machine_mode, enum machine_mode,
			    int);

320
/* Emit code to make a call to a constant function or a library call.  */
321
extern void emit_libcall_block (rtx, rtx, rtx, rtx);
Richard Kenner committed
322

323 324
/* Create but don't emit one rtl instruction to perform certain operations.
   Modes must match; operands must meet the operation's predicates.
325
   Likewise for subtraction and for just copying.  */
326 327 328 329 330 331 332
extern rtx gen_add2_insn (rtx, rtx);
extern rtx gen_add3_insn (rtx, rtx, rtx);
extern rtx gen_sub2_insn (rtx, rtx);
extern rtx gen_sub3_insn (rtx, rtx, rtx);
extern rtx gen_move_insn (rtx, rtx);
extern int have_add2_insn (rtx, rtx);
extern int have_sub2_insn (rtx, rtx);
333

Kazu Hirata committed
334
/* Emit a pair of rtl insns to compare two rtx's and to jump
335
   to a label if the comparison is true.  */
336 337
extern void emit_cmp_and_jump_insns (rtx, rtx, enum rtx_code, rtx,
				     enum machine_mode, int, rtx);
338

339
/* Generate code to indirectly jump to a location given in the rtx LOC.  */
340
extern void emit_indirect_jump (rtx);
341

342 343 344
/* Generate a conditional trap instruction.  */
extern rtx gen_cond_trap (enum rtx_code, rtx, rtx, rtx);

345 346
#include "insn-config.h"

347 348
#ifdef HAVE_conditional_move
/* Emit a conditional move operation.  */
349 350
rtx emit_conditional_move (rtx, enum rtx_code, rtx, rtx, enum machine_mode,
			   rtx, rtx, enum machine_mode, int);
351

352
/* Return nonzero if the conditional move is supported.  */
353
int can_conditionally_move_p (enum machine_mode mode);
354

355
#endif
356 357
rtx emit_conditional_add (rtx, enum rtx_code, rtx, rtx, enum machine_mode,
			  rtx, rtx, enum machine_mode, int);
358

359 360 361 362 363
rtx expand_val_compare_and_swap (rtx, rtx, rtx, rtx);
rtx expand_bool_compare_and_swap (rtx, rtx, rtx, rtx);
rtx expand_sync_operation (rtx, rtx, enum rtx_code);
rtx expand_sync_fetch_operation (rtx, rtx, enum rtx_code, bool, rtx);
rtx expand_sync_lock_test_and_set (rtx, rtx, rtx);
364

365
/* Functions from expmed.c:  */
Richard Kenner committed
366

367 368
/* Arguments MODE, RTX: return an rtx for the negation of that value.
   May emit insns.  */
369
extern rtx negate_rtx (enum machine_mode, rtx);
Richard Kenner committed
370

371
/* Expand a logical AND operation.  */
372
extern rtx expand_and (enum machine_mode, rtx, rtx, rtx);
Richard Kenner committed
373

374
/* Emit a store-flag operation.  */
375 376
extern rtx emit_store_flag (rtx, enum rtx_code, rtx, rtx, enum machine_mode,
			    int, int);
Richard Kenner committed
377

378
/* Like emit_store_flag, but always succeeds.  */
379 380
extern rtx emit_store_flag_force (rtx, enum rtx_code, rtx, rtx,
				  enum machine_mode, int, int);
381

382
/* Functions from builtins.c:  */
383
extern rtx expand_builtin (tree, rtx, rtx, enum machine_mode, int);
384
extern tree std_build_builtin_va_list (void);
385 386 387
extern tree std_fn_abi_va_list (tree);
extern tree std_canonical_va_list_type (tree);

388 389 390 391 392
extern void std_expand_builtin_va_start (tree, rtx);
extern rtx default_expand_builtin (tree, rtx, rtx, enum machine_mode, int);
extern void expand_builtin_setjmp_setup (rtx, rtx);
extern void expand_builtin_setjmp_receiver (rtx);
extern rtx expand_builtin_saveregs (void);
393
extern void expand_builtin_trap (void);
394
extern rtx builtin_strncpy_read_str (void *, HOST_WIDE_INT, enum machine_mode);
395

396
/* Functions from expr.c:  */
397

398 399 400
/* This is run during target initialization to set up which modes can be 
   used directly in memory and to initialize the block move optab.  */
extern void init_expr_target (void);
401 402

/* This is run at the start of compiling a function.  */
403
extern void init_expr (void);
404

Richard Kenner committed
405 406
/* Emit some rtl insns to move data between rtx's, converting machine modes.
   Both modes must be floating or both fixed.  */
407
extern void convert_move (rtx, rtx, int);
Richard Kenner committed
408 409

/* Convert an rtx to specified machine mode and return the result.  */
410
extern rtx convert_to_mode (enum machine_mode, rtx, int);
Richard Kenner committed
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 418 419

enum block_op_methods
{
  BLOCK_OP_NORMAL,
420
  BLOCK_OP_NO_LIBCALL,
421 422 423
  BLOCK_OP_CALL_PARM,
  /* Like BLOCK_OP_NORMAL, but the libcall can be tail call optimized.  */
  BLOCK_OP_TAILCALL
424 425
};

426
extern GTY(()) tree block_clear_fn;
427 428
extern void init_block_move_fn (const char *);
extern void init_block_clear_fn (const char *);
429

430
extern rtx emit_block_move (rtx, rtx, rtx, enum block_op_methods);
431
extern rtx emit_block_move_via_libcall (rtx, rtx, rtx, bool);
432 433
extern rtx emit_block_move_hints (rtx, rtx, rtx, enum block_op_methods,
			          unsigned int, HOST_WIDE_INT);
434
extern bool emit_storent_insn (rtx to, rtx from);
435 436 437

/* Copy all or part of a value X into registers starting at REGNO.
   The number of registers to be filled is NREGS.  */
438
extern void move_block_to_reg (int, rtx, int, enum machine_mode);
439 440 441

/* Copy all or part of a BLKmode value X out of registers starting at REGNO.
   The number of registers to be filled is NREGS.  */
442
extern void move_block_from_reg (int, rtx, int);
443

444
/* Generate a non-consecutive group of registers represented by a PARALLEL.  */
445
extern rtx gen_group_rtx (rtx);
446

447 448
/* Load a BLKmode value into non-consecutive registers represented by a
   PARALLEL.  */
449
extern void emit_group_load (rtx, rtx, tree, int);
450

451 452 453
/* Similarly, but load into new temporaries.  */
extern rtx emit_group_load_into_temps (rtx, rtx, tree, int);

454 455
/* Move a non-consecutive group of registers represented by a PARALLEL into
   a non-consecutive group of registers represented by a PARALLEL.  */
456
extern void emit_group_move (rtx, rtx);
457

458 459 460
/* Move a group of registers represented by a PARALLEL into pseudos.  */
extern rtx emit_group_move_into_temps (rtx);

461 462
/* Store a BLKmode value from non-consecutive registers represented by a
   PARALLEL.  */
463
extern void emit_group_store (rtx, rtx, tree, int);
464

465
/* Copy BLKmode object from a set of registers.  */
466
extern rtx copy_blkmode_from_reg (rtx, rtx, tree);
467

468
/* Mark REG as holding a parameter for the next CALL_INSN.  */
469
extern void use_reg (rtx *, rtx);
470

471 472
/* Mark NREGS consecutive regs, starting at REGNO, as holding parameters
   for the next CALL_INSN.  */
473
extern void use_regs (rtx *, int, int);
474

475
/* Mark a PARALLEL as holding a parameter for the next CALL_INSN.  */
476
extern void use_group_regs (rtx *, rtx);
477 478

/* Write zeros through the storage of OBJECT.
479
   If OBJECT has BLKmode, SIZE is its length in bytes.  */
480
extern rtx clear_storage (rtx, rtx, enum block_op_methods);
481 482
extern rtx clear_storage_hints (rtx, rtx, enum block_op_methods,
			        unsigned int, HOST_WIDE_INT);
483 484
/* The same, but always output an library call.  */
rtx set_storage_via_libcall (rtx, rtx, rtx, bool);
485

486
/* Expand a setmem pattern; return true if successful.  */
487 488
extern bool set_storage_via_setmem (rtx, rtx, rtx, unsigned int, 
				    unsigned int, HOST_WIDE_INT);
489

490 491 492
/* Determine whether the LEN bytes can be moved by using several move
   instructions.  Return nonzero if a call to move_by_pieces should
   succeed.  */
493
extern int can_move_by_pieces (unsigned HOST_WIDE_INT, unsigned int);
494

495
/* Return nonzero if it is desirable to store LEN bytes generated by
496 497 498
   CONSTFUN with several move instructions by store_by_pieces
   function.  CONSTFUNDATA is a pointer which will be passed as argument
   in every CONSTFUN call.
499 500 501
   ALIGN is maximum alignment we can assume.
   MEMSETP is true if this is a real memset/bzero, not a copy
   of a const string.  */
502 503 504
extern int can_store_by_pieces (unsigned HOST_WIDE_INT,
				rtx (*) (void *, HOST_WIDE_INT,
					 enum machine_mode),
505
				void *, unsigned int, bool);
506 507 508 509

/* Generate several move instructions to store LEN bytes generated by
   CONSTFUN to block TO.  (A MEM rtx with BLKmode).  CONSTFUNDATA is a
   pointer which will be passed as argument in every CONSTFUN call.
510
   ALIGN is maximum alignment we can assume.
511
   MEMSETP is true if this is a real memset/bzero, not a copy.
512
   Returns TO + LEN.  */
513 514
extern rtx store_by_pieces (rtx, unsigned HOST_WIDE_INT,
			    rtx (*) (void *, HOST_WIDE_INT, enum machine_mode),
515
			    void *, unsigned int, bool, int);
516

517
/* Emit insns to set X from Y.  */
518
extern rtx emit_move_insn (rtx, rtx);
519 520

/* Emit insns to set X from Y, with no frills.  */
521
extern rtx emit_move_insn_1 (rtx, rtx);
522

523 524 525
extern rtx emit_move_complex_push (enum machine_mode, rtx, rtx);
extern rtx emit_move_complex_parts (rtx, rtx);

526 527
/* Push a block of length SIZE (perhaps variable)
   and return an rtx to address the beginning of the block.  */
528
extern rtx push_block (rtx, int, int);
529 530

/* Generate code to push something onto the stack, given its mode and type.  */
531 532
extern void emit_push_insn (rtx, enum machine_mode, tree, rtx, unsigned int,
			    int, rtx, int, rtx, rtx, int, rtx);
533

534
/* Expand an assignment that stores the value of FROM into TO.  */
535
extern void expand_assignment (tree, tree, bool);
536 537 538 539 540

/* Generate code for computing expression EXP,
   and storing the value into TARGET.
   If SUGGEST_REG is nonzero, copy the value through a register
   and return that register, if that is possible.  */
541
extern rtx store_expr (tree, rtx, int, bool);
Richard Kenner committed
542 543 544 545

/* Given an rtx that may include add and multiply operations,
   generate them as insns and return a pseudo-reg containing the value.
   Useful after calling expand_expr with 1 as sum_ok.  */
546
extern rtx force_operand (rtx, rtx);
Richard Kenner committed
547

548
/* Work horses for expand_expr.  */
549 550
extern rtx expand_expr_real (tree, rtx, enum machine_mode, 
			     enum expand_modifier, rtx *);
551 552 553 554
extern rtx expand_expr_real_1 (tree, rtx, enum machine_mode,
			       enum expand_modifier, rtx *);
extern rtx expand_expr_real_2 (sepops, rtx, enum machine_mode,
			       enum expand_modifier);
555

556 557 558
/* Generate code for computing expression EXP.
   An rtx for the computed value is returned.  The value is never null.
   In the case of a void EXP, const0_rtx is returned.  */
559 560 561 562
static inline rtx
expand_expr (tree exp, rtx target, enum machine_mode mode,
	     enum expand_modifier modifier)
{
Richard Kenner committed
563
  return expand_expr_real (exp, target, mode, modifier, NULL);
564
}
565

566 567 568 569 570 571
static inline rtx
expand_normal (tree exp)
{
  return expand_expr_real (exp, NULL_RTX, VOIDmode, EXPAND_NORMAL, NULL);
}

572 573
/* At the start of a function, record that we have no previously-pushed
   arguments waiting to be popped.  */
574
extern void init_pending_stack_adjust (void);
575

576 577 578
/* Discard any pending stack adjustment.  */
extern void discard_pending_stack_adjust (void);

579 580
/* When exiting from function, if safe, clear out any pending stack adjust
   so the adjustment won't get done.  */
581
extern void clear_pending_stack_adjust (void);
582 583

/* Pop any previously-pushed arguments that have not been popped yet.  */
584
extern void do_pending_stack_adjust (void);
585

586 587
/* Return the tree node and offset if a given argument corresponds to
   a string constant.  */
588
extern tree string_constant (tree, tree *);
589

590
/* Generate code to evaluate EXP and jump to LABEL if the value is zero.  */
591
extern void jumpifnot (tree, rtx);
592
extern void jumpifnot_1 (enum tree_code, tree, tree, rtx);
593 594

/* Generate code to evaluate EXP and jump to LABEL if the value is nonzero.  */
595
extern void jumpif (tree, rtx);
596
extern void jumpif_1 (enum tree_code, tree, tree, rtx);
597 598 599

/* Generate code to evaluate EXP and jump to IF_FALSE_LABEL if
   the result is zero, or IF_TRUE_LABEL if the result is one.  */
600
extern void do_jump (tree, rtx, rtx);
601
extern void do_jump_1 (enum tree_code, tree, tree, rtx, rtx);
602

603 604
extern void do_compare_rtx_and_jump (rtx, rtx, enum rtx_code, int,
				     enum machine_mode, rtx, rtx, rtx);
605

606
/* Two different ways of generating switch statements.  */
607
extern int try_casesi (tree, tree, tree, tree, rtx, rtx, rtx);
608
extern int try_tablejump (tree, tree, tree, tree, rtx, rtx);
609

610 611 612
/* Functions from alias.c */
#include "alias.h"

613

614 615
/* rtl.h and tree.h were included.  */
/* Return an rtx for the size in bytes of the value of an expr.  */
616
extern rtx expr_size (tree);
617

618 619
/* Return a wide integer for the size in bytes of the value of EXP, or -1
   if the size can vary or is larger than an integer.  */
620
extern HOST_WIDE_INT int_expr_size (tree);
621

622 623
/* Return an rtx that refers to the value returned by a function
   in its original home.  This becomes invalid if any more code is emitted.  */
624
extern rtx hard_function_value (const_tree, const_tree, const_tree, int);
625

626
extern rtx prepare_call_address (tree, rtx, rtx, rtx *, int, int);
627

628 629
extern bool shift_return_value (enum machine_mode, bool, rtx);

630
extern rtx expand_call (tree, rtx, int);
631

632 633
extern void fixup_tail_calls (void);

634
#ifdef TREE_CODE
635 636 637 638
extern rtx expand_shift (enum tree_code, enum machine_mode, rtx, tree, rtx,
			 int);
extern rtx expand_divmod (int, enum tree_code, enum machine_mode, rtx, rtx,
			  rtx, int);
639 640
#endif

641 642 643
extern void locate_and_pad_parm (enum machine_mode, tree, int, int, tree,
				 struct args_size *,
				 struct locate_and_pad_arg_data *);
644

645
/* Return the CODE_LABEL rtx for a LABEL_DECL, creating it if necessary.  */
646
extern rtx label_rtx (tree);
647 648 649 650

/* As label_rtx, but additionally the label is placed on the forced label
   list of its containing function (i.e. it is treated as reachable even
   if how is not obvious).  */
651
extern rtx force_label_rtx (tree);
652

Richard Kenner committed
653 654 655
/* Return an rtx like arg but sans any constant terms.
   Returns the original rtx if it has no constant terms.
   The constant terms are added and stored via a second arg.  */
656
extern rtx eliminate_constant_term (rtx, rtx *);
Richard Kenner committed
657

658 659 660 661 662 663 664 665 666
/* Convert arg to a valid memory address for specified machine mode that points
   to a specific named address space, by emitting insns to perform arithmetic
   if necessary.  */
extern rtx memory_address_addr_space (enum machine_mode, rtx, addr_space_t);

/* Like memory_address_addr_space, except assume the memory address points to
   the generic named address space.  */
#define memory_address(MODE,RTX) \
	memory_address_addr_space ((MODE), (RTX), ADDR_SPACE_GENERIC)
Richard Kenner committed
667 668 669 670

/* Return a memory reference like MEMREF, but with its mode changed
   to MODE and its address changed to ADDR.
   (VOIDmode means don't change the mode.
671
   NULL for ADDR means don't change the address.)  */
672
extern rtx change_address (rtx, enum machine_mode, rtx);
Richard Kenner committed
673

674 675
/* Return a memory reference like MEMREF, but with its mode changed
   to MODE and its address offset by OFFSET bytes.  */
676
#define adjust_address(MEMREF, MODE, OFFSET) \
Jakub Jelinek committed
677
  adjust_address_1 (MEMREF, MODE, OFFSET, 1, 1)
678

Richard Kenner committed
679
/* Likewise, but the reference is not required to be valid.  */
680
#define adjust_address_nv(MEMREF, MODE, OFFSET) \
Jakub Jelinek committed
681 682 683 684 685 686 687 688 689 690 691
  adjust_address_1 (MEMREF, MODE, OFFSET, 0, 1)

/* Return a memory reference like MEMREF, but with its mode changed
   to MODE and its address changed to ADDR, which is assumed to be
   increased by OFFSET bytes from MEMREF.  */
#define adjust_automodify_address(MEMREF, MODE, ADDR, OFFSET) \
  adjust_automodify_address_1 (MEMREF, MODE, ADDR, OFFSET, 1)

/* Likewise, but the reference is not required to be valid.  */
#define adjust_automodify_address_nv(MEMREF, MODE, ADDR, OFFSET) \
  adjust_automodify_address_1 (MEMREF, MODE, ADDR, OFFSET, 0)
692

693 694 695
extern rtx adjust_address_1 (rtx, enum machine_mode, HOST_WIDE_INT, int, int);
extern rtx adjust_automodify_address_1 (rtx, enum machine_mode, rtx,
					HOST_WIDE_INT, int);
Richard Kenner committed
696

697 698 699
/* Return a memory reference like MEMREF, but whose address is changed by
   adding OFFSET, an RTX, to it.  POW2 is the highest power of two factor
   known to be in OFFSET (possibly 1).  */
700
extern rtx offset_address (rtx, rtx, unsigned HOST_WIDE_INT);
701

702 703
/* Definitions from emit-rtl.c */
#include "emit-rtl.h"
Richard Kenner committed
704

705 706
/* Return a memory reference like MEMREF, but with its mode widened to
   MODE and adjusted by OFFSET.  */
707
extern rtx widen_memory_access (rtx, enum machine_mode, HOST_WIDE_INT);
708

Richard Kenner committed
709 710
/* Return a memory reference like MEMREF, but which is known to have a
   valid address.  */
711
extern rtx validize_mem (rtx);
Richard Kenner committed
712

713 714
extern rtx use_anchored_address (rtx);

715 716 717
/* Given REF, a MEM, and T, either the type of X or the expression
   corresponding to REF, set the memory attributes.  OBJECTP is nonzero
   if we are making a new object of this type.  */
718
extern void set_mem_attributes (rtx, tree, int);
719 720 721 722

/* Similar, except that BITPOS has not yet been applied to REF, so if
   we alter MEM_OFFSET according to T then we should subtract BITPOS
   expecting that it'll be added back in later.  */
723
extern void set_mem_attributes_minus_bitpos (rtx, tree, int, HOST_WIDE_INT);
724

725 726 727
/* Return OFFSET if XEXP (MEM, 0) - OFFSET is known to be ALIGN
   bits aligned for 0 <= OFFSET < ALIGN / BITS_PER_UNIT, or
   -1 if not known.  */
728
extern int get_mem_align_offset (rtx, unsigned int);
729

Richard Kenner committed
730
/* Assemble the static constant template for function entry trampolines.  */
731
extern rtx assemble_trampoline_template (void);
Richard Kenner committed
732 733

/* Copy given rtx to a new temp reg and return that.  */
734
extern rtx copy_to_reg (rtx);
Richard Kenner committed
735 736

/* Like copy_to_reg but always make the reg Pmode.  */
737
extern rtx copy_addr_to_reg (rtx);
Richard Kenner committed
738 739

/* Like copy_to_reg but always make the reg the specified mode MODE.  */
740
extern rtx copy_to_mode_reg (enum machine_mode, rtx);
Richard Kenner committed
741 742

/* Copy given rtx to given temp reg and return that.  */
743
extern rtx copy_to_suggested_reg (rtx, rtx, enum machine_mode);
Richard Kenner committed
744 745 746

/* Copy a value to a register if it isn't already a register.
   Args are mode (in case value is a constant) and the value.  */
747
extern rtx force_reg (enum machine_mode, rtx);
Richard Kenner committed
748 749

/* Return given rtx, copied into a new temp reg if it was in memory.  */
750
extern rtx force_not_mem (rtx);
Richard Kenner committed
751

752 753 754 755 756 757 758 759 760
/* Return mode and signedness to use when an argument or result in the
   given mode is promoted.  */
extern enum machine_mode promote_function_mode (const_tree, enum machine_mode, int *,
					        const_tree, int);

/* Return mode and signedness to use when an object in the given mode
   is promoted.  */
extern enum machine_mode promote_mode (const_tree, enum machine_mode, int *);

761
/* Return mode and signedness to use when object is promoted.  */
762
enum machine_mode promote_decl_mode (const_tree, int *);
763

Richard Kenner committed
764
/* Remove some bytes from the stack.  An rtx says how many.  */
765
extern void adjust_stack (rtx);
Richard Kenner committed
766 767

/* Add some bytes to the stack.  An rtx says how many.  */
768
extern void anti_adjust_stack (rtx);
Richard Kenner committed
769

770 771 772
/* Add some bytes to the stack while probing it.  An rtx says how many. */
extern void anti_adjust_stack_and_probe (rtx, bool);

773 774 775 776
/* This enum is used for the following two functions.  */
enum save_level {SAVE_BLOCK, SAVE_FUNCTION, SAVE_NONLOCAL};

/* Save the stack pointer at the specified level.  */
777
extern void emit_stack_save (enum save_level, rtx *, rtx);
778 779

/* Restore the stack pointer from a save area of the specified level.  */
780
extern void emit_stack_restore (enum save_level, rtx, rtx);
781

782 783 784
/* Invoke emit_stack_save for the nonlocal_goto_save_area.  */
extern void update_nonlocal_goto_save_area (void);

Richard Kenner committed
785 786
/* Allocate some space on the stack dynamically and return its address.  An rtx
   says how many bytes.  */
787
extern rtx allocate_dynamic_stack_space (rtx, rtx, int);
Richard Kenner committed
788

Kazu Hirata committed
789
/* Probe a range of stack addresses from FIRST to FIRST+SIZE, inclusive.
790 791 792
   FIRST is a constant and size is a Pmode RTX.  These are offsets from
   the current stack pointer.  STACK_GROWS_DOWNWARD says whether to add
   or subtract them from the stack pointer.  */
793
extern void probe_stack_range (HOST_WIDE_INT, rtx);
794

Richard Kenner committed
795 796
/* Return an rtx that refers to the value returned by a library call
   in its original home.  This becomes invalid if any more code is emitted.  */
797
extern rtx hard_libcall_value (enum machine_mode, rtx);
Richard Kenner committed
798

799 800 801 802 803 804
/* Return the mode desired by operand N of a particular bitfield
   insert/extract insn, or MAX_MACHINE_MODE if no such insn is
   available.  */

enum extraction_pattern { EP_insv, EP_extv, EP_extzv };
extern enum machine_mode
805 806
mode_for_extraction (enum extraction_pattern, int);

807 808
extern void store_bit_field (rtx, unsigned HOST_WIDE_INT,
			     unsigned HOST_WIDE_INT, enum machine_mode, rtx);
809 810
extern rtx extract_bit_field (rtx, unsigned HOST_WIDE_INT,
			      unsigned HOST_WIDE_INT, int, rtx,
811
			      enum machine_mode, enum machine_mode);
812
extern rtx extract_low_bits (enum machine_mode, enum machine_mode, rtx);
813 814 815 816
extern rtx expand_mult (enum machine_mode, rtx, rtx, rtx, int);
extern rtx expand_mult_highpart_adjust (enum machine_mode, rtx, rtx, rtx, rtx, int);

extern rtx assemble_static_space (unsigned HOST_WIDE_INT);
817
extern int safe_from_p (const_rtx, tree, int);
818 819
extern bool split_comparison (enum rtx_code, enum machine_mode,
			      enum rtx_code *, enum rtx_code *);
820

821 822
/* Call this once to initialize the contents of the optabs
   appropriately for the current target machine.  */
823 824
extern void init_optabs (void);
extern void init_all_optabs (void);
825 826

/* Call this to initialize an optab function entry.  */
827
extern rtx init_one_libfunc (const char *);
828
extern rtx set_user_assembler_libfunc (const char *, const char *);
829

830 831 832 833 834 835
/* Build a decl for a libfunc named NAME. */
extern tree build_libfunc_function (const char *);

/* Get the personality libfunc for a function decl.  */
rtx get_personality_function (tree);

836
extern int vector_mode_valid_p (enum machine_mode);
837 838

#endif /* GCC_EXPR_H */