OSDN Git Service

(gen_rtvec_vv): Declare.
[pf3gnuchains/gcc-fork.git] / gcc / rtl.h
1 /* Register Transfer Language (RTL) definitions for GNU C-Compiler
2    Copyright (C) 1987, 91-95, 1996 Free Software Foundation, Inc.
3
4 This file is part of GNU CC.
5
6 GNU CC is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 2, or (at your option)
9 any later version.
10
11 GNU CC is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14 GNU General Public License for more details.
15
16 You should have received a copy of the GNU General Public License
17 along with GNU CC; see the file COPYING.  If not, write to
18 the Free Software Foundation, 59 Temple Place - Suite 330,
19 Boston, MA 02111-1307, USA.  */
20
21
22 #include "machmode.h"
23
24 #undef FFS  /* Some systems predefine this symbol; don't let it interfere.  */
25 #undef FLOAT /* Likewise.  */
26 #undef ABS /* Likewise.  */
27 #undef PC /* Likewise.  */
28
29 #ifndef TREE_CODE
30 union tree_node;
31 #endif
32
33 /* Register Transfer Language EXPRESSIONS CODES */
34
35 #define RTX_CODE        enum rtx_code
36 enum rtx_code  {
37
38 #define DEF_RTL_EXPR(ENUM, NAME, FORMAT, CLASS)   ENUM ,
39 #include "rtl.def"              /* rtl expressions are documented here */
40 #undef DEF_RTL_EXPR
41
42   LAST_AND_UNUSED_RTX_CODE};    /* A convenient way to get a value for
43                                    NUM_RTX_CODE.
44                                    Assumes default enum value assignment.  */
45
46 #define NUM_RTX_CODE ((int)LAST_AND_UNUSED_RTX_CODE)
47                                 /* The cast here, saves many elsewhere.  */
48
49 extern int rtx_length[];
50 #define GET_RTX_LENGTH(CODE)            (rtx_length[(int) (CODE)])
51
52 extern char *rtx_name[];
53 #define GET_RTX_NAME(CODE)              (rtx_name[(int) (CODE)])
54
55 extern char *rtx_format[];
56 #define GET_RTX_FORMAT(CODE)            (rtx_format[(int) (CODE)])
57
58 extern char rtx_class[];
59 #define GET_RTX_CLASS(CODE)             (rtx_class[(int) (CODE)])
60 \f
61 /* Common union for an element of an rtx.  */
62
63 typedef union rtunion_def
64 {
65   HOST_WIDE_INT rtwint;
66   int rtint;
67   char *rtstr;
68   struct rtx_def *rtx;
69   struct rtvec_def *rtvec;
70   enum machine_mode rttype;
71 } rtunion;
72
73 /* RTL expression ("rtx").  */
74
75 typedef struct rtx_def
76 {
77 #ifdef ONLY_INT_FIELDS
78 #ifdef CODE_FIELD_BUG
79   unsigned int code : 16;
80 #else
81   unsigned short code;
82 #endif
83 #else
84   /* The kind of expression this is.  */
85   enum rtx_code code : 16;
86 #endif
87   /* The kind of value the expression has.  */
88 #ifdef ONLY_INT_FIELDS
89   int mode : 8;
90 #else
91   enum machine_mode mode : 8;
92 #endif
93   /* 1 in an INSN if it can alter flow of control
94      within this function.  Not yet used!  */
95   unsigned int jump : 1;
96   /* 1 in an INSN if it can call another function.  Not yet used!  */
97   unsigned int call : 1;
98   /* 1 in a MEM or REG if value of this expression will never change
99      during the current function, even though it is not
100      manifestly constant.
101      1 in a SUBREG if it is from a promoted variable that is unsigned.
102      1 in a SYMBOL_REF if it addresses something in the per-function
103      constants pool.
104      1 in a CALL_INSN if it is a const call.
105      1 in a JUMP_INSN if it is a branch that should be annulled.  Valid from
106      reorg until end of compilation; cleared before used.  */
107   unsigned int unchanging : 1;
108   /* 1 in a MEM expression if contents of memory are volatile.
109      1 in an INSN, CALL_INSN, JUMP_INSN, CODE_LABEL or BARRIER
110      if it is deleted.
111      1 in a REG expression if corresponds to a variable declared by the user.
112      0 for an internally generated temporary.
113      In a SYMBOL_REF, this flag is used for machine-specific purposes.
114      In a LABEL_REF or in a REG_LABEL note, this is LABEL_REF_NONLOCAL_P.  */
115   unsigned int volatil : 1;
116   /* 1 in a MEM referring to a field of a structure (not a union!).
117      0 if the MEM was a variable or the result of a * operator in C;
118      1 if it was the result of a . or -> operator (on a struct) in C.
119      1 in a REG if the register is used only in exit code a loop.
120      1 in a SUBREG expression if was generated from a variable with a 
121      promoted mode.
122      1 in a CODE_LABEL if the label is used for nonlocal gotos
123      and must not be deleted even if its count is zero.
124      1 in a LABEL_REF if this is a reference to a label outside the
125      current loop.
126      1 in an INSN, JUMP_INSN, or CALL_INSN if this insn must be scheduled
127      together with the preceding insn.  Valid only within sched.
128      1 in an INSN, JUMP_INSN, or CALL_INSN if insn is in a delay slot and
129      from the target of a branch.  Valid from reorg until end of compilation;
130      cleared before used.  */
131   unsigned int in_struct : 1;
132   /* 1 if this rtx is used.  This is used for copying shared structure.
133      See `unshare_all_rtl'.
134      In a REG, this is not needed for that purpose, and used instead 
135      in `leaf_renumber_regs_insn'.
136      In a SYMBOL_REF, means that emit_library_call
137      has used it as the function.  */
138   unsigned int used : 1;
139   /* Nonzero if this rtx came from procedure integration.
140      In a REG, nonzero means this reg refers to the return value
141      of the current function.  */
142   unsigned integrated : 1;
143   /* The first element of the operands of this rtx.
144      The number of operands and their types are controlled
145      by the `code' field, according to rtl.def.  */
146   rtunion fld[1];
147 } *rtx;
148
149 #include "gansidecl.h"
150
151 #define NULL_RTX (rtx) 0
152
153 /* Define macros to access the `code' field of the rtx.  */
154
155 #ifdef SHORT_ENUM_BUG
156 #define GET_CODE(RTX)           ((enum rtx_code) ((RTX)->code))
157 #define PUT_CODE(RTX, CODE)     ((RTX)->code = ((short) (CODE)))
158 #else
159 #define GET_CODE(RTX)           ((RTX)->code)
160 #define PUT_CODE(RTX, CODE)     ((RTX)->code = (CODE))
161 #endif
162
163 #define GET_MODE(RTX)           ((RTX)->mode)
164 #define PUT_MODE(RTX, MODE)     ((RTX)->mode = (MODE))
165
166 #define RTX_INTEGRATED_P(RTX) ((RTX)->integrated)
167 #define RTX_UNCHANGING_P(RTX) ((RTX)->unchanging)
168
169 /* RTL vector.  These appear inside RTX's when there is a need
170    for a variable number of things.  The principle use is inside
171    PARALLEL expressions.  */
172
173 typedef struct rtvec_def{
174   unsigned num_elem;            /* number of elements */
175   rtunion elem[1];
176 } *rtvec;
177
178 #define NULL_RTVEC (rtvec) 0
179
180 #define GET_NUM_ELEM(RTVEC)             ((RTVEC)->num_elem)
181 #define PUT_NUM_ELEM(RTVEC, NUM)        ((RTVEC)->num_elem = (unsigned) NUM)
182
183 #define RTVEC_ELT(RTVEC, I)  ((RTVEC)->elem[(I)].rtx)
184
185 /* 1 if X is a REG.  */
186
187 #define REG_P(X) (GET_CODE (X) == REG)
188
189 /* 1 if X is a constant value that is an integer.  */
190
191 #define CONSTANT_P(X)   \
192   (GET_CODE (X) == LABEL_REF || GET_CODE (X) == SYMBOL_REF              \
193    || GET_CODE (X) == CONST_INT || GET_CODE (X) == CONST_DOUBLE         \
194    || GET_CODE (X) == CONST || GET_CODE (X) == HIGH)
195
196 /* General accessor macros for accessing the fields of an rtx.  */
197
198 #define XEXP(RTX, N)    ((RTX)->fld[N].rtx)
199 #define XINT(RTX, N)    ((RTX)->fld[N].rtint)
200 #define XWINT(RTX, N)   ((RTX)->fld[N].rtwint)
201 #define XSTR(RTX, N)    ((RTX)->fld[N].rtstr)
202 #define XVEC(RTX, N)    ((RTX)->fld[N].rtvec)
203 #define XVECLEN(RTX, N) ((RTX)->fld[N].rtvec->num_elem)
204 #define XVECEXP(RTX,N,M)((RTX)->fld[N].rtvec->elem[M].rtx)
205 \f
206 /* ACCESS MACROS for particular fields of insns.  */
207
208 /* Holds a unique number for each insn.
209    These are not necessarily sequentially increasing.  */
210 #define INSN_UID(INSN)  ((INSN)->fld[0].rtint)
211
212 /* Chain insns together in sequence.  */
213 #define PREV_INSN(INSN) ((INSN)->fld[1].rtx)
214 #define NEXT_INSN(INSN) ((INSN)->fld[2].rtx)
215
216 /* The body of an insn.  */
217 #define PATTERN(INSN)   ((INSN)->fld[3].rtx)
218
219 /* Code number of instruction, from when it was recognized.
220    -1 means this instruction has not been recognized yet.  */
221 #define INSN_CODE(INSN) ((INSN)->fld[4].rtint)
222
223 /* Set up in flow.c; empty before then.
224    Holds a chain of INSN_LIST rtx's whose first operands point at
225    previous insns with direct data-flow connections to this one.
226    That means that those insns set variables whose next use is in this insn.
227    They are always in the same basic block as this insn.  */
228 #define LOG_LINKS(INSN)         ((INSN)->fld[5].rtx)
229
230 /* 1 if insn has been deleted.  */
231 #define INSN_DELETED_P(INSN) ((INSN)->volatil)
232
233 /* 1 if insn is a call to a const function.  */
234 #define CONST_CALL_P(INSN) ((INSN)->unchanging)
235
236 /* 1 if insn is a branch that should not unconditionally execute its
237    delay slots, i.e., it is an annulled branch.   */
238 #define INSN_ANNULLED_BRANCH_P(INSN) ((INSN)->unchanging)
239
240 /* 1 if insn is in a delay slot and is from the target of the branch.  If
241    the branch insn has INSN_ANNULLED_BRANCH_P set, this insn should only be
242    executed if the branch is taken.  For annulled branches with this bit
243    clear, the insn should be executed only if the branch is not taken.  */
244 #define INSN_FROM_TARGET_P(INSN) ((INSN)->in_struct)
245
246 /* Holds a list of notes on what this insn does to various REGs.
247    It is a chain of EXPR_LIST rtx's, where the second operand
248    is the chain pointer and the first operand is the REG being described.
249    The mode field of the EXPR_LIST contains not a real machine mode
250    but a value that says what this note says about the REG:
251      REG_DEAD means that the value in REG dies in this insn (i.e., it is
252    not needed past this insn).  If REG is set in this insn, the REG_DEAD
253    note may, but need not, be omitted.
254      REG_INC means that the REG is autoincremented or autodecremented.
255      REG_EQUIV describes the insn as a whole; it says that the
256    insn sets a register to a constant value or to be equivalent to
257    a memory address.  If the
258    register is spilled to the stack then the constant value
259    should be substituted for it.  The contents of the REG_EQUIV
260    is the constant value or memory address, which may be different
261    from the source of the SET although it has the same value. 
262      REG_EQUAL is like REG_EQUIV except that the destination
263    is only momentarily equal to the specified rtx.  Therefore, it
264    cannot be used for substitution; but it can be used for cse.
265      REG_RETVAL means that this insn copies the return-value of
266    a library call out of the hard reg for return values.  This note
267    is actually an INSN_LIST and it points to the first insn involved
268    in setting up arguments for the call.  flow.c uses this to delete
269    the entire library call when its result is dead.
270      REG_LIBCALL is the inverse of REG_RETVAL: it goes on the first insn
271    of the library call and points at the one that has the REG_RETVAL.
272      REG_WAS_0 says that the register set in this insn held 0 before the insn.
273    The contents of the note is the insn that stored the 0.
274    If that insn is deleted or patched to a NOTE, the REG_WAS_0 is inoperative.
275    The REG_WAS_0 note is actually an INSN_LIST, not an EXPR_LIST.
276      REG_NONNEG means that the register is always nonnegative during
277    the containing loop.  This is used in branches so that decrement and
278    branch instructions terminating on zero can be matched.  There must be
279    an insn pattern in the md file named `decrement_and_branch_until_zero'
280    or else this will never be added to any instructions.
281      REG_NO_CONFLICT means there is no conflict *after this insn*
282    between the register in the note and the destination of this insn.
283      REG_UNUSED identifies a register set in this insn and never used.
284      REG_CC_SETTER and REG_CC_USER link a pair of insns that set and use
285    CC0, respectively.  Normally, these are required to be consecutive insns,
286    but we permit putting a cc0-setting insn in the delay slot of a branch
287    as long as only one copy of the insn exists.  In that case, these notes
288    point from one to the other to allow code generation to determine what
289    any require information and to properly update CC_STATUS.
290      REG_LABEL points to a CODE_LABEL.  Used by non-JUMP_INSNs to
291    say that the CODE_LABEL contained in the REG_LABEL note is used
292    by the insn.
293      REG_DEP_ANTI is used in LOG_LINKS which represent anti (write after read)
294    dependencies.  REG_DEP_OUTPUT is used in LOG_LINKS which represent output
295    (write after write) dependencies.  Data dependencies, which are the only
296    type of LOG_LINK created by flow, are represented by a 0 reg note kind.  */
297
298 #define REG_NOTES(INSN) ((INSN)->fld[6].rtx)
299
300 /* Don't forget to change reg_note_name in rtl.c.  */
301 enum reg_note { REG_DEAD = 1, REG_INC = 2, REG_EQUIV = 3, REG_WAS_0 = 4,
302                 REG_EQUAL = 5, REG_RETVAL = 6, REG_LIBCALL = 7,
303                 REG_NONNEG = 8, REG_NO_CONFLICT = 9, REG_UNUSED = 10,
304                 REG_CC_SETTER = 11, REG_CC_USER = 12, REG_LABEL = 13,
305                 REG_DEP_ANTI = 14, REG_DEP_OUTPUT = 15 };
306
307 /* Define macros to extract and insert the reg-note kind in an EXPR_LIST.  */
308 #define REG_NOTE_KIND(LINK) ((enum reg_note) GET_MODE (LINK))
309 #define PUT_REG_NOTE_KIND(LINK,KIND) PUT_MODE(LINK, (enum machine_mode) (KIND))
310
311 /* Names for REG_NOTE's in EXPR_LIST insn's.  */
312
313 extern char *reg_note_name[];
314 #define GET_REG_NOTE_NAME(MODE) (reg_note_name[(int) (MODE)])
315
316 /* This field is only present on CALL_INSNs.  It holds a chain of EXPR_LIST of
317    USE and CLOBBER expressions.
318      USE expressions list the registers filled with arguments that
319    are passed to the function.
320      CLOBBER expressions document the registers explicitly clobbered
321    by this CALL_INSN.
322      Pseudo registers can not be mentioned in this list.  */
323 #define CALL_INSN_FUNCTION_USAGE(INSN)  ((INSN)->fld[7].rtx)
324
325 /* The label-number of a code-label.  The assembler label
326    is made from `L' and the label-number printed in decimal.
327    Label numbers are unique in a compilation.  */
328 #define CODE_LABEL_NUMBER(INSN) ((INSN)->fld[3].rtint)
329
330 #define LINE_NUMBER NOTE
331
332 /* In a NOTE that is a line number, this is a string for the file name
333    that the line is in.  We use the same field to record block numbers
334    temporarily in NOTE_INSN_BLOCK_BEG and NOTE_INSN_BLOCK_END notes.
335    (We avoid lots of casts between ints and pointers if we use a
336    different macro for the bock number.)  */
337
338 #define NOTE_SOURCE_FILE(INSN)  ((INSN)->fld[3].rtstr)
339 #define NOTE_BLOCK_NUMBER(INSN) ((INSN)->fld[3].rtint)
340
341 /* In a NOTE that is a line number, this is the line number.
342    Other kinds of NOTEs are identified by negative numbers here.  */
343 #define NOTE_LINE_NUMBER(INSN) ((INSN)->fld[4].rtint)
344
345 /* Codes that appear in the NOTE_LINE_NUMBER field
346    for kinds of notes that are not line numbers.
347
348    Notice that we do not try to use zero here for any of
349    the special note codes because sometimes the source line
350    actually can be zero!  This happens (for example) when we
351    are generating code for the per-translation-unit constructor
352    and destructor routines for some C++ translation unit.
353
354    If you should change any of the following values, or if you
355    should add a new value here, don't forget to change the
356    note_insn_name array in rtl.c.  */
357
358 /* This note is used to get rid of an insn
359    when it isn't safe to patch the insn out of the chain.  */
360 #define NOTE_INSN_DELETED -1
361 #define NOTE_INSN_BLOCK_BEG -2
362 #define NOTE_INSN_BLOCK_END -3
363 #define NOTE_INSN_LOOP_BEG -4
364 #define NOTE_INSN_LOOP_END -5
365 /* This kind of note is generated at the end of the function body,
366    just before the return insn or return label.
367    In an optimizing compilation it is deleted by the first jump optimization,
368    after enabling that optimizer to determine whether control can fall
369    off the end of the function body without a return statement.  */
370 #define NOTE_INSN_FUNCTION_END -6
371 /* This kind of note is generated just after each call to `setjmp', et al.  */
372 #define NOTE_INSN_SETJMP -7
373 /* Generated at the place in a loop that `continue' jumps to.  */
374 #define NOTE_INSN_LOOP_CONT -8
375 /* Generated at the start of a duplicated exit test.  */
376 #define NOTE_INSN_LOOP_VTOP -9
377 /* This marks the point immediately after the last prologue insn.  */
378 #define NOTE_INSN_PROLOGUE_END -10
379 /* This marks the point immediately prior to the first epilogue insn.  */
380 #define NOTE_INSN_EPILOGUE_BEG -11
381 /* Generated in place of user-declared labels when they are deleted.  */
382 #define NOTE_INSN_DELETED_LABEL -12
383 /* This note indicates the start of the real body of the function,
384    i.e. the point just after all of the parms have been moved into
385    their homes, etc.  */
386 #define NOTE_INSN_FUNCTION_BEG -13
387 /* These note where exception handling regions begin and end.  */
388 #define NOTE_INSN_EH_REGION_BEG -14
389 #define NOTE_INSN_EH_REGION_END -15
390
391
392 #if 0 /* These are not used, and I don't know what they were for. --rms.  */
393 #define NOTE_DECL_NAME(INSN) ((INSN)->fld[3].rtstr)
394 #define NOTE_DECL_CODE(INSN) ((INSN)->fld[4].rtint)
395 #define NOTE_DECL_RTL(INSN) ((INSN)->fld[5].rtx)
396 #define NOTE_DECL_IDENTIFIER(INSN) ((INSN)->fld[6].rtint)
397 #define NOTE_DECL_TYPE(INSN) ((INSN)->fld[7].rtint)
398 #endif /* 0 */
399
400 /* Names for NOTE insn's other than line numbers.  */
401
402 extern char *note_insn_name[];
403 #define GET_NOTE_INSN_NAME(NOTE_CODE) (note_insn_name[-(NOTE_CODE)])
404
405 /* The name of a label, in case it corresponds to an explicit label
406    in the input source code.  */
407 #define LABEL_NAME(LABEL) ((LABEL)->fld[4].rtstr)
408
409 /* In jump.c, each label contains a count of the number
410    of LABEL_REFs that point at it, so unused labels can be deleted.  */
411 #define LABEL_NUSES(LABEL) ((LABEL)->fld[5].rtint)
412
413 /* The rest is used instead of the above, in a CODE_LABEL,
414    if bytecode is being output.
415    We make the slightly kludgy assumption that a LABEL has enough slots
416    to hold these things.  That happens to be true.  */
417
418 /* For static or external objects.  */
419 #define BYTECODE_LABEL(X) (XEXP ((X), 0))
420
421 /* For goto labels inside bytecode functions.  */
422 #define BYTECODE_BC_LABEL(X) (*(struct bc_label **) &XEXP ((X), 1))
423
424 /* In jump.c, each JUMP_INSN can point to a label that it can jump to,
425    so that if the JUMP_INSN is deleted, the label's LABEL_NUSES can
426    be decremented and possibly the label can be deleted.  */
427 #define JUMP_LABEL(INSN)   ((INSN)->fld[7].rtx)
428
429 /* Once basic blocks are found in flow.c,
430    each CODE_LABEL starts a chain that goes through
431    all the LABEL_REFs that jump to that label.
432    The chain eventually winds up at the CODE_LABEL; it is circular.  */
433 #define LABEL_REFS(LABEL) ((LABEL)->fld[5].rtx)
434 \f
435 /* This is the field in the LABEL_REF through which the circular chain
436    of references to a particular label is linked.
437    This chain is set up in flow.c.  */
438
439 #define LABEL_NEXTREF(REF) ((REF)->fld[1].rtx)
440
441 /* Once basic blocks are found in flow.c,
442    Each LABEL_REF points to its containing instruction with this field.  */
443
444 #define CONTAINING_INSN(RTX) ((RTX)->fld[2].rtx)
445
446 /* For a REG rtx, REGNO extracts the register number.  */
447
448 #define REGNO(RTX) ((RTX)->fld[0].rtint)
449
450 /* For a REG rtx, REG_FUNCTION_VALUE_P is nonzero if the reg
451    is the current function's return value.  */
452
453 #define REG_FUNCTION_VALUE_P(RTX) ((RTX)->integrated)
454
455 /* 1 in a REG rtx if it corresponds to a variable declared by the user.  */
456 #define REG_USERVAR_P(RTX) ((RTX)->volatil)
457
458 /* For a CONST_INT rtx, INTVAL extracts the integer.  */
459
460 #define INTVAL(RTX) ((RTX)->fld[0].rtwint)
461
462 /* For a SUBREG rtx, SUBREG_REG extracts the value we want a subreg of.
463    SUBREG_WORD extracts the word-number.  */
464
465 #define SUBREG_REG(RTX) ((RTX)->fld[0].rtx)
466 #define SUBREG_WORD(RTX) ((RTX)->fld[1].rtint)
467
468 /* 1 if the REG contained in SUBREG_REG is already known to be
469    sign- or zero-extended from the mode of the SUBREG to the mode of
470    the reg.  SUBREG_PROMOTED_UNSIGNED_P gives the signedness of the
471    extension.  
472
473    When used as a LHS, is means that this extension must be done
474    when assigning to SUBREG_REG.  */
475
476 #define SUBREG_PROMOTED_VAR_P(RTX) ((RTX)->in_struct)
477 #define SUBREG_PROMOTED_UNSIGNED_P(RTX) ((RTX)->unchanging)
478
479 /* Access various components of an ASM_OPERANDS rtx.  */
480
481 #define ASM_OPERANDS_TEMPLATE(RTX) XSTR ((RTX), 0)
482 #define ASM_OPERANDS_OUTPUT_CONSTRAINT(RTX) XSTR ((RTX), 1)
483 #define ASM_OPERANDS_OUTPUT_IDX(RTX) XINT ((RTX), 2)
484 #define ASM_OPERANDS_INPUT_VEC(RTX) XVEC ((RTX), 3)
485 #define ASM_OPERANDS_INPUT_CONSTRAINT_VEC(RTX) XVEC ((RTX), 4)
486 #define ASM_OPERANDS_INPUT(RTX, N) XVECEXP ((RTX), 3, (N))
487 #define ASM_OPERANDS_INPUT_LENGTH(RTX) XVECLEN ((RTX), 3)
488 #define ASM_OPERANDS_INPUT_CONSTRAINT(RTX, N) XSTR (XVECEXP ((RTX), 4, (N)), 0)
489 #define ASM_OPERANDS_INPUT_MODE(RTX, N) GET_MODE (XVECEXP ((RTX), 4, (N)))
490 #define ASM_OPERANDS_SOURCE_FILE(RTX) XSTR ((RTX), 5)
491 #define ASM_OPERANDS_SOURCE_LINE(RTX) XINT ((RTX), 6)
492
493 /* For a MEM rtx, 1 if it's a volatile reference.
494    Also in an ASM_OPERANDS rtx.  */
495 #define MEM_VOLATILE_P(RTX) ((RTX)->volatil)
496
497 /* For a MEM rtx, 1 if it refers to a structure or union component.  */
498 #define MEM_IN_STRUCT_P(RTX) ((RTX)->in_struct)
499
500 /* For a LABEL_REF, 1 means that this reference is to a label outside the
501    loop containing the reference.  */
502 #define LABEL_OUTSIDE_LOOP_P(RTX) ((RTX)->in_struct)
503
504 /* For a LABEL_REF, 1 means it is for a nonlocal label.  */
505 /* Likewise in an EXPR_LIST for a REG_LABEL note.  */
506 #define LABEL_REF_NONLOCAL_P(RTX) ((RTX)->volatil)
507
508 /* For a CODE_LABEL, 1 means always consider this label to be needed.  */
509 #define LABEL_PRESERVE_P(RTX) ((RTX)->in_struct)
510
511 /* For a REG, 1 means the register is used only in an exit test of a loop.  */
512 #define REG_LOOP_TEST_P(RTX) ((RTX)->in_struct)
513
514 /* During sched, for an insn, 1 means that the insn must be scheduled together
515    with the preceding insn.  */
516 #define SCHED_GROUP_P(INSN) ((INSN)->in_struct)
517
518 /* During sched, for the LOG_LINKS of an insn, these cache the adjusted
519    cost of the dependence link.  The cost of executing an instruction
520    may vary based on how the results are used.  LINK_COST_ZERO is 1 when
521    the cost through the link varies and is unchanged (i.e., the link has
522    zero additional cost).  LINK_COST_FREE is 1 when the cost through the
523    link is zero (i.e., the link makes the cost free).  In other cases,
524    the adjustment to the cost is recomputed each time it is needed.  */
525 #define LINK_COST_ZERO(X) ((X)->jump)
526 #define LINK_COST_FREE(X) ((X)->call)
527
528 /* For a SET rtx, SET_DEST is the place that is set
529    and SET_SRC is the value it is set to.  */
530 #define SET_DEST(RTX) ((RTX)->fld[0].rtx)
531 #define SET_SRC(RTX) ((RTX)->fld[1].rtx)
532
533 /* For a TRAP_IF rtx, TRAP_CONDITION is an expression.  */
534 #define TRAP_CONDITION(RTX) ((RTX)->fld[0].rtx)
535
536 /* 1 in a SYMBOL_REF if it addresses this function's constants pool.  */
537 #define CONSTANT_POOL_ADDRESS_P(RTX) ((RTX)->unchanging)
538
539 /* Flag in a SYMBOL_REF for machine-specific purposes.  */
540 #define SYMBOL_REF_FLAG(RTX) ((RTX)->volatil)
541
542 /* 1 means a SYMBOL_REF has been the library function in emit_library_call.  */
543 #define SYMBOL_REF_USED(RTX) ((RTX)->used)
544
545 /* For an INLINE_HEADER rtx, FIRST_FUNCTION_INSN is the first insn
546    of the function that is not involved in copying parameters to
547    pseudo-registers.  FIRST_PARM_INSN is the very first insn of
548    the function, including the parameter copying.
549    We keep this around in case we must splice
550    this function into the assembly code at the end of the file.
551    FIRST_LABELNO is the first label number used by the function (inclusive).
552    LAST_LABELNO is the last label used by the function (exclusive).
553    MAX_REGNUM is the largest pseudo-register used by that function.
554    FUNCTION_ARGS_SIZE is the size of the argument block in the stack.
555    POPS_ARGS is the number of bytes of input arguments popped by the function
556    STACK_SLOT_LIST is the list of stack slots.
557    FORCED_LABELS is the list of labels whose address was taken.
558    FUNCTION_FLAGS are where single-bit flags are saved.
559    OUTGOING_ARGS_SIZE is the size of the largest outgoing stack parameter list.
560    ORIGINAL_ARG_VECTOR is a vector of the original DECL_RTX values
561     for the function arguments.
562    ORIGINAL_DECL_INITIAL is a pointer to the original DECL_INITIAL for the
563     function.
564    INLINE_REGNO_REG_RTX, INLINE_REGNO_POINTER_FLAG, and
565     INLINE_REGNO_POINTER_ALIGN are pointers to the corresponding arrays.
566
567    We want this to lay down like an INSN.  The PREV_INSN field
568    is always NULL.  The NEXT_INSN field always points to the
569    first function insn of the function being squirreled away.  */
570
571 #define FIRST_FUNCTION_INSN(RTX) ((RTX)->fld[2].rtx)
572 #define FIRST_PARM_INSN(RTX) ((RTX)->fld[3].rtx)
573 #define FIRST_LABELNO(RTX) ((RTX)->fld[4].rtint)
574 #define LAST_LABELNO(RTX) ((RTX)->fld[5].rtint)
575 #define MAX_PARMREG(RTX) ((RTX)->fld[6].rtint)
576 #define MAX_REGNUM(RTX) ((RTX)->fld[7].rtint)
577 #define FUNCTION_ARGS_SIZE(RTX) ((RTX)->fld[8].rtint)
578 #define POPS_ARGS(RTX) ((RTX)->fld[9].rtint)
579 #define STACK_SLOT_LIST(RTX) ((RTX)->fld[10].rtx)
580 #define FORCED_LABELS(RTX) ((RTX)->fld[11].rtx)
581 #define FUNCTION_FLAGS(RTX) ((RTX)->fld[12].rtint)
582 #define OUTGOING_ARGS_SIZE(RTX) ((RTX)->fld[13].rtint)
583 #define ORIGINAL_ARG_VECTOR(RTX) ((RTX)->fld[14].rtvec)
584 #define ORIGINAL_DECL_INITIAL(RTX) ((RTX)->fld[15].rtx)
585 #define INLINE_REGNO_REG_RTX(RTX) ((RTX)->fld[16].rtvec)
586 #define INLINE_REGNO_POINTER_FLAG(RTX) ((RTX)->fld[17].rtstr)
587 #define INLINE_REGNO_POINTER_ALIGN(RTX) ((RTX)->fld[18].rtstr)
588
589 /* In FUNCTION_FLAGS we save some variables computed when emitting the code
590    for the function and which must be `or'ed into the current flag values when
591    insns from that function are being inlined.  */
592
593 /* These ought to be an enum, but non-ANSI compilers don't like that.  */
594 #define FUNCTION_FLAGS_CALLS_ALLOCA 01
595 #define FUNCTION_FLAGS_CALLS_SETJMP 02
596 #define FUNCTION_FLAGS_RETURNS_STRUCT 04
597 #define FUNCTION_FLAGS_RETURNS_PCC_STRUCT 010
598 #define FUNCTION_FLAGS_NEEDS_CONTEXT 020
599 #define FUNCTION_FLAGS_HAS_NONLOCAL_LABEL 040
600 #define FUNCTION_FLAGS_RETURNS_POINTER 0100
601 #define FUNCTION_FLAGS_USES_CONST_POOL 0200
602 #define FUNCTION_FLAGS_CALLS_LONGJMP 0400
603 #define FUNCTION_FLAGS_USES_PIC_OFFSET_TABLE 01000
604
605 /* Define a macro to look for REG_INC notes,
606    but save time on machines where they never exist.  */
607
608 /* Don't continue this line--convex cc version 4.1 would lose.  */
609 #if (defined (HAVE_PRE_INCREMENT) || defined (HAVE_PRE_DECREMENT) || defined (HAVE_POST_INCREMENT) || defined (HAVE_POST_DECREMENT))
610 #define FIND_REG_INC_NOTE(insn, reg) (find_reg_note ((insn), REG_INC, (reg)))
611 #else
612 #define FIND_REG_INC_NOTE(insn, reg) 0
613 #endif
614
615 /* Indicate whether the machine has any sort of auto increment addressing.
616    If not, we can avoid checking for REG_INC notes.  */
617
618 /* Don't continue this line--convex cc version 4.1 would lose.  */
619 #if (defined (HAVE_PRE_INCREMENT) || defined (HAVE_PRE_DECREMENT) || defined (HAVE_POST_INCREMENT) || defined (HAVE_POST_DECREMENT))
620 #define AUTO_INC_DEC
621 #endif
622 \f
623 /* Generally useful functions.  */
624
625 /* The following functions accept a wide integer argument.  Rather than
626    having to cast on every function call, we use a macro instead, that is
627    defined here and in tree.h.  */
628
629 #ifndef exact_log2
630 #define exact_log2(N) exact_log2_wide ((HOST_WIDE_INT) (N))
631 #define floor_log2(N) floor_log2_wide ((HOST_WIDE_INT) (N))
632 #endif
633
634 #define plus_constant(X,C) plus_constant_wide (X, (HOST_WIDE_INT) (C))
635
636 #define plus_constant_for_output(X,C)  \
637   plus_constant_for_output_wide (X, (HOST_WIDE_INT) (C))
638
639 extern rtx plus_constant_wide            PROTO((rtx, HOST_WIDE_INT));
640 extern rtx plus_constant_for_output_wide PROTO((rtx, HOST_WIDE_INT));
641
642 #define GEN_INT(N) gen_rtx (CONST_INT, VOIDmode, (HOST_WIDE_INT) (N))
643
644 extern rtx bc_gen_rtx ();
645
646 extern rtx gen_rtx                      PVPROTO((enum rtx_code,
647                                                  enum machine_mode, ...));
648 extern rtvec gen_rtvec                  PVPROTO((int, ...));
649
650 extern rtx read_rtx                     STDIO_PROTO((FILE *));
651
652 #if 0
653 /* At present, don't prototype xrealloc, since all of the callers don't
654    cast their pointers to char *, and all of the xrealloc's don't use
655    void * yet.  */
656 extern char *xmalloc                    PROTO((size_t));
657 extern char *xrealloc                   PROTO((void *, size_t));
658 #else
659 extern char *xmalloc ();
660 extern char *xrealloc ();
661 #endif
662
663 extern char *oballoc                    PROTO((int));
664 extern char *permalloc                  PROTO((int));
665 extern void free                        PROTO((void *));
666 extern rtx rtx_alloc                    PROTO((RTX_CODE));
667 extern rtvec rtvec_alloc                PROTO((int));
668 extern rtx find_reg_note                PROTO((rtx, enum reg_note, rtx));
669 extern rtx find_regno_note              PROTO((rtx, enum reg_note, int));
670 extern int find_reg_fusage              PROTO((rtx, enum rtx_code, rtx));
671 extern int find_regno_fusage            PROTO((rtx, enum rtx_code, int));
672 extern HOST_WIDE_INT get_integer_term   PROTO((rtx));
673 extern rtx get_related_value            PROTO((rtx));
674 extern rtx single_set                   PROTO((rtx));
675 extern rtx find_last_value              PROTO((rtx, rtx *, rtx));
676 extern rtx copy_rtx                     PROTO((rtx));
677 extern rtx copy_rtx_if_shared           PROTO((rtx));
678 extern rtx copy_most_rtx                PROTO((rtx, rtx));
679 extern rtx replace_rtx                  PROTO((rtx, rtx, rtx));
680 extern rtvec gen_rtvec_v                PROTO((int, rtx *));
681 extern rtvec gen_rtvec_vv               PROTO((int, rtunion *));
682 extern rtx gen_reg_rtx                  PROTO((enum machine_mode));
683 extern rtx gen_label_rtx                PROTO((void));
684 extern rtx gen_inline_header_rtx        PROTO((rtx, rtx, int, int, int, int,
685                                                int, int, rtx, rtx, int, int,
686                                                rtvec, rtx,
687                                                rtvec, char *, char *));
688 extern rtx gen_lowpart_common           PROTO((enum machine_mode, rtx));
689 extern rtx gen_lowpart                  PROTO((enum machine_mode, rtx));
690 extern rtx gen_lowpart_if_possible      PROTO((enum machine_mode, rtx));
691 extern rtx gen_highpart                 PROTO((enum machine_mode, rtx));
692 extern rtx gen_realpart                 PROTO((enum machine_mode, rtx));
693 extern rtx gen_imagpart                 PROTO((enum machine_mode, rtx));
694 extern rtx operand_subword              PROTO((rtx, int, int, enum machine_mode));
695 extern rtx operand_subword_force        PROTO((rtx, int, enum machine_mode));
696 extern int subreg_lowpart_p             PROTO((rtx));
697 extern rtx make_safe_from               PROTO((rtx, rtx));
698 extern rtx convert_memory_address       PROTO((enum machine_mode, rtx));
699 extern rtx memory_address               PROTO((enum machine_mode, rtx));
700 extern rtx get_insns                    PROTO((void));
701 extern rtx get_last_insn                PROTO((void));
702 extern rtx get_last_insn_anywhere       PROTO((void));
703 extern void start_sequence              PROTO((void));
704 extern void push_to_sequence            PROTO((rtx));
705 extern void end_sequence                PROTO((void));
706 extern rtx gen_sequence                 PROTO((void));
707 extern rtx immed_double_const           PROTO((HOST_WIDE_INT, HOST_WIDE_INT, enum machine_mode));
708 extern rtx force_const_mem              PROTO((enum machine_mode, rtx));
709 extern rtx force_reg                    PROTO((enum machine_mode, rtx));
710 extern rtx get_pool_constant            PROTO((rtx));
711 extern enum machine_mode get_pool_mode  PROTO((rtx));
712 extern int get_pool_offset              PROTO((rtx));
713 extern rtx simplify_subtraction         PROTO((rtx));
714 extern rtx assign_stack_local           PROTO((enum machine_mode, int, int));
715 extern rtx assign_stack_temp            PROTO((enum machine_mode, int, int));
716 extern rtx assign_temp                  PROTO((union tree_node *, int,
717                                                int, int));
718 extern rtx protect_from_queue           PROTO((rtx, int));
719 extern void emit_queue                  PROTO((void));
720 extern rtx emit_move_insn               PROTO((rtx, rtx));
721 extern rtx emit_insn_before             PROTO((rtx, rtx));
722 extern rtx emit_jump_insn_before        PROTO((rtx, rtx));
723 extern rtx emit_call_insn_before        PROTO((rtx, rtx));
724 extern rtx emit_barrier_before          PROTO((rtx));
725 extern rtx emit_note_before             PROTO((int, rtx));
726 extern rtx emit_insn_after              PROTO((rtx, rtx));
727 extern rtx emit_jump_insn_after         PROTO((rtx, rtx));
728 extern rtx emit_barrier_after           PROTO((rtx));
729 extern rtx emit_label_after             PROTO((rtx, rtx));
730 extern rtx emit_note_after              PROTO((int, rtx));
731 extern rtx emit_line_note_after         PROTO((char *, int, rtx));
732 extern rtx emit_insn                    PROTO((rtx));
733 extern rtx emit_insns                   PROTO((rtx));
734 extern rtx emit_insns_before            PROTO((rtx, rtx));
735 extern rtx emit_insns_after             PROTO((rtx, rtx));
736 extern rtx emit_jump_insn               PROTO((rtx));
737 extern rtx emit_call_insn               PROTO((rtx));
738 extern rtx emit_label                   PROTO((rtx));
739 extern rtx emit_barrier                 PROTO((void));
740 extern rtx emit_line_note               PROTO((char *, int));
741 extern rtx emit_note                    PROTO((char *, int));
742 extern rtx emit_line_note_force         PROTO((char *, int));
743 extern rtx make_insn_raw                PROTO((rtx));
744 extern rtx previous_insn                PROTO((rtx));
745 extern rtx next_insn                    PROTO((rtx));
746 extern rtx prev_nonnote_insn            PROTO((rtx));
747 extern rtx next_nonnote_insn            PROTO((rtx));
748 extern rtx prev_real_insn               PROTO((rtx));
749 extern rtx next_real_insn               PROTO((rtx));
750 extern rtx prev_active_insn             PROTO((rtx));
751 extern rtx next_active_insn             PROTO((rtx));
752 extern rtx prev_label                   PROTO((rtx));
753 extern rtx next_label                   PROTO((rtx));
754 extern rtx next_cc0_user                PROTO((rtx));
755 extern rtx prev_cc0_setter              PROTO((rtx));
756 extern rtx reg_set_last                 PROTO((rtx, rtx));
757 extern rtx next_nondeleted_insn         PROTO((rtx));
758 extern enum rtx_code reverse_condition  PROTO((enum rtx_code));
759 extern enum rtx_code swap_condition     PROTO((enum rtx_code));
760 extern enum rtx_code unsigned_condition PROTO((enum rtx_code));
761 extern enum rtx_code signed_condition   PROTO((enum rtx_code));
762 extern rtx find_equiv_reg               PROTO((rtx, rtx, enum reg_class, int, short *, int, enum machine_mode));
763 extern rtx squeeze_notes                PROTO((rtx, rtx));
764 extern rtx delete_insn                  PROTO((rtx));
765 extern void delete_jump                 PROTO((rtx));
766 extern rtx get_label_before             PROTO((rtx));
767 extern rtx get_label_after              PROTO((rtx));
768 extern rtx follow_jumps                 PROTO((rtx));
769 extern rtx adj_offsettable_operand      PROTO((rtx, int));
770 extern rtx try_split                    PROTO((rtx, rtx, int));
771 extern rtx split_insns                  PROTO((rtx, rtx));
772 extern rtx simplify_unary_operation     PROTO((enum rtx_code, enum machine_mode, rtx, enum machine_mode));
773 extern rtx simplify_binary_operation    PROTO((enum rtx_code, enum machine_mode, rtx, rtx));
774 extern rtx simplify_ternary_operation   PROTO((enum rtx_code, enum machine_mode, enum machine_mode, rtx, rtx, rtx));
775 extern rtx simplify_relational_operation PROTO((enum rtx_code, enum machine_mode, rtx, rtx));
776 extern rtx nonlocal_label_rtx_list      PROTO((void));
777 extern rtx gen_move_insn                PROTO((rtx, rtx));
778 extern rtx gen_jump                     PROTO((rtx));
779 extern rtx gen_beq                      PROTO((rtx));
780 extern rtx gen_bge                      PROTO((rtx));
781 extern rtx gen_ble                      PROTO((rtx));
782 extern rtx eliminate_constant_term      PROTO((rtx, rtx *));
783 extern rtx expand_complex_abs           PROTO((enum machine_mode, rtx, rtx, int));
784 extern enum machine_mode choose_hard_reg_mode PROTO((int, int));
785
786 /* Maximum number of parallel sets and clobbers in any insn in this fn.
787    Always at least 3, since the combiner could put that many togetherm
788    and we want this to remain correct for all the remaining passes.  */
789
790 extern int max_parallel;
791
792 extern int asm_noperands                PROTO((rtx));
793 extern char *decode_asm_operands        PROTO((rtx, rtx *, rtx **, char **, enum machine_mode *));
794
795 extern enum reg_class reg_preferred_class PROTO((int));
796 extern enum reg_class reg_alternate_class PROTO((int));
797
798 extern rtx get_first_nonparm_insn       PROTO((void));
799
800 /* Standard pieces of rtx, to be substituted directly into things.  */
801 extern rtx pc_rtx;
802 extern rtx cc0_rtx;
803 extern rtx const0_rtx;
804 extern rtx const1_rtx;
805 extern rtx const2_rtx;
806 extern rtx constm1_rtx;
807 extern rtx const_true_rtx;
808
809 extern rtx const_tiny_rtx[3][(int) MAX_MACHINE_MODE];
810
811 /* Returns a constant 0 rtx in mode MODE.  Integer modes are treated the 
812    same as VOIDmode.  */
813
814 #define CONST0_RTX(MODE) (const_tiny_rtx[0][(int) (MODE)])
815
816 /* Likewise, for the constants 1 and 2.  */
817
818 #define CONST1_RTX(MODE) (const_tiny_rtx[1][(int) (MODE)])
819 #define CONST2_RTX(MODE) (const_tiny_rtx[2][(int) (MODE)])
820
821 /* All references to certain hard regs, except those created
822    by allocating pseudo regs into them (when that's possible),
823    go through these unique rtx objects.  */
824 extern rtx stack_pointer_rtx;
825 extern rtx frame_pointer_rtx;
826 extern rtx hard_frame_pointer_rtx;
827 extern rtx arg_pointer_rtx;
828 extern rtx pic_offset_table_rtx;
829 extern rtx struct_value_rtx;
830 extern rtx struct_value_incoming_rtx;
831 extern rtx static_chain_rtx;
832 extern rtx static_chain_incoming_rtx;
833
834 /* If HARD_FRAME_POINTER_REGNUM is defined, then a special dummy reg
835    is used to represent the frame pointer.  This is because the
836    hard frame pointer and the automatic variables are separated by an amount
837    that cannot be determined until after register allocation.  We can assume
838    that in this case ELIMINABLE_REGS will be defined, one action of which
839    will be to eliminate FRAME_POINTER_REGNUM into HARD_FRAME_POINTER_REGNUM. */
840 #ifndef HARD_FRAME_POINTER_REGNUM
841 #define HARD_FRAME_POINTER_REGNUM FRAME_POINTER_REGNUM
842 #endif
843
844 /* Virtual registers are used during RTL generation to refer to locations into
845    the stack frame when the actual location isn't known until RTL generation
846    is complete.  The routine instantiate_virtual_regs replaces these with
847    the proper value, which is normally {frame,arg,stack}_pointer_rtx plus
848    a constant.  */
849
850 #define FIRST_VIRTUAL_REGISTER  (FIRST_PSEUDO_REGISTER)
851
852 /* This points to the first word of the incoming arguments passed on the stack,
853    either by the caller or by the callee when pretending it was passed by the
854    caller.  */
855
856 extern rtx virtual_incoming_args_rtx;
857
858 #define VIRTUAL_INCOMING_ARGS_REGNUM    (FIRST_VIRTUAL_REGISTER)
859
860 /* If FRAME_GROWS_DOWNWARD, this points to immediately above the first
861    variable on the stack.  Otherwise, it points to the first variable on
862    the stack.  */
863
864 extern rtx virtual_stack_vars_rtx;
865
866 #define VIRTUAL_STACK_VARS_REGNUM       ((FIRST_VIRTUAL_REGISTER) + 1)
867
868 /* This points to the location of dynamically-allocated memory on the stack
869    immediately after the stack pointer has been adjusted by the amount
870    desired.  */
871
872 extern rtx virtual_stack_dynamic_rtx;
873
874 #define VIRTUAL_STACK_DYNAMIC_REGNUM    ((FIRST_VIRTUAL_REGISTER) + 2)
875
876 /* This points to the location in the stack at which outgoing arguments should
877    be written when the stack is pre-pushed (arguments pushed using push
878    insns always use sp).  */
879
880 extern rtx virtual_outgoing_args_rtx;
881
882 #define VIRTUAL_OUTGOING_ARGS_REGNUM    ((FIRST_VIRTUAL_REGISTER) + 3)
883
884 #define LAST_VIRTUAL_REGISTER   ((FIRST_VIRTUAL_REGISTER) + 3)
885
886 extern rtx find_next_ref                PROTO((rtx, rtx));
887 extern rtx *find_single_use             PROTO((rtx, rtx, rtx *));
888
889 /* It is hard to write the prototype for expand_expr, since it needs
890    expr.h to be included for the enumeration.  */
891
892 extern rtx expand_expr ();
893
894 extern rtx output_constant_def          PROTO((union tree_node *));
895 extern rtx immed_real_const             PROTO((union tree_node *));
896 extern union tree_node *make_tree       PROTO((union tree_node *, rtx));
897
898 /* Abort routines */
899 extern void fatal_insn_not_found        PROTO((rtx));
900 extern void fatal_insn                  PROTO((char *, rtx));
901
902 /* Define a default value for STORE_FLAG_VALUE.  */
903
904 #ifndef STORE_FLAG_VALUE
905 #define STORE_FLAG_VALUE 1
906 #endif
907
908 /* Nonzero after end of reload pass.
909    Set to 1 or 0 by toplev.c.  */
910
911 extern int reload_completed;
912
913 /* Set to 1 while reload_as_needed is operating.
914    Required by some machines to handle any generated moves differently.  */
915
916 extern int reload_in_progress;
917
918 /* If this is nonzero, we do not bother generating VOLATILE
919    around volatile memory references, and we are willing to
920    output indirect addresses.  If cse is to follow, we reject
921    indirect addresses so a useful potential cse is generated;
922    if it is used only once, instruction combination will produce
923    the same indirect address eventually.  */
924 extern int cse_not_expected;
925
926 /* Indexed by pseudo register number, gives the rtx for that pseudo.
927    Allocated in parallel with regno_pointer_flag.  */
928 extern rtx *regno_reg_rtx;
929
930 /* Vector indexed by regno; contains the alignment in bytes for a
931    register that contains a pointer, if known.  */
932 extern char *regno_pointer_align;
933 #define REGNO_POINTER_ALIGN(REGNO) regno_pointer_align[REGNO]
934
935 /* Translates rtx code to tree code, for those codes needed by
936    REAL_ARITHMETIC.  The function returns an int because the caller may not
937    know what `enum tree_code' means.  */
938
939 extern int rtx_to_tree_code     PROTO((enum rtx_code));