X-Git-Url: http://git.sourceforge.jp/view?a=blobdiff_plain;f=gcc%2Frtl.h;h=7758a92f724ce7dfcfdc175183b7e1446945008f;hb=16827d1944ebe46c632c0ee57d566dfd387cf2a2;hp=0fe43aae3709134f8e347f31735a497d3b63499b;hpb=29a40d6d2d1a7debbdcd3554138069fee3270555;p=pf3gnuchains%2Fgcc-fork.git diff --git a/gcc/rtl.h b/gcc/rtl.h index 0fe43aae370..7758a92f724 100644 --- a/gcc/rtl.h +++ b/gcc/rtl.h @@ -1,6 +1,6 @@ /* Register Transfer Language (RTL) definitions for GNU C-Compiler Copyright (C) 1987, 1991, 1992, 1993, 1994, 1995, 1996, 1997, 1998, - 1999, 2000, 2001 Free Software Foundation, Inc. + 1999, 2000, 2001, 2002, 2003 Free Software Foundation, Inc. This file is part of GCC. @@ -48,20 +48,22 @@ enum rtx_code { NUM_RTX_CODE. Assumes default enum value assignment. */ -#define NUM_RTX_CODE ((int)LAST_AND_UNUSED_RTX_CODE) +#define NUM_RTX_CODE ((int) LAST_AND_UNUSED_RTX_CODE) /* The cast here, saves many elsewhere. */ -extern const int rtx_length[]; +extern const unsigned char rtx_length[NUM_RTX_CODE]; #define GET_RTX_LENGTH(CODE) (rtx_length[(int) (CODE)]) -extern const char * const rtx_name[]; +extern const char * const rtx_name[NUM_RTX_CODE]; #define GET_RTX_NAME(CODE) (rtx_name[(int) (CODE)]) -extern const char * const rtx_format[]; +extern const char * const rtx_format[NUM_RTX_CODE]; #define GET_RTX_FORMAT(CODE) (rtx_format[(int) (CODE)]) -extern const char rtx_class[]; +extern const char rtx_class[NUM_RTX_CODE]; #define GET_RTX_CLASS(CODE) (rtx_class[(int) (CODE)]) + +extern const unsigned char rtx_next[NUM_RTX_CODE]; /* The flags and bitfields of an ADDR_DIFF_VEC. BASE is the base label relative to which the offsets are calculated, as explained in rtl.def. */ @@ -89,7 +91,10 @@ typedef struct so MEMs that the same attributes share a data structure. This means they cannot be modified in place. If any element is nonzero, it means the value of the corresponding attribute is unknown. */ -typedef struct +/* ALIGN and SIZE are the alignment and size of the MEM itself, + while EXPR can describe a larger underlying object, which might have a + stricter alignment; OFFSET is the offset of the MEM within that object. */ +typedef struct mem_attrs GTY(()) { HOST_WIDE_INT alias; /* Memory alias set. */ tree expr; /* expr corresponding to MEM. */ @@ -98,9 +103,18 @@ typedef struct unsigned int align; /* Alignment of MEM in bits. */ } mem_attrs; +/* Structure used to describe the attributes of a REG in similar way as + mem_attrs does for MEM above. */ + +typedef struct reg_attrs GTY(()) +{ + tree decl; /* decl corresponding to REG. */ + HOST_WIDE_INT offset; /* Offset from start of DECL. */ +} reg_attrs; + /* Common union for an element of an rtx. */ -typedef union rtunion_def +union rtunion_def { HOST_WIDE_INT rtwint; int rtint; @@ -115,11 +129,14 @@ typedef union rtunion_def tree rttree; struct basic_block_def *bb; mem_attrs *rtmem; -} rtunion; + reg_attrs *rtreg; +}; +typedef union rtunion_def rtunion; /* RTL expression ("rtx"). */ -struct rtx_def +struct rtx_def GTY((chain_next ("RTX_NEXT (&%h)"), + chain_prev ("RTX_PREV (&%h)"))) { /* The kind of expression this is. */ ENUM_BITFIELD(rtx_code) code: 16; @@ -127,33 +144,30 @@ struct rtx_def /* The kind of value the expression has. */ ENUM_BITFIELD(machine_mode) mode : 8; - /* 1 in an INSN if it can alter flow of control - within this function. - MEM_KEEP_ALIAS_SET_P in a MEM. - LINK_COST_ZERO in an INSN_LIST. - SET_IS_RETURN_P in a SET. */ + /* 1 in a MEM if we should keep the alias set for this mem unchanged + when we access a component. + 1 in a CALL_INSN if it is a sibling call. + 1 in a SET that is for a return. + In a CODE_LABEL, part of the two-bit alternate entry field. */ unsigned int jump : 1; - /* 1 in an INSN if it can call another function. - LINK_COST_FREE in an INSN_LIST. */ + /* In a CODE_LABEL, part of the two-bit alternate entry field. */ unsigned int call : 1; - /* 1 in a REG if value of this expression will never change during - the current function, even though it is not manifestly constant. - 1 in a MEM if contents of memory are constant. This does not - necessarily mean that the value of this expression is constant. - 1 in a SUBREG if it is from a promoted variable that is unsigned. + /* 1 in a REG, MEM, or CONCAT if the value is set at most once, anywhere. + 1 in a SUBREG if it references an unsigned object whose mode has been + from a promoted to a wider mode. 1 in a SYMBOL_REF if it addresses something in the per-function constants pool. - 1 in a CALL_INSN if it is a const call. - 1 in a JUMP_INSN if it is a branch that should be annulled. Valid from - reorg until end of compilation; cleared before used. */ + 1 in a CALL_INSN, NOTE, or EXPR_LIST for a const or pure call. + 1 in a JUMP_INSN, CALL_INSN, or INSN of an annulling branch. */ unsigned int unchanging : 1; - /* 1 in a MEM expression if contents of memory are volatile. - 1 in an INSN, CALL_INSN, JUMP_INSN, CODE_LABEL or BARRIER - if it is deleted. - 1 in a REG expression if corresponds to a variable declared by the user. + /* 1 in a MEM or ASM_OPERANDS expression if the memory reference is volatile. + 1 in an INSN, CALL_INSN, JUMP_INSN, CODE_LABEL, BARRIER, or NOTE + if it has been deleted. + 1 in a REG expression if corresponds to a variable declared by the user, 0 for an internally generated temporary. - In a SYMBOL_REF, this flag is used for machine-specific purposes. - In a LABEL_REF or in a REG_LABEL note, this is LABEL_REF_NONLOCAL_P. */ + 1 in a SUBREG with a negative value. + 1 in a LABEL_REF or in a REG_LABEL note for a non-local label. + In a SYMBOL_REF, this flag is used for machine-specific purposes. */ unsigned int volatil : 1; /* 1 in a MEM referring to a field of an aggregate. 0 if the MEM was a variable or the result of a * operator in C; @@ -165,23 +179,24 @@ struct rtx_def and must not be deleted even if its count is zero. 1 in a LABEL_REF if this is a reference to a label outside the current loop. - 1 in an INSN, JUMP_INSN, or CALL_INSN if this insn must be scheduled + 1 in an INSN, JUMP_INSN or CALL_INSN if this insn must be scheduled together with the preceding insn. Valid only within sched. 1 in an INSN, JUMP_INSN, or CALL_INSN if insn is in a delay slot and from the target of a branch. Valid from reorg until end of compilation; cleared before used. - 1 in an INSN if this insn is dead code. Valid only during - dead-code elimination phase; cleared before use. */ + 1 in an INSN, JUMP_INSN or CALL_INSN or related rtx if this insn is + dead code. Valid only during dead-code elimination phase; cleared + before use. */ unsigned int in_struct : 1; - /* 1 if this rtx is used. This is used for copying shared structure. - See `unshare_all_rtl'. + /* At the end of RTL generation, 1 if this rtx is used. This is used for + copying shared structure. See `unshare_all_rtl'. In a REG, this is not needed for that purpose, and used instead in `leaf_renumber_regs_insn'. - In a SYMBOL_REF, means that emit_library_call + 1 in a SYMBOL_REF, means that emit_library_call has used it as the function. */ unsigned int used : 1; /* Nonzero if this rtx came from procedure integration. - In a REG, nonzero means this reg refers to the return value + 1 in a REG or PARALLEL means this rtx refers to the return value of the current function. 1 in a SYMBOL_REF if the symbol is weak. */ unsigned integrated : 1; @@ -198,11 +213,29 @@ struct rtx_def /* The first element of the operands of this rtx. The number of operands and their types are controlled by the `code' field, according to rtl.def. */ - rtunion fld[1]; + rtunion GTY ((special ("rtx_def"), + desc ("GET_CODE (&%0)"))) fld[1]; }; #define NULL_RTX (rtx) 0 +/* The "next" and "previous" RTX, relative to this one. */ + +#define RTX_NEXT(X) (rtx_next[GET_CODE (X)] == 0 ? NULL \ + : *(rtx *)(((char *)X) + rtx_next[GET_CODE (X)])) + +/* FIXME: the "NEXT_INSN (PREV_INSN (X)) == X" condition shouldn't be needed. + */ +#define RTX_PREV(X) ((GET_CODE (X) == INSN \ + || GET_CODE (X) == CALL_INSN \ + || GET_CODE (X) == JUMP_INSN \ + || GET_CODE (X) == NOTE \ + || GET_CODE (X) == BARRIER \ + || GET_CODE (X) == CODE_LABEL) \ + && PREV_INSN (X) != NULL \ + && NEXT_INSN (PREV_INSN (X)) == X \ + ? PREV_INSN (X) : NULL) + /* Define macros to access the `code' field of the rtx. */ #define GET_CODE(RTX) ((enum rtx_code) (RTX)->code) @@ -211,17 +244,13 @@ struct rtx_def #define GET_MODE(RTX) ((enum machine_mode) (RTX)->mode) #define PUT_MODE(RTX, MODE) ((RTX)->mode = (ENUM_BITFIELD(machine_mode)) (MODE)) -#define RTX_INTEGRATED_P(RTX) ((RTX)->integrated) -#define RTX_UNCHANGING_P(RTX) ((RTX)->unchanging) -#define RTX_FRAME_RELATED_P(RTX) ((RTX)->frame_related) - /* RTL vector. These appear inside RTX's when there is a need for a variable number of things. The principle use is inside PARALLEL expressions. */ -struct rtvec_def { +struct rtvec_def GTY(()) { int num_elem; /* number of elements */ - rtx elem[1]; + rtx GTY ((length ("%h.num_elem"))) elem[1]; }; #define NULL_RTVEC (rtvec) 0 @@ -255,6 +284,7 @@ struct rtvec_def { (GET_CODE (X) == LABEL_REF || GET_CODE (X) == SYMBOL_REF \ || GET_CODE (X) == CONST_INT || GET_CODE (X) == CONST_DOUBLE \ || GET_CODE (X) == CONST || GET_CODE (X) == HIGH \ + || GET_CODE (X) == CONST_VECTOR \ || GET_CODE (X) == CONSTANT_P_RTX) /* General accessor macros for accessing the fields of an rtx. */ @@ -263,19 +293,22 @@ struct rtvec_def { /* The bit with a star outside the statement expr and an & inside is so that N can be evaluated only once. */ #define RTL_CHECK1(RTX, N, C1) __extension__ \ -(*({ rtx _rtx = (RTX); int _n = (N); \ - enum rtx_code _code = GET_CODE (_rtx); \ +(*({ rtx const _rtx = (RTX); const int _n = (N); \ + const enum rtx_code _code = GET_CODE (_rtx); \ if (_n < 0 || _n >= GET_RTX_LENGTH (_code)) \ - rtl_check_failed_bounds (_rtx, _n, __FILE__, __LINE__, __FUNCTION__); \ + rtl_check_failed_bounds (_rtx, _n, __FILE__, __LINE__, \ + __FUNCTION__); \ if (GET_RTX_FORMAT(_code)[_n] != C1) \ - rtl_check_failed_type1(_rtx, _n, C1, __FILE__, __LINE__, __FUNCTION__); \ + rtl_check_failed_type1 (_rtx, _n, C1, __FILE__, __LINE__, \ + __FUNCTION__); \ &_rtx->fld[_n]; })) #define RTL_CHECK2(RTX, N, C1, C2) __extension__ \ -(*({ rtx _rtx = (RTX); int _n = (N); \ - enum rtx_code _code = GET_CODE (_rtx); \ +(*({ rtx const _rtx = (RTX); const int _n = (N); \ + const enum rtx_code _code = GET_CODE (_rtx); \ if (_n < 0 || _n >= GET_RTX_LENGTH (_code)) \ - rtl_check_failed_bounds (_rtx, _n, __FILE__, __LINE__, __FUNCTION__); \ + rtl_check_failed_bounds (_rtx, _n, __FILE__, __LINE__, \ + __FUNCTION__); \ if (GET_RTX_FORMAT(_code)[_n] != C1 \ && GET_RTX_FORMAT(_code)[_n] != C2) \ rtl_check_failed_type2 (_rtx, _n, C1, C2, __FILE__, __LINE__, \ @@ -283,20 +316,22 @@ struct rtvec_def { &_rtx->fld[_n]; })) #define RTL_CHECKC1(RTX, N, C) __extension__ \ -(*({ rtx _rtx = (RTX); int _n = (N); \ - if (GET_CODE (_rtx) != C) \ - rtl_check_failed_code1 (_rtx, C, __FILE__, __LINE__, __FUNCTION__); \ +(*({ rtx const _rtx = (RTX); const int _n = (N); \ + if (GET_CODE (_rtx) != (C)) \ + rtl_check_failed_code1 (_rtx, (C), __FILE__, __LINE__, \ + __FUNCTION__); \ &_rtx->fld[_n]; })) #define RTL_CHECKC2(RTX, N, C1, C2) __extension__ \ -(*({ rtx _rtx = (RTX); int _n = (N); \ - enum rtx_code _code = GET_CODE (_rtx); \ - if (_code != C1 && _code != C2) \ - rtl_check_failed_code2(_rtx, C1, C2, __FILE__, __LINE__, __FUNCTION__); \ +(*({ rtx const _rtx = (RTX); const int _n = (N); \ + const enum rtx_code _code = GET_CODE (_rtx); \ + if (_code != (C1) && _code != (C2)) \ + rtl_check_failed_code2 (_rtx, (C1), (C2), __FILE__, __LINE__, \ + __FUNCTION__); \ &_rtx->fld[_n]; })) #define RTVEC_ELT(RTVEC, I) __extension__ \ -(*({ rtvec _rtvec = (RTVEC); int _i = (I); \ +(*({ rtvec const _rtvec = (RTVEC); const int _i = (I); \ if (_i < 0 || _i >= GET_NUM_ELEM (_rtvec)) \ rtvec_check_failed_bounds (_rtvec, _i, __FILE__, __LINE__, \ __FUNCTION__); \ @@ -331,16 +366,123 @@ extern void rtvec_check_failed_bounds PARAMS ((rtvec, int, #endif -#define XWINT(RTX, N) (RTL_CHECK1(RTX, N, 'w').rtwint) -#define XINT(RTX, N) (RTL_CHECK2(RTX, N, 'i', 'n').rtint) -#define XSTR(RTX, N) (RTL_CHECK2(RTX, N, 's', 'S').rtstr) -#define XEXP(RTX, N) (RTL_CHECK2(RTX, N, 'e', 'u').rtx) -#define XVEC(RTX, N) (RTL_CHECK2(RTX, N, 'E', 'V').rtvec) -#define XMODE(RTX, N) (RTL_CHECK1(RTX, N, 'M').rttype) -#define XBITMAP(RTX, N) (RTL_CHECK1(RTX, N, 'b').rtbit) -#define XTREE(RTX, N) (RTL_CHECK1(RTX, N, 't').rttree) -#define XBBDEF(RTX, N) (RTL_CHECK1(RTX, N, 'B').bb) -#define XTMPL(RTX, N) (RTL_CHECK1(RTX, N, 'T').rtstr) +/* General accessor macros for accessing the flags of an rtx. */ + +/* Access an individual rtx flag, with no checking of any kind. */ +#define RTX_FLAG(RTX, FLAG) ((RTX)->FLAG) + +#if defined ENABLE_RTL_FLAG_CHECKING && (GCC_VERSION >= 2007) +#define RTL_FLAG_CHECK1(NAME, RTX, C1) __extension__ \ +({ rtx const _rtx = (RTX); \ + if (GET_CODE(_rtx) != C1) \ + rtl_check_failed_flag (NAME, _rtx, __FILE__, __LINE__, \ + __FUNCTION__); \ + _rtx; }) + +#define RTL_FLAG_CHECK2(NAME, RTX, C1, C2) __extension__ \ +({ rtx const _rtx = (RTX); \ + if (GET_CODE(_rtx) != C1 && GET_CODE(_rtx) != C2) \ + rtl_check_failed_flag (NAME,_rtx, __FILE__, __LINE__, \ + __FUNCTION__); \ + _rtx; }) + +#define RTL_FLAG_CHECK3(NAME, RTX, C1, C2, C3) __extension__ \ +({ rtx const _rtx = (RTX); \ + if (GET_CODE(_rtx) != C1 && GET_CODE(_rtx) != C2 \ + && GET_CODE(_rtx) != C3) \ + rtl_check_failed_flag (NAME, _rtx, __FILE__, __LINE__, \ + __FUNCTION__); \ + _rtx; }) + +#define RTL_FLAG_CHECK4(NAME, RTX, C1, C2, C3, C4) __extension__ \ +({ rtx const _rtx = (RTX); \ + if (GET_CODE(_rtx) != C1 && GET_CODE(_rtx) != C2 \ + && GET_CODE(_rtx) != C3 && GET_CODE(_rtx) != C4) \ + rtl_check_failed_flag (NAME, _rtx, __FILE__, __LINE__, \ + __FUNCTION__); \ + _rtx; }) + +#define RTL_FLAG_CHECK5(NAME, RTX, C1, C2, C3, C4, C5) __extension__ \ +({ rtx const _rtx = (RTX); \ + if (GET_CODE(_rtx) != C1 && GET_CODE(_rtx) != C2 \ + && GET_CODE(_rtx) != C3 && GET_CODE(_rtx) != C4 \ + && GET_CODE(_rtx) != C5) \ + rtl_check_failed_flag (NAME, _rtx, __FILE__, __LINE__, \ + __FUNCTION__); \ + _rtx; }) + +#define RTL_FLAG_CHECK6(NAME, RTX, C1, C2, C3, C4, C5, C6) \ + __extension__ \ +({ rtx const _rtx = (RTX); \ + if (GET_CODE(_rtx) != C1 && GET_CODE(_rtx) != C2 \ + && GET_CODE(_rtx) != C3 && GET_CODE(_rtx) != C4 \ + && GET_CODE(_rtx) != C5 && GET_CODE(_rtx) != C6) \ + rtl_check_failed_flag (NAME,_rtx, __FILE__, __LINE__, \ + __FUNCTION__); \ + _rtx; }) + +#define RTL_FLAG_CHECK7(NAME, RTX, C1, C2, C3, C4, C5, C6, C7) \ + __extension__ \ +({ rtx const _rtx = (RTX); \ + if (GET_CODE(_rtx) != C1 && GET_CODE(_rtx) != C2 \ + && GET_CODE(_rtx) != C3 && GET_CODE(_rtx) != C4 \ + && GET_CODE(_rtx) != C5 && GET_CODE(_rtx) != C6 \ + && GET_CODE(_rtx) != C7) \ + rtl_check_failed_flag (NAME, _rtx, __FILE__, __LINE__, \ + __FUNCTION__); \ + _rtx; }) + +#define RTL_FLAG_CHECK8(NAME, RTX, C1, C2, C3, C4, C5, C6, C7, C8) \ + __extension__ \ +({ rtx const _rtx = (RTX); \ + if (GET_CODE(_rtx) != C1 && GET_CODE(_rtx) != C2 \ + && GET_CODE(_rtx) != C3 && GET_CODE(_rtx) != C4 \ + && GET_CODE(_rtx) != C5 && GET_CODE(_rtx) != C6 \ + && GET_CODE(_rtx) != C7 && GET_CODE(_rtx) != C8) \ + rtl_check_failed_flag (NAME, _rtx, __FILE__, __LINE__, \ + __FUNCTION__); \ + _rtx; }) + +extern void rtl_check_failed_flag PARAMS ((const char *, rtx, const char *, + int, const char *)) + ATTRIBUTE_NORETURN + ; + +#else /* not ENABLE_RTL_FLAG_CHECKING */ + +#define RTL_FLAG_CHECK1(NAME, RTX, C1) (RTX) +#define RTL_FLAG_CHECK2(NAME, RTX, C1, C2) (RTX) +#define RTL_FLAG_CHECK3(NAME, RTX, C1, C2, C3) (RTX) +#define RTL_FLAG_CHECK4(NAME, RTX, C1, C2, C3, C4) (RTX) +#define RTL_FLAG_CHECK5(NAME, RTX, C1, C2, C3, C4, C5) (RTX) +#define RTL_FLAG_CHECK6(NAME, RTX, C1, C2, C3, C4, C5, C6) (RTX) +#define RTL_FLAG_CHECK7(NAME, RTX, C1, C2, C3, C4, C5, C6, C7) (RTX) +#define RTL_FLAG_CHECK8(NAME, RTX, C1, C2, C3, C4, C5, C6, C7, C8) (RTX) +#endif + +#define CLEAR_RTX_FLAGS(RTX) \ +do { \ + rtx const _rtx = (RTX); \ + _rtx->call = 0; \ + _rtx->frame_related = 0; \ + _rtx->in_struct = 0; \ + _rtx->integrated = 0; \ + _rtx->jump = 0; \ + _rtx->unchanging = 0; \ + _rtx->used = 0; \ + _rtx->volatil = 0; \ +} while (0) + +#define XWINT(RTX, N) (RTL_CHECK1 (RTX, N, 'w').rtwint) +#define XINT(RTX, N) (RTL_CHECK2 (RTX, N, 'i', 'n').rtint) +#define XSTR(RTX, N) (RTL_CHECK2 (RTX, N, 's', 'S').rtstr) +#define XEXP(RTX, N) (RTL_CHECK2 (RTX, N, 'e', 'u').rtx) +#define XVEC(RTX, N) (RTL_CHECK2 (RTX, N, 'E', 'V').rtvec) +#define XMODE(RTX, N) (RTL_CHECK1 (RTX, N, 'M').rttype) +#define XBITMAP(RTX, N) (RTL_CHECK1 (RTX, N, 'b').rtbit) +#define XTREE(RTX, N) (RTL_CHECK1 (RTX, N, 't').rttree) +#define XBBDEF(RTX, N) (RTL_CHECK1 (RTX, N, 'B').bb) +#define XTMPL(RTX, N) (RTL_CHECK1 (RTX, N, 'T').rtstr) #define XVECEXP(RTX, N, M) RTVEC_ELT (XVEC (RTX, N), M) #define XVECLEN(RTX, N) GET_NUM_ELEM (XVEC (RTX, N)) @@ -348,37 +490,38 @@ extern void rtvec_check_failed_bounds PARAMS ((rtvec, int, /* These are like XWINT, etc. except that they expect a '0' field instead of the normal type code. */ -#define X0WINT(RTX, N) (RTL_CHECK1(RTX, N, '0').rtwint) -#define X0INT(RTX, N) (RTL_CHECK1(RTX, N, '0').rtint) -#define X0UINT(RTX, N) (RTL_CHECK1(RTX, N, '0').rtuint) -#define X0STR(RTX, N) (RTL_CHECK1(RTX, N, '0').rtstr) -#define X0EXP(RTX, N) (RTL_CHECK1(RTX, N, '0').rtx) -#define X0VEC(RTX, N) (RTL_CHECK1(RTX, N, '0').rtvec) -#define X0MODE(RTX, N) (RTL_CHECK1(RTX, N, '0').rttype) -#define X0BITMAP(RTX, N) (RTL_CHECK1(RTX, N, '0').rtbit) -#define X0TREE(RTX, N) (RTL_CHECK1(RTX, N, '0').rttree) -#define X0BBDEF(RTX, N) (RTL_CHECK1(RTX, N, '0').bb) -#define X0ADVFLAGS(RTX, N) (RTL_CHECK1(RTX, N, '0').rt_addr_diff_vec_flags) -#define X0CSELIB(RTX, N) (RTL_CHECK1(RTX, N, '0').rt_cselib) -#define X0MEMATTR(RTX, N) (RTL_CHECK1(RTX, N, '0').rtmem) - -#define XCWINT(RTX, N, C) (RTL_CHECKC1(RTX, N, C).rtwint) -#define XCINT(RTX, N, C) (RTL_CHECKC1(RTX, N, C).rtint) -#define XCUINT(RTX, N, C) (RTL_CHECKC1(RTX, N, C).rtuint) -#define XCSTR(RTX, N, C) (RTL_CHECKC1(RTX, N, C).rtstr) -#define XCEXP(RTX, N, C) (RTL_CHECKC1(RTX, N, C).rtx) -#define XCVEC(RTX, N, C) (RTL_CHECKC1(RTX, N, C).rtvec) -#define XCMODE(RTX, N, C) (RTL_CHECKC1(RTX, N, C).rttype) -#define XCBITMAP(RTX, N, C) (RTL_CHECKC1(RTX, N, C).rtbit) -#define XCTREE(RTX, N, C) (RTL_CHECKC1(RTX, N, C).rttree) -#define XCBBDEF(RTX, N, C) (RTL_CHECKC1(RTX, N, C).bb) -#define XCADVFLAGS(RTX, N, C) (RTL_CHECKC1(RTX, N, C).rt_addr_diff_vec_flags) -#define XCCSELIB(RTX, N, C) (RTL_CHECKC1(RTX, N, C).rt_cselib) +#define X0WINT(RTX, N) (RTL_CHECK1 (RTX, N, '0').rtwint) +#define X0INT(RTX, N) (RTL_CHECK1 (RTX, N, '0').rtint) +#define X0UINT(RTX, N) (RTL_CHECK1 (RTX, N, '0').rtuint) +#define X0STR(RTX, N) (RTL_CHECK1 (RTX, N, '0').rtstr) +#define X0EXP(RTX, N) (RTL_CHECK1 (RTX, N, '0').rtx) +#define X0VEC(RTX, N) (RTL_CHECK1 (RTX, N, '0').rtvec) +#define X0MODE(RTX, N) (RTL_CHECK1 (RTX, N, '0').rttype) +#define X0BITMAP(RTX, N) (RTL_CHECK1 (RTX, N, '0').rtbit) +#define X0TREE(RTX, N) (RTL_CHECK1 (RTX, N, '0').rttree) +#define X0BBDEF(RTX, N) (RTL_CHECK1 (RTX, N, '0').bb) +#define X0ADVFLAGS(RTX, N) (RTL_CHECK1 (RTX, N, '0').rt_addr_diff_vec_flags) +#define X0CSELIB(RTX, N) (RTL_CHECK1 (RTX, N, '0').rt_cselib) +#define X0MEMATTR(RTX, N) (RTL_CHECKC1 (RTX, N, MEM).rtmem) +#define X0REGATTR(RTX, N) (RTL_CHECKC1 (RTX, N, REG).rtreg) + +#define XCWINT(RTX, N, C) (RTL_CHECKC1 (RTX, N, C).rtwint) +#define XCINT(RTX, N, C) (RTL_CHECKC1 (RTX, N, C).rtint) +#define XCUINT(RTX, N, C) (RTL_CHECKC1 (RTX, N, C).rtuint) +#define XCSTR(RTX, N, C) (RTL_CHECKC1 (RTX, N, C).rtstr) +#define XCEXP(RTX, N, C) (RTL_CHECKC1 (RTX, N, C).rtx) +#define XCVEC(RTX, N, C) (RTL_CHECKC1 (RTX, N, C).rtvec) +#define XCMODE(RTX, N, C) (RTL_CHECKC1 (RTX, N, C).rttype) +#define XCBITMAP(RTX, N, C) (RTL_CHECKC1 (RTX, N, C).rtbit) +#define XCTREE(RTX, N, C) (RTL_CHECKC1 (RTX, N, C).rttree) +#define XCBBDEF(RTX, N, C) (RTL_CHECKC1 (RTX, N, C).bb) +#define XCADVFLAGS(RTX, N, C) (RTL_CHECKC1 (RTX, N, C).rt_addr_diff_vec_flags) +#define XCCSELIB(RTX, N, C) (RTL_CHECKC1 (RTX, N, C).rt_cselib) #define XCVECEXP(RTX, N, M, C) RTVEC_ELT (XCVEC (RTX, N, C), M) #define XCVECLEN(RTX, N, C) GET_NUM_ELEM (XCVEC (RTX, N, C)) -#define XC2EXP(RTX, N, C1, C2) (RTL_CHECKC2(RTX, N, C1, C2).rtx) +#define XC2EXP(RTX, N, C1, C2) (RTL_CHECKC2 (RTX, N, C1, C2).rtx) /* ACCESS MACROS for particular fields of insns. */ @@ -387,47 +530,67 @@ extern void rtvec_check_failed_bounds PARAMS ((rtvec, int, /* Holds a unique number for each insn. These are not necessarily sequentially increasing. */ -#define INSN_UID(INSN) XINT(INSN, 0) +#define INSN_UID(INSN) XINT (INSN, 0) /* Chain insns together in sequence. */ -#define PREV_INSN(INSN) XEXP(INSN, 1) -#define NEXT_INSN(INSN) XEXP(INSN, 2) +#define PREV_INSN(INSN) XEXP (INSN, 1) +#define NEXT_INSN(INSN) XEXP (INSN, 2) +#define BLOCK_FOR_INSN(INSN) XBBDEF (INSN, 3) +#define INSN_SCOPE(INSN) XTREE (INSN, 4) /* The body of an insn. */ -#define PATTERN(INSN) XEXP(INSN, 3) +#define PATTERN(INSN) XEXP (INSN, 5) /* Code number of instruction, from when it was recognized. -1 means this instruction has not been recognized yet. */ -#define INSN_CODE(INSN) XINT(INSN, 4) +#define INSN_CODE(INSN) XINT (INSN, 6) /* Set up in flow.c; empty before then. Holds a chain of INSN_LIST rtx's whose first operands point at previous insns with direct data-flow connections to this one. That means that those insns set variables whose next use is in this insn. They are always in the same basic block as this insn. */ -#define LOG_LINKS(INSN) XEXP(INSN, 5) - -/* 1 if insn has been deleted. */ -#define INSN_DELETED_P(INSN) ((INSN)->volatil) - -/* 1 if insn is a call to a const or pure function. */ -#define CONST_OR_PURE_CALL_P(INSN) ((INSN)->unchanging) - -/* 1 if insn (assumed to be a CALL_INSN) is a sibling call. */ -#define SIBLING_CALL_P(INSN) ((INSN)->jump) - -/* 1 if insn is a branch that should not unconditionally execute its - delay slots, i.e., it is an annulled branch. */ -#define INSN_ANNULLED_BRANCH_P(INSN) ((INSN)->unchanging) - -/* 1 if insn is a dead code. Valid only for dead-code elimination phase. */ -#define INSN_DEAD_CODE_P(INSN) ((INSN)->in_struct) - -/* 1 if insn is in a delay slot and is from the target of the branch. If - the branch insn has INSN_ANNULLED_BRANCH_P set, this insn should only be +#define LOG_LINKS(INSN) XEXP(INSN, 7) + +#define RTX_INTEGRATED_P(RTX) \ + (RTL_FLAG_CHECK8("RTX_INTEGRATED_P", (RTX), INSN, CALL_INSN, \ + JUMP_INSN, INSN_LIST, BARRIER, CODE_LABEL, CONST, \ + NOTE)->integrated) +#define RTX_UNCHANGING_P(RTX) \ + (RTL_FLAG_CHECK3("RTX_UNCHANGING_P", (RTX), REG, MEM, CONCAT)->unchanging) +#define RTX_FRAME_RELATED_P(RTX) \ + (RTL_FLAG_CHECK5("RTX_FRAME_RELATED_P", (RTX), INSN, CALL_INSN, \ + JUMP_INSN, BARRIER, SET)->frame_related) + +/* 1 if RTX is an insn that has been deleted. */ +#define INSN_DELETED_P(RTX) \ + (RTL_FLAG_CHECK6("INSN_DELETED_P", (RTX), INSN, CALL_INSN, JUMP_INSN, \ + CODE_LABEL, BARRIER, NOTE)->volatil) + +/* 1 if RTX is a call to a const or pure function. */ +#define CONST_OR_PURE_CALL_P(RTX) \ + (RTL_FLAG_CHECK3("CONST_OR_PURE_CALL_P", (RTX), CALL_INSN, NOTE, \ + EXPR_LIST)->unchanging) + +/* 1 if RTX is a call_insn for a sibling call. */ +#define SIBLING_CALL_P(RTX) \ + (RTL_FLAG_CHECK1("SIBLING_CALL_P", (RTX), CALL_INSN)->jump) + +/* 1 if RTX is a jump_insn, call_insn, or insn that is an annulling branch. */ +#define INSN_ANNULLED_BRANCH_P(RTX) \ + (RTL_FLAG_CHECK3("INSN_ANNULLED_BRANCH_P", (RTX), JUMP_INSN, CALL_INSN, INSN)->unchanging) + +/* 1 if RTX is an insn that is dead code. Valid only for dead-code + elimination phase. */ +#define INSN_DEAD_CODE_P(RTX) \ + (RTL_FLAG_CHECK3("INSN_DEAD_CODE_P", (RTX), INSN, CALL_INSN, JUMP_INSN)->in_struct) + +/* 1 if RTX is an insn in a delay slot and is from the target of the branch. + If the branch insn has INSN_ANNULLED_BRANCH_P set, this insn should only be executed if the branch is taken. For annulled branches with this bit clear, the insn should be executed only if the branch is not taken. */ -#define INSN_FROM_TARGET_P(INSN) ((INSN)->in_struct) +#define INSN_FROM_TARGET_P(RTX) \ + (RTL_FLAG_CHECK3("INSN_FROM_TARGET_P", (RTX), INSN, JUMP_INSN, CALL_INSN)->in_struct) #define ADDR_DIFF_VEC_FLAGS(RTX) X0ADVFLAGS(RTX, 4) @@ -439,7 +602,7 @@ extern void rtvec_check_failed_bounds PARAMS ((rtvec, int, The mode field of the EXPR_LIST contains not a real machine mode but a value from enum reg_note. */ -#define REG_NOTES(INSN) XEXP(INSN, 6) +#define REG_NOTES(INSN) XEXP(INSN, 8) /* Don't forget to change reg_note_name in rtl.c. */ enum reg_note @@ -593,7 +756,8 @@ enum reg_note /* Define macros to extract and insert the reg-note kind in an EXPR_LIST. */ #define REG_NOTE_KIND(LINK) ((enum reg_note) GET_MODE (LINK)) -#define PUT_REG_NOTE_KIND(LINK,KIND) PUT_MODE(LINK, (enum machine_mode) (KIND)) +#define PUT_REG_NOTE_KIND(LINK, KIND) \ + PUT_MODE (LINK, (enum machine_mode) (KIND)) /* Names for REG_NOTE's in EXPR_LIST insn's. */ @@ -607,12 +771,12 @@ extern const char * const reg_note_name[]; CLOBBER expressions document the registers explicitly clobbered by this CALL_INSN. Pseudo registers can not be mentioned in this list. */ -#define CALL_INSN_FUNCTION_USAGE(INSN) XEXP(INSN, 7) +#define CALL_INSN_FUNCTION_USAGE(INSN) XEXP(INSN, 9) /* The label-number of a code-label. The assembler label is made from `L' and the label-number printed in decimal. Label numbers are unique in a compilation. */ -#define CODE_LABEL_NUMBER(INSN) XINT(INSN, 5) +#define CODE_LABEL_NUMBER(INSN) XINT (INSN, 6) #define LINE_NUMBER NOTE @@ -620,26 +784,30 @@ extern const char * const reg_note_name[]; line is in. We use the same field to record block numbers temporarily in NOTE_INSN_BLOCK_BEG and NOTE_INSN_BLOCK_END notes. (We avoid lots of casts between ints and pointers if we use a different macro for the block number.) - The NOTE_INSN_RANGE_{START,END} and NOTE_INSN_LIVE notes record their - information as an rtx in the field. */ + */ -#define NOTE_SOURCE_FILE(INSN) XCSTR(INSN, 3, NOTE) -#define NOTE_BLOCK(INSN) XCTREE(INSN, 3, NOTE) -#define NOTE_EH_HANDLER(INSN) XCINT(INSN, 3, NOTE) -#define NOTE_RANGE_INFO(INSN) XCEXP(INSN, 3, NOTE) -#define NOTE_LIVE_INFO(INSN) XCEXP(INSN, 3, NOTE) -#define NOTE_BASIC_BLOCK(INSN) XCBBDEF(INSN, 3, NOTE) -#define NOTE_EXPECTED_VALUE(INSN) XCEXP(INSN, 3, NOTE) +#define NOTE_SOURCE_FILE(INSN) XCSTR (INSN, 4, NOTE) +#define NOTE_BLOCK(INSN) XCTREE (INSN, 4, NOTE) +#define NOTE_EH_HANDLER(INSN) XCINT (INSN, 4, NOTE) +#define NOTE_BASIC_BLOCK(INSN) XCBBDEF (INSN, 4, NOTE) +#define NOTE_EXPECTED_VALUE(INSN) XCEXP (INSN, 4, NOTE) +#define NOTE_PREDICTION(INSN) XCINT (INSN, 4, NOTE) +#define NOTE_PRECONDITIONED(INSN) XCINT (INSN, 4, NOTE) /* In a NOTE that is a line number, this is the line number. Other kinds of NOTEs are identified by negative numbers here. */ -#define NOTE_LINE_NUMBER(INSN) XCINT(INSN, 4, NOTE) +#define NOTE_LINE_NUMBER(INSN) XCINT (INSN, 5, NOTE) /* Nonzero if INSN is a note marking the beginning of a basic block. */ #define NOTE_INSN_BASIC_BLOCK_P(INSN) \ (GET_CODE (INSN) == NOTE \ && NOTE_LINE_NUMBER (INSN) == NOTE_INSN_BASIC_BLOCK) +/* Algorithm and flags for prediction. */ +#define NOTE_PREDICTION_ALG(INSN) (XCINT(INSN, 4, NOTE)>>8) +#define NOTE_PREDICTION_FLAGS(INSN) (XCINT(INSN, 4, NOTE)&0xff) +#define NOTE_PREDICT(ALG,FLAGS) ((ALG<<8)+(FLAGS)) + /* Codes that appear in the NOTE_LINE_NUMBER field for kinds of notes that are not line numbers. @@ -676,6 +844,12 @@ enum insn_note /* Generated at the start of a duplicated exit test. */ NOTE_INSN_LOOP_VTOP, + /* Generated at the end of a conditional at the top of the loop. + This is used to perform a lame form of loop rotation in lieu + of actually understanding the loop structure. The note is + discarded after rotation is complete. */ + NOTE_INSN_LOOP_END_TOP_COND, + /* This kind of note is generated at the end of the function body, just before the return insn or return label. In an optimizing compilation it is deleted by the first jump optimization, after @@ -707,14 +881,6 @@ enum insn_note the line containing the inline call from being counted twice in gcov. */ NOTE_INSN_REPEATED_LINE_NUMBER, - /* Start/end of a live range region, where pseudos allocated on the stack - can be allocated to temporary registers. Uses NOTE_RANGE_INFO. */ - NOTE_INSN_RANGE_BEG, - NOTE_INSN_RANGE_END, - - /* Record which registers are currently live. Uses NOTE_LIVE_INFO. */ - NOTE_INSN_LIVE, - /* Record the struct for the following basic block. Uses NOTE_BASIC_BLOCK. */ NOTE_INSN_BASIC_BLOCK, @@ -722,6 +888,9 @@ enum insn_note NOTE_EXPECTED_VALUE; stored as (eq (reg) (const_int)). */ NOTE_INSN_EXPECTED_VALUE, + /* Record a prediction. Uses NOTE_PREDICTION. */ + NOTE_INSN_PREDICTION, + NOTE_INSN_MAX }; @@ -733,149 +902,220 @@ extern const char * const note_insn_name[NOTE_INSN_MAX - NOTE_INSN_BIAS]; /* The name of a label, in case it corresponds to an explicit label in the input source code. */ -#define LABEL_NAME(RTX) XCSTR(RTX, 6, CODE_LABEL) +#define LABEL_NAME(RTX) XCSTR (RTX, 7, CODE_LABEL) /* In jump.c, each label contains a count of the number of LABEL_REFs that point at it, so unused labels can be deleted. */ -#define LABEL_NUSES(RTX) XCINT(RTX, 3, CODE_LABEL) +#define LABEL_NUSES(RTX) XCINT (RTX, 4, CODE_LABEL) + +/* Labels carry a two-bit field composed of the ->jump and ->call + bits. This field indicates whether the label is an alternate + entry point, and if so, what kind. */ +enum label_kind +{ + LABEL_NORMAL = 0, /* ordinary label */ + LABEL_STATIC_ENTRY, /* alternate entry point, not exported */ + LABEL_GLOBAL_ENTRY, /* alternate entry point, exported */ + LABEL_WEAK_ENTRY /* alternate entry point, exported as weak symbol */ +}; + +#if defined ENABLE_RTL_FLAG_CHECKING && (GCC_VERSION > 2007) + +/* Retrieve the kind of LABEL. */ +#define LABEL_KIND(LABEL) __extension__ \ +({ rtx const _label = (LABEL); \ + if (GET_CODE (_label) != CODE_LABEL) \ + rtl_check_failed_flag ("LABEL_KIND", _label, __FILE__, __LINE__, \ + __FUNCTION__); \ + (enum label_kind) ((_label->jump << 1) | _label->call); }) + +/* Set the kind of LABEL. */ +#define SET_LABEL_KIND(LABEL, KIND) do { \ + rtx _label = (LABEL); \ + unsigned int _kind = (KIND); \ + if (GET_CODE (_label) != CODE_LABEL) \ + rtl_check_failed_flag ("SET_LABEL_KIND", _label, __FILE__, __LINE__, \ + __FUNCTION__); \ + _label->jump = ((_kind >> 1) & 1); \ + _label->call = (_kind & 1); \ +} while (0) + +#else + +/* Retrieve the kind of LABEL. */ +#define LABEL_KIND(LABEL) \ + ((enum label_kind) (((LABEL)->jump << 1) | (LABEL)->call)) + +/* Set the kind of LABEL. */ +#define SET_LABEL_KIND(LABEL, KIND) do { \ + rtx _label = (LABEL); \ + unsigned int _kind = (KIND); \ + _label->jump = ((_kind >> 1) & 1); \ + _label->call = (_kind & 1); \ +} while (0) + +#endif /* rtl flag checking */ -/* Associate a name with a CODE_LABEL. */ -#define LABEL_ALTERNATE_NAME(RTX) XCSTR(RTX, 7, CODE_LABEL) +#define LABEL_ALT_ENTRY_P(LABEL) (LABEL_KIND (LABEL) != LABEL_NORMAL) /* The original regno this ADDRESSOF was built for. */ -#define ADDRESSOF_REGNO(RTX) XCUINT(RTX, 1, ADDRESSOF) +#define ADDRESSOF_REGNO(RTX) XCUINT (RTX, 1, ADDRESSOF) /* The variable in the register we took the address of. */ -#define ADDRESSOF_DECL(RTX) XCTREE(RTX, 2, ADDRESSOF) +#define ADDRESSOF_DECL(RTX) XCTREE (RTX, 2, ADDRESSOF) /* In jump.c, each JUMP_INSN can point to a label that it can jump to, so that if the JUMP_INSN is deleted, the label's LABEL_NUSES can be decremented and possibly the label can be deleted. */ -#define JUMP_LABEL(INSN) XCEXP(INSN, 7, JUMP_INSN) +#define JUMP_LABEL(INSN) XCEXP (INSN, 9, JUMP_INSN) /* Once basic blocks are found in flow.c, each CODE_LABEL starts a chain that goes through all the LABEL_REFs that jump to that label. The chain eventually winds up at the CODE_LABEL: it is circular. */ -#define LABEL_REFS(LABEL) XCEXP(LABEL, 4, CODE_LABEL) +#define LABEL_REFS(LABEL) XCEXP (LABEL, 5, CODE_LABEL) /* This is the field in the LABEL_REF through which the circular chain of references to a particular label is linked. This chain is set up in flow.c. */ -#define LABEL_NEXTREF(REF) XCEXP(REF, 1, LABEL_REF) +#define LABEL_NEXTREF(REF) XCEXP (REF, 1, LABEL_REF) /* Once basic blocks are found in flow.c, Each LABEL_REF points to its containing instruction with this field. */ -#define CONTAINING_INSN(RTX) XCEXP(RTX, 2, LABEL_REF) +#define CONTAINING_INSN(RTX) XCEXP (RTX, 2, LABEL_REF) /* For a REG rtx, REGNO extracts the register number. ORIGINAL_REGNO holds the number the register originally had; for a pseudo register turned into a hard reg this will hold the old pseudo register number. */ -#define REGNO(RTX) XCUINT(RTX, 0, REG) -#define ORIGINAL_REGNO(RTX) X0UINT(RTX, 1) - -/* For a REG rtx, REG_FUNCTION_VALUE_P is nonzero if the reg - is the current function's return value. */ +#define REGNO(RTX) XCUINT (RTX, 0, REG) +#define ORIGINAL_REGNO(RTX) X0UINT (RTX, 1) -#define REG_FUNCTION_VALUE_P(RTX) ((RTX)->integrated) +/* 1 if RTX is a reg or parallel that is the current function's return + value. */ +#define REG_FUNCTION_VALUE_P(RTX) \ + (RTL_FLAG_CHECK2("REG_FUNCTION_VALUE_P", (RTX), REG, PARALLEL)->integrated) -/* 1 in a REG rtx if it corresponds to a variable declared by the user. */ -#define REG_USERVAR_P(RTX) ((RTX)->volatil) +/* 1 if RTX is a reg that corresponds to a variable declared by the user. */ +#define REG_USERVAR_P(RTX) \ + (RTL_FLAG_CHECK1("REG_USERVAR_P", (RTX), REG)->volatil) -/* 1 in a REG rtx if the register is a pointer. */ -#define REG_POINTER(RTX) ((RTX)->frame_related) +/* 1 if RTX is a reg that holds a pointer value. */ +#define REG_POINTER(RTX) \ + (RTL_FLAG_CHECK1("REG_POINTER", (RTX), REG)->frame_related) /* 1 if the given register REG corresponds to a hard register. */ #define HARD_REGISTER_P(REG) (HARD_REGISTER_NUM_P (REGNO (REG))) /* 1 if the given register number REG_NO corresponds to a hard register. */ -#define HARD_REGISTER_NUM_P(REG_NO) (REG_NO < FIRST_PSEUDO_REGISTER) +#define HARD_REGISTER_NUM_P(REG_NO) ((REG_NO) < FIRST_PSEUDO_REGISTER) /* For a CONST_INT rtx, INTVAL extracts the integer. */ #define INTVAL(RTX) XCWINT(RTX, 0, CONST_INT) /* For a CONST_DOUBLE: - The usual two ints that hold the value. - For a DImode, that is all there are; - and CONST_DOUBLE_LOW is the low-order word and ..._HIGH the high-order. - For a float, the number of ints varies, - and CONST_DOUBLE_LOW is the one that should come first *in memory*. - So use &CONST_DOUBLE_LOW(r) as the address of an array of ints. */ -#define CONST_DOUBLE_LOW(r) XCWINT (r, 1, CONST_DOUBLE) -#define CONST_DOUBLE_HIGH(r) XCWINT (r, 2, CONST_DOUBLE) - -/* Link for chain of all CONST_DOUBLEs in use in current function. */ -#define CONST_DOUBLE_CHAIN(r) XCEXP (r, 0, CONST_DOUBLE) + For a DImode, there are two integers CONST_DOUBLE_LOW is the + low-order word and ..._HIGH the high-order. + For a float, there is a REAL_VALUE_TYPE structure, and + CONST_DOUBLE_REAL_VALUE(r) is a pointer to it. */ +#define CONST_DOUBLE_LOW(r) XCWINT (r, 0, CONST_DOUBLE) +#define CONST_DOUBLE_HIGH(r) XCWINT (r, 1, CONST_DOUBLE) +#define CONST_DOUBLE_REAL_VALUE(r) ((struct real_value *)&CONST_DOUBLE_LOW(r)) + +/* For a CONST_VECTOR, return element #n. */ +#define CONST_VECTOR_ELT(RTX, N) XCVECEXP (RTX, 0, N, CONST_VECTOR) + +/* For a CONST_VECTOR, return the number of elements in a vector. */ +#define CONST_VECTOR_NUNITS(RTX) XCVECLEN (RTX, 0, CONST_VECTOR) /* For a SUBREG rtx, SUBREG_REG extracts the value we want a subreg of. SUBREG_BYTE extracts the byte-number. */ -#define SUBREG_REG(RTX) XCEXP(RTX, 0, SUBREG) -#define SUBREG_BYTE(RTX) XCUINT(RTX, 1, SUBREG) +#define SUBREG_REG(RTX) XCEXP (RTX, 0, SUBREG) +#define SUBREG_BYTE(RTX) XCUINT (RTX, 1, SUBREG) /* in rtlanal.c */ +extern unsigned int subreg_lsb PARAMS ((rtx)); extern unsigned int subreg_regno_offset PARAMS ((unsigned int, enum machine_mode, unsigned int, enum machine_mode)); extern unsigned int subreg_regno PARAMS ((rtx)); -/* 1 if the REG contained in SUBREG_REG is already known to be - sign- or zero-extended from the mode of the SUBREG to the mode of +/* 1 if RTX is a subreg containing a reg that is already known to be + sign- or zero-extended from the mode of the subreg to the mode of the reg. SUBREG_PROMOTED_UNSIGNED_P gives the signedness of the extension. When used as a LHS, is means that this extension must be done when assigning to SUBREG_REG. */ -#define SUBREG_PROMOTED_VAR_P(RTX) ((RTX)->in_struct) -#define SUBREG_PROMOTED_UNSIGNED_P(RTX) ((RTX)->unchanging) +#define SUBREG_PROMOTED_VAR_P(RTX) \ + (RTL_FLAG_CHECK1("SUBREG_PROMOTED", (RTX), SUBREG)->in_struct) + +#define SUBREG_PROMOTED_UNSIGNED_SET(RTX, VAL) \ +do { \ + rtx const _rtx = RTL_FLAG_CHECK1("SUBREG_PROMOTED_UNSIGNED_SET", (RTX), SUBREG); \ + if ((VAL) < 0) \ + _rtx->volatil = 1; \ + else { \ + _rtx->volatil = 0; \ + _rtx->unchanging = (VAL); \ + } \ +} while (0) +#define SUBREG_PROMOTED_UNSIGNED_P(RTX) \ + ((RTL_FLAG_CHECK1("SUBREG_PROMOTED_UNSIGNED_P", (RTX), SUBREG)->volatil) \ + ? -1 : (RTX)->unchanging) /* Access various components of an ASM_OPERANDS rtx. */ -#define ASM_OPERANDS_TEMPLATE(RTX) XCSTR ((RTX), 0, ASM_OPERANDS) -#define ASM_OPERANDS_OUTPUT_CONSTRAINT(RTX) XCSTR ((RTX), 1, ASM_OPERANDS) -#define ASM_OPERANDS_OUTPUT_IDX(RTX) XCINT ((RTX), 2, ASM_OPERANDS) -#define ASM_OPERANDS_INPUT_VEC(RTX) XCVEC ((RTX), 3, ASM_OPERANDS) -#define ASM_OPERANDS_INPUT_CONSTRAINT_VEC(RTX) XCVEC ((RTX), 4, ASM_OPERANDS) -#define ASM_OPERANDS_INPUT(RTX, N) XCVECEXP ((RTX), 3, (N), ASM_OPERANDS) -#define ASM_OPERANDS_INPUT_LENGTH(RTX) XCVECLEN ((RTX), 3, ASM_OPERANDS) +#define ASM_OPERANDS_TEMPLATE(RTX) XCSTR (RTX, 0, ASM_OPERANDS) +#define ASM_OPERANDS_OUTPUT_CONSTRAINT(RTX) XCSTR (RTX, 1, ASM_OPERANDS) +#define ASM_OPERANDS_OUTPUT_IDX(RTX) XCINT (RTX, 2, ASM_OPERANDS) +#define ASM_OPERANDS_INPUT_VEC(RTX) XCVEC (RTX, 3, ASM_OPERANDS) +#define ASM_OPERANDS_INPUT_CONSTRAINT_VEC(RTX) XCVEC (RTX, 4, ASM_OPERANDS) +#define ASM_OPERANDS_INPUT(RTX, N) XCVECEXP (RTX, 3, N, ASM_OPERANDS) +#define ASM_OPERANDS_INPUT_LENGTH(RTX) XCVECLEN (RTX, 3, ASM_OPERANDS) #define ASM_OPERANDS_INPUT_CONSTRAINT_EXP(RTX, N) \ - XCVECEXP ((RTX), 4, (N), ASM_OPERANDS) + XCVECEXP (RTX, 4, N, ASM_OPERANDS) #define ASM_OPERANDS_INPUT_CONSTRAINT(RTX, N) \ - XSTR (XCVECEXP ((RTX), 4, (N), ASM_OPERANDS), 0) + XSTR (XCVECEXP (RTX, 4, N, ASM_OPERANDS), 0) #define ASM_OPERANDS_INPUT_MODE(RTX, N) \ - GET_MODE (XCVECEXP ((RTX), 4, (N), ASM_OPERANDS)) -#define ASM_OPERANDS_SOURCE_FILE(RTX) XCSTR ((RTX), 5, ASM_OPERANDS) -#define ASM_OPERANDS_SOURCE_LINE(RTX) XCINT ((RTX), 6, ASM_OPERANDS) + GET_MODE (XCVECEXP (RTX, 4, N, ASM_OPERANDS)) +#define ASM_OPERANDS_SOURCE_FILE(RTX) XCSTR (RTX, 5, ASM_OPERANDS) +#define ASM_OPERANDS_SOURCE_LINE(RTX) XCINT (RTX, 6, ASM_OPERANDS) -/* For a MEM RTX, 1 if we should keep the alias set for this mem +/* 1 if RTX is a mem and we should keep the alias set for this mem unchanged when we access a component. Set to 1, or example, when we are already in a non-addressable component of an aggregate. */ -#define MEM_KEEP_ALIAS_SET_P(RTX) ((RTX)->jump) +#define MEM_KEEP_ALIAS_SET_P(RTX) \ + (RTL_FLAG_CHECK1("MEM_KEEP_ALIAS_SET_P", (RTX), MEM)->jump) -/* For a MEM rtx, 1 if it's a volatile reference. - Also in an ASM_OPERANDS rtx. */ -#define MEM_VOLATILE_P(RTX) ((RTX)->volatil) +/* 1 if RTX is a mem or asm_operand for a volatile reference. */ +#define MEM_VOLATILE_P(RTX) \ + (RTL_FLAG_CHECK3("MEM_VOLATILE_P", (RTX), MEM, ASM_OPERANDS, \ + ASM_INPUT)->volatil) -/* For a MEM rtx, 1 if it refers to an aggregate, either to the +/* 1 if RTX is a mem that refers to an aggregate, either to the aggregate itself of to a field of the aggregate. If zero, RTX may or may not be such a reference. */ -#define MEM_IN_STRUCT_P(RTX) ((RTX)->in_struct) +#define MEM_IN_STRUCT_P(RTX) \ + (RTL_FLAG_CHECK1("MEM_IN_STRUCT_P", (RTX), MEM)->in_struct) -/* For a MEM rtx, 1 if it refers to a scalar. If zero, RTX may or may - not refer to a scalar.*/ -#define MEM_SCALAR_P(RTX) ((RTX)->frame_related) +/* 1 if RTX is a mem that refers to a scalar. If zero, RTX may or may + not refer to a scalar. */ +#define MEM_SCALAR_P(RTX) \ + (RTL_FLAG_CHECK1("MEM_SCALAR_P", (RTX), MEM)->frame_related) -/* If VAL is non-zero, set MEM_IN_STRUCT_P and clear MEM_SCALAR_P in +/* If VAL is nonzero, set MEM_IN_STRUCT_P and clear MEM_SCALAR_P in RTX. Otherwise, vice versa. Use this macro only when you are *sure* that you know that the MEM is in a structure, or is a scalar. VAL is evaluated only once. */ -#define MEM_SET_IN_STRUCT_P(RTX, VAL) do { \ +#define MEM_SET_IN_STRUCT_P(RTX, VAL) \ +do { \ if (VAL) \ { \ MEM_IN_STRUCT_P (RTX) = 1; \ @@ -892,6 +1132,10 @@ extern unsigned int subreg_regno PARAMS ((rtx)); in the block and provide defaults if none specified. */ #define MEM_ATTRS(RTX) X0MEMATTR (RTX, 1) +/* The register attribute block. We provide access macros for each value + in the block and provide defaults if none specified. */ +#define REG_ATTRS(RTX) X0REGATTR (RTX, 2) + /* For a MEM rtx, the alias set. If 0, this MEM is not in any alias set, and may alias anything. Otherwise, the MEM can only alias MEMs in the same alias set. This value is set in a @@ -918,12 +1162,20 @@ extern unsigned int subreg_regno PARAMS ((rtx)); : GET_MODE (RTX) != BLKmode ? GEN_INT (GET_MODE_SIZE (GET_MODE (RTX))) \ : 0) -/* For a MEM rtx, the alignment in bits. */ +/* For a MEM rtx, the alignment in bits. We can use the alignment of the + mode as a default when STRICT_ALIGNMENT, but not if not. */ #define MEM_ALIGN(RTX) \ (MEM_ATTRS (RTX) != 0 ? MEM_ATTRS (RTX)->align \ - : GET_MODE (RTX) != BLKmode ? GET_MODE_ALIGNMENT (GET_MODE (RTX)) \ - : BITS_PER_UNIT) + : (STRICT_ALIGNMENT && GET_MODE (RTX) != BLKmode \ + ? GET_MODE_ALIGNMENT (GET_MODE (RTX)) : BITS_PER_UNIT)) +/* For a REG rtx, the decl it is known to refer to, if it is known to + refer to part of a DECL. */ +#define REG_EXPR(RTX) (REG_ATTRS (RTX) == 0 ? 0 : REG_ATTRS (RTX)->decl) + +/* For a MEM rtx, the offset from the start of MEM_DECL, if known, as a + RTX that is always a CONST_INT. */ +#define REG_OFFSET(RTX) (REG_ATTRS (RTX) == 0 ? 0 : REG_ATTRS (RTX)->offset) /* Copy the attributes that apply to memory locations from RHS to LHS. */ #define MEM_COPY_ATTRIBUTES(LHS, RHS) \ @@ -934,82 +1186,85 @@ extern unsigned int subreg_regno PARAMS ((rtx)); MEM_KEEP_ALIAS_SET_P (LHS) = MEM_KEEP_ALIAS_SET_P (RHS), \ MEM_ATTRS (LHS) = MEM_ATTRS (RHS)) -/* For a LABEL_REF, 1 means that this reference is to a label outside the - loop containing the reference. */ -#define LABEL_OUTSIDE_LOOP_P(RTX) ((RTX)->in_struct) +/* 1 if RTX is a label_ref to a label outside the loop containing the + reference. */ +#define LABEL_OUTSIDE_LOOP_P(RTX) \ + (RTL_FLAG_CHECK1("LABEL_OUTSIDE_LOOP_P", (RTX), LABEL_REF)->in_struct) -/* For a LABEL_REF, 1 means it is for a nonlocal label. */ -/* Likewise in an EXPR_LIST for a REG_LABEL note. */ -#define LABEL_REF_NONLOCAL_P(RTX) ((RTX)->volatil) +/* 1 if RTX is a label_ref for a nonlocal label. */ +/* Likewise in an expr_list for a reg_label note. */ +#define LABEL_REF_NONLOCAL_P(RTX) \ + (RTL_FLAG_CHECK2("LABEL_REF_NONLOCAL_P", (RTX), LABEL_REF, \ + REG_LABEL)->volatil) -/* For a CODE_LABEL, 1 means always consider this label to be needed. */ -#define LABEL_PRESERVE_P(RTX) ((RTX)->in_struct) +/* 1 if RTX is a code_label that should always be considered to be needed. */ +#define LABEL_PRESERVE_P(RTX) \ + (RTL_FLAG_CHECK2("LABEL_PRESERVE_P", (RTX), CODE_LABEL, NOTE)->in_struct) -/* For a REG, 1 means the register is used only in an exit test of a loop. */ -#define REG_LOOP_TEST_P(RTX) ((RTX)->in_struct) +/* 1 if RTX is a reg that is used only in an exit test of a loop. */ +#define REG_LOOP_TEST_P(RTX) \ + (RTL_FLAG_CHECK1("REG_LOOP_TEST_P", (RTX), REG)->in_struct) -/* During sched, for an insn, 1 means that the insn must be scheduled together +/* During sched, 1 if RTX is an insn that must be scheduled together with the preceding insn. */ -#define SCHED_GROUP_P(INSN) ((INSN)->in_struct) - -/* During sched, for the LOG_LINKS of an insn, these cache the adjusted - cost of the dependence link. The cost of executing an instruction - may vary based on how the results are used. LINK_COST_ZERO is 1 when - the cost through the link varies and is unchanged (i.e., the link has - zero additional cost). LINK_COST_FREE is 1 when the cost through the - link is zero (i.e., the link makes the cost free). In other cases, - the adjustment to the cost is recomputed each time it is needed. */ -#define LINK_COST_ZERO(X) ((X)->jump) -#define LINK_COST_FREE(X) ((X)->call) +#define SCHED_GROUP_P(RTX) \ + (RTL_FLAG_CHECK3("SCHED_GROUP_P", (RTX), INSN, JUMP_INSN, CALL_INSN \ + )->in_struct) /* For a SET rtx, SET_DEST is the place that is set and SET_SRC is the value it is set to. */ #define SET_DEST(RTX) XC2EXP(RTX, 0, SET, CLOBBER) #define SET_SRC(RTX) XCEXP(RTX, 1, SET) -#define SET_IS_RETURN_P(RTX) ((RTX)->jump) +#define SET_IS_RETURN_P(RTX) \ + (RTL_FLAG_CHECK1("SET_IS_RETURN_P", (RTX), SET)->jump) /* For a TRAP_IF rtx, TRAP_CONDITION is an expression. */ -#define TRAP_CONDITION(RTX) XCEXP(RTX, 0, TRAP_IF) -#define TRAP_CODE(RTX) XCEXP(RTX, 1, TRAP_IF) +#define TRAP_CONDITION(RTX) XCEXP (RTX, 0, TRAP_IF) +#define TRAP_CODE(RTX) XCEXP (RTX, 1, TRAP_IF) /* For a COND_EXEC rtx, COND_EXEC_TEST is the condition to base conditionally executing the code on, COND_EXEC_CODE is the code to execute if the condition is true. */ -#define COND_EXEC_TEST(RTX) XCEXP(RTX, 0, COND_EXEC) -#define COND_EXEC_CODE(RTX) XCEXP(RTX, 1, COND_EXEC) +#define COND_EXEC_TEST(RTX) XCEXP (RTX, 0, COND_EXEC) +#define COND_EXEC_CODE(RTX) XCEXP (RTX, 1, COND_EXEC) -/* 1 in a SYMBOL_REF if it addresses this function's constants pool. */ -#define CONSTANT_POOL_ADDRESS_P(RTX) ((RTX)->unchanging) +/* 1 if RTX is a symbol_ref that addresses this function's constants pool. */ +#define CONSTANT_POOL_ADDRESS_P(RTX) \ + (RTL_FLAG_CHECK1("CONSTANT_POOL_ADDRESS_P", (RTX), SYMBOL_REF)->unchanging) -/* 1 in a SYMBOL_REF if it addresses this function's string constant pool. */ -#define STRING_POOL_ADDRESS_P(RTX) ((RTX)->frame_related) +/* 1 if RTX is a symbol_ref that addresses this function's string constant + pool */ +#define STRING_POOL_ADDRESS_P(RTX) \ + (RTL_FLAG_CHECK1("STRING_POOL_ADDRESS_P", (RTX), SYMBOL_REF)->frame_related) -/* Flag in a SYMBOL_REF for machine-specific purposes. */ -#define SYMBOL_REF_FLAG(RTX) ((RTX)->volatil) +/* Used if RTX is a symbol_ref, for machine-specific purposes. */ +#define SYMBOL_REF_FLAG(RTX) \ + (RTL_FLAG_CHECK1("SYMBOL_REF_FLAG", (RTX), SYMBOL_REF)->volatil) -/* 1 means a SYMBOL_REF has been the library function in emit_library_call. */ -#define SYMBOL_REF_USED(RTX) ((RTX)->used) +/* 1 if RTX is a symbol_ref that has been the library function in + emit_library_call. */ +#define SYMBOL_REF_USED(RTX) \ + (RTL_FLAG_CHECK1("SYMBOL_REF_USED", (RTX), SYMBOL_REF)->used) -/* 1 means a SYMBOL_REF is weak. */ -#define SYMBOL_REF_WEAK(RTX) ((RTX)->integrated) +/* 1 if RTX is a symbol_ref for a weak symbol. */ +#define SYMBOL_REF_WEAK(RTX) \ + (RTL_FLAG_CHECK1("SYMBOL_REF_WEAK", (RTX), SYMBOL_REF)->integrated) /* Define a macro to look for REG_INC notes, but save time on machines where they never exist. */ -/* Don't continue this line--convex cc version 4.1 would lose. */ #if (defined (HAVE_PRE_INCREMENT) || defined (HAVE_PRE_DECREMENT) || defined (HAVE_POST_INCREMENT) || defined (HAVE_POST_DECREMENT)) -#define FIND_REG_INC_NOTE(insn, reg) \ - (reg != NULL_RTX && REG_P ((rtx) (reg)) \ - ? find_regno_note ((insn), REG_INC, REGNO ((rtx) (reg))) \ - : find_reg_note ((insn), REG_INC, (reg))) +#define FIND_REG_INC_NOTE(INSN, REG) \ + ((REG) != NULL_RTX && REG_P ((REG)) \ + ? find_regno_note ((INSN), REG_INC, REGNO (REG)) \ + : find_reg_note ((INSN), REG_INC, (REG))) #else -#define FIND_REG_INC_NOTE(insn, reg) 0 +#define FIND_REG_INC_NOTE(INSN, REG) 0 #endif /* Indicate whether the machine has any sort of auto increment addressing. If not, we can avoid checking for REG_INC notes. */ -/* Don't continue this line--convex cc version 4.1 would lose. */ #if (defined (HAVE_PRE_INCREMENT) || defined (HAVE_PRE_DECREMENT) || defined (HAVE_POST_INCREMENT) || defined (HAVE_POST_DECREMENT)) #define AUTO_INC_DEC #endif @@ -1083,103 +1338,9 @@ extern unsigned int subreg_regno PARAMS ((rtx)); #define USE_STORE_PRE_DECREMENT(MODE) HAVE_PRE_DECREMENT #endif - -/* Accessors for RANGE_INFO. */ -/* For RANGE_{START,END} notes return the RANGE_START note. */ -#define RANGE_INFO_NOTE_START(INSN) XCEXP (INSN, 0, RANGE_INFO) - -/* For RANGE_{START,END} notes return the RANGE_START note. */ -#define RANGE_INFO_NOTE_END(INSN) XCEXP (INSN, 1, RANGE_INFO) - -/* For RANGE_{START,END} notes, return the vector containing the registers used - in the range. */ -#define RANGE_INFO_REGS(INSN) XCVEC (INSN, 2, RANGE_INFO) -#define RANGE_INFO_REGS_REG(INSN, N) XCVECEXP (INSN, 2, N, RANGE_INFO) -#define RANGE_INFO_NUM_REGS(INSN) XCVECLEN (INSN, 2, RANGE_INFO) - -/* For RANGE_{START,END} notes, the number of calls within the range. */ -#define RANGE_INFO_NCALLS(INSN) XCINT (INSN, 3, RANGE_INFO) - -/* For RANGE_{START,END} notes, the number of insns within the range. */ -#define RANGE_INFO_NINSNS(INSN) XCINT (INSN, 4, RANGE_INFO) - -/* For RANGE_{START,END} notes, a unique # to identify this range. */ -#define RANGE_INFO_UNIQUE(INSN) XCINT (INSN, 5, RANGE_INFO) - -/* For RANGE_{START,END} notes, the basic block # the range starts with. */ -#define RANGE_INFO_BB_START(INSN) XCINT (INSN, 6, RANGE_INFO) - -/* For RANGE_{START,END} notes, the basic block # the range ends with. */ -#define RANGE_INFO_BB_END(INSN) XCINT (INSN, 7, RANGE_INFO) - -/* For RANGE_{START,END} notes, the loop depth the range is in. */ -#define RANGE_INFO_LOOP_DEPTH(INSN) XCINT (INSN, 8, RANGE_INFO) - -/* For RANGE_{START,END} notes, the bitmap of live registers at the start - of the range. */ -#define RANGE_INFO_LIVE_START(INSN) XCBITMAP (INSN, 9, RANGE_INFO) - -/* For RANGE_{START,END} notes, the bitmap of live registers at the end - of the range. */ -#define RANGE_INFO_LIVE_END(INSN) XCBITMAP (INSN, 10, RANGE_INFO) - -/* For RANGE_START notes, the marker # of the start of the range. */ -#define RANGE_INFO_MARKER_START(INSN) XCINT (INSN, 11, RANGE_INFO) - -/* For RANGE_START notes, the marker # of the end of the range. */ -#define RANGE_INFO_MARKER_END(INSN) XCINT (INSN, 12, RANGE_INFO) - -/* Original pseudo register # for a live range note. */ -#define RANGE_REG_PSEUDO(INSN,N) XCINT (XCVECEXP (INSN, 2, N, RANGE_INFO), 0, REG) - -/* Pseudo register # original register is copied into or -1. */ -#define RANGE_REG_COPY(INSN,N) XCINT (XCVECEXP (INSN, 2, N, RANGE_INFO), 1, REG) - -/* How many times a register in a live range note was referenced. */ -#define RANGE_REG_REFS(INSN,N) XINT (XCVECEXP (INSN, 2, N, RANGE_INFO), 2) - -/* How many times a register in a live range note was set. */ -#define RANGE_REG_SETS(INSN,N) XINT (XCVECEXP (INSN, 2, N, RANGE_INFO), 3) - -/* How many times a register in a live range note died. */ -#define RANGE_REG_DEATHS(INSN,N) XINT (XCVECEXP (INSN, 2, N, RANGE_INFO), 4) - -/* Whether the original value is needed to be copied into the range register at - the start of the range. */ -#define RANGE_REG_COPY_FLAGS(INSN,N) XINT (XCVECEXP (INSN, 2, N, RANGE_INFO), 5) - -/* # of insns the register copy is live over. */ -#define RANGE_REG_LIVE_LENGTH(INSN,N) XINT (XCVECEXP (INSN, 2, N, RANGE_INFO), 6) - -/* # of calls the register copy is live over. */ -#define RANGE_REG_N_CALLS(INSN,N) XINT (XCVECEXP (INSN, 2, N, RANGE_INFO), 7) - -/* DECL_NODE pointer of the declaration if the register is a user defined - variable. */ -#define RANGE_REG_SYMBOL_NODE(INSN,N) XTREE (XCVECEXP (INSN, 2, N, RANGE_INFO), 8) - -/* BLOCK_NODE pointer to the block the variable is declared in if the - register is a user defined variable. */ -#define RANGE_REG_BLOCK_NODE(INSN,N) XTREE (XCVECEXP (INSN, 2, N, RANGE_INFO), 9) - -/* EXPR_LIST of the distinct ranges a variable is in. */ -#define RANGE_VAR_LIST(INSN) (XEXP (INSN, 0)) - -/* Block a variable is declared in. */ -#define RANGE_VAR_BLOCK(INSN) (XTREE (INSN, 1)) - -/* # of distinct ranges a variable is in. */ -#define RANGE_VAR_NUM(INSN) (XINT (INSN, 2)) - -/* For a NOTE_INSN_LIVE note, the registers which are currently live. */ -#define RANGE_LIVE_BITMAP(INSN) (XBITMAP (INSN, 0)) - -/* For a NOTE_INSN_LIVE note, the original basic block number. */ -#define RANGE_LIVE_ORIG_BLOCK(INSN) (XINT (INSN, 1)) - /* Determine if the insn is a PHI node. */ #define PHI_NODE_P(X) \ - (X && GET_CODE (X) == INSN \ + ((X) && GET_CODE (X) == INSN \ && GET_CODE (PATTERN (X)) == SET \ && GET_CODE (SET_SRC (PATTERN (X))) == PHI) @@ -1197,10 +1358,11 @@ extern int generating_concat_p; /* In expmed.c */ extern int ceil_log2 PARAMS ((unsigned HOST_WIDE_INT)); -#define plus_constant(X,C) plus_constant_wide (X, (HOST_WIDE_INT) (C)) +#define plus_constant(X, C) plus_constant_wide ((X), (HOST_WIDE_INT) (C)) /* In builtins.c */ extern rtx expand_builtin_expect_jump PARAMS ((tree, rtx, rtx)); +extern void purge_builtin_constant_p PARAMS ((void)); /* In explow.c */ extern void set_stack_check_libfunc PARAMS ((rtx)); @@ -1216,6 +1378,11 @@ extern rtx gen_rtx PARAMS ((enum rtx_code, extern rtvec gen_rtvec PARAMS ((int, ...)); extern rtx copy_insn_1 PARAMS ((rtx)); extern rtx copy_insn PARAMS ((rtx)); +extern rtx gen_int_mode PARAMS ((HOST_WIDE_INT, + enum machine_mode)); +extern rtx emit_copy_of_insn_after PARAMS ((rtx, rtx)); +extern void set_reg_attrs_from_mem PARAMS ((rtx, rtx)); +extern void set_mem_attrs_from_reg PARAMS ((rtx, rtx)); /* In rtl.c */ extern rtx rtx_alloc PARAMS ((RTX_CODE)); @@ -1233,6 +1400,8 @@ extern int rtx_equal_p PARAMS ((rtx, rtx)); /* In emit-rtl.c */ extern rtvec gen_rtvec_v PARAMS ((int, rtx *)); extern rtx gen_reg_rtx PARAMS ((enum machine_mode)); +extern rtx gen_rtx_REG_offset PARAMS ((rtx, enum machine_mode, + unsigned int, int)); extern rtx gen_label_rtx PARAMS ((void)); extern int subreg_hard_regno PARAMS ((rtx, int)); extern rtx gen_lowpart_common PARAMS ((enum machine_mode, rtx)); @@ -1266,12 +1435,13 @@ extern rtx get_insns PARAMS ((void)); extern const char *get_insn_name PARAMS ((int)); extern rtx get_last_insn PARAMS ((void)); extern rtx get_last_insn_anywhere PARAMS ((void)); +extern rtx get_first_nonnote_insn PARAMS ((void)); +extern rtx get_last_nonnote_insn PARAMS ((void)); extern void start_sequence PARAMS ((void)); extern void push_to_sequence PARAMS ((rtx)); extern void end_sequence PARAMS ((void)); extern void push_to_full_sequence PARAMS ((rtx, rtx)); extern void end_full_sequence PARAMS ((rtx*, rtx*)); -extern rtx gen_sequence PARAMS ((void)); /* In varasm.c */ extern rtx immed_double_const PARAMS ((HOST_WIDE_INT, HOST_WIDE_INT, enum machine_mode)); @@ -1280,6 +1450,7 @@ extern rtx force_const_mem PARAMS ((enum machine_mode, rtx)); /* In varasm.c */ extern rtx get_pool_constant PARAMS ((rtx)); +extern rtx get_pool_constant_mark PARAMS ((rtx, bool *)); extern enum machine_mode get_pool_mode PARAMS ((rtx)); extern rtx get_pool_constant_for_function PARAMS ((struct function *, rtx)); extern enum machine_mode get_pool_mode_for_function PARAMS ((struct function *, rtx)); @@ -1296,21 +1467,25 @@ extern rtx assign_stack_temp_for_type PARAMS ((enum machine_mode, extern rtx assign_temp PARAMS ((tree, int, int, int)); /* In emit-rtl.c */ extern rtx emit_insn_before PARAMS ((rtx, rtx)); +extern rtx emit_insn_before_scope PARAMS ((rtx, rtx, tree)); extern rtx emit_jump_insn_before PARAMS ((rtx, rtx)); +extern rtx emit_jump_insn_before_scope PARAMS ((rtx, rtx, tree)); extern rtx emit_call_insn_before PARAMS ((rtx, rtx)); +extern rtx emit_call_insn_before_scope PARAMS ((rtx, rtx, tree)); extern rtx emit_barrier_before PARAMS ((rtx)); extern rtx emit_label_before PARAMS ((rtx, rtx)); extern rtx emit_note_before PARAMS ((int, rtx)); extern rtx emit_insn_after PARAMS ((rtx, rtx)); +extern rtx emit_insn_after_scope PARAMS ((rtx, rtx, tree)); extern rtx emit_jump_insn_after PARAMS ((rtx, rtx)); +extern rtx emit_jump_insn_after_scope PARAMS ((rtx, rtx, tree)); +extern rtx emit_call_insn_after PARAMS ((rtx, rtx)); +extern rtx emit_call_insn_after_scope PARAMS ((rtx, rtx, tree)); extern rtx emit_barrier_after PARAMS ((rtx)); extern rtx emit_label_after PARAMS ((rtx, rtx)); extern rtx emit_note_after PARAMS ((int, rtx)); extern rtx emit_line_note_after PARAMS ((const char *, int, rtx)); extern rtx emit_insn PARAMS ((rtx)); -extern rtx emit_insns PARAMS ((rtx)); -extern rtx emit_insns_before PARAMS ((rtx, rtx)); -extern rtx emit_insns_after PARAMS ((rtx, rtx)); extern rtx emit_jump_insn PARAMS ((rtx)); extern rtx emit_call_insn PARAMS ((rtx)); extern rtx emit_label PARAMS ((rtx)); @@ -1333,6 +1508,9 @@ extern rtx next_label PARAMS ((rtx)); extern rtx next_cc0_user PARAMS ((rtx)); extern rtx prev_cc0_setter PARAMS ((rtx)); +/* In cfglayout.c */ +extern tree choose_inner_scope PARAMS ((tree, tree)); + /* In jump.c */ extern rtx next_nondeleted_insn PARAMS ((rtx)); extern enum rtx_code reverse_condition PARAMS ((enum rtx_code)); @@ -1422,12 +1600,14 @@ extern rtx set_unique_reg_note PARAMS ((rtx, enum reg_note, rtx)); #define single_set_1(I) single_set_2 (I, PATTERN (I)) extern int rtx_addr_can_trap_p PARAMS ((rtx)); +extern bool nonzero_address_p PARAMS ((rtx)); extern int rtx_unstable_p PARAMS ((rtx)); extern int rtx_varies_p PARAMS ((rtx, int)); extern int rtx_addr_varies_p PARAMS ((rtx, int)); extern HOST_WIDE_INT get_integer_term PARAMS ((rtx)); extern rtx get_related_value PARAMS ((rtx)); extern rtx get_jump_table_offset PARAMS ((rtx, rtx *)); +extern int global_reg_mentioned_p PARAMS ((rtx)); extern int reg_mentioned_p PARAMS ((rtx, rtx)); extern int count_occurrences PARAMS ((rtx, rtx, int)); extern int reg_referenced_p PARAMS ((rtx, rtx)); @@ -1468,6 +1648,7 @@ extern rtx find_reg_equal_equiv_note PARAMS ((rtx)); extern int find_reg_fusage PARAMS ((rtx, enum rtx_code, rtx)); extern int find_regno_fusage PARAMS ((rtx, enum rtx_code, unsigned int)); +extern int pure_call_p PARAMS ((rtx)); extern void remove_note PARAMS ((rtx, rtx)); extern int side_effects_p PARAMS ((rtx)); extern int volatile_refs_p PARAMS ((rtx)); @@ -1482,15 +1663,19 @@ typedef int (*rtx_function) PARAMS ((rtx *, void *)); extern int for_each_rtx PARAMS ((rtx *, rtx_function, void *)); extern rtx regno_use_in PARAMS ((unsigned int, rtx)); extern int auto_inc_p PARAMS ((rtx)); +extern int in_expr_list_p PARAMS ((rtx, rtx)); extern void remove_node_from_expr_list PARAMS ((rtx, rtx *)); extern int insns_safe_to_move_p PARAMS ((rtx, rtx, rtx *)); extern int loc_mentioned_in_p PARAMS ((rtx *, rtx)); extern rtx find_first_parameter_load PARAMS ((rtx, rtx)); +extern bool keep_with_call_p PARAMS ((rtx)); /* flow.c */ extern rtx find_use_as_address PARAMS ((rtx, rtx, HOST_WIDE_INT)); -void init_EXPR_INSN_LIST_cache PARAMS ((void)); + +/* lists.c */ + void free_EXPR_LIST_list PARAMS ((rtx *)); void free_INSN_LIST_list PARAMS ((rtx *)); void free_EXPR_LIST_node PARAMS ((rtx)); @@ -1524,15 +1709,15 @@ extern void split_all_insns PARAMS ((int)); extern void split_all_insns_noflow PARAMS ((void)); #define MAX_SAVED_CONST_INT 64 -extern rtx const_int_rtx[MAX_SAVED_CONST_INT * 2 + 1]; +extern GTY(()) rtx const_int_rtx[MAX_SAVED_CONST_INT * 2 + 1]; #define const0_rtx (const_int_rtx[MAX_SAVED_CONST_INT]) #define const1_rtx (const_int_rtx[MAX_SAVED_CONST_INT+1]) #define const2_rtx (const_int_rtx[MAX_SAVED_CONST_INT+2]) #define constm1_rtx (const_int_rtx[MAX_SAVED_CONST_INT-1]) -extern rtx const_true_rtx; +extern GTY(()) rtx const_true_rtx; -extern rtx const_tiny_rtx[3][(int) MAX_MACHINE_MODE]; +extern GTY(()) rtx const_tiny_rtx[3][(int) MAX_MACHINE_MODE]; /* Returns a constant 0 rtx in mode MODE. Integer modes are treated the same as VOIDmode. */ @@ -1589,7 +1774,7 @@ enum global_rtl_index }; /* Pointers to standard pieces of rtx are stored here. */ -extern rtx global_rtl[GR_MAX]; +extern GTY(()) rtx global_rtl[GR_MAX]; /* Standard pieces of rtx, to be substituted directly into things. */ #define pc_rtx (global_rtl[GR_PC]) @@ -1603,12 +1788,12 @@ extern rtx global_rtl[GR_MAX]; #define hard_frame_pointer_rtx (global_rtl[GR_HARD_FRAME_POINTER]) #define arg_pointer_rtx (global_rtl[GR_ARG_POINTER]) -extern rtx pic_offset_table_rtx; -extern rtx struct_value_rtx; -extern rtx struct_value_incoming_rtx; -extern rtx static_chain_rtx; -extern rtx static_chain_incoming_rtx; -extern rtx return_address_pointer_rtx; +extern GTY(()) rtx pic_offset_table_rtx; +extern GTY(()) rtx struct_value_rtx; +extern GTY(()) rtx struct_value_incoming_rtx; +extern GTY(()) rtx static_chain_rtx; +extern GTY(()) rtx static_chain_incoming_rtx; +extern GTY(()) rtx return_address_pointer_rtx; /* Include the RTL generation functions. */ @@ -1621,11 +1806,10 @@ extern rtx return_address_pointer_rtx; add to this list, modify special_rtx in gengenrtl.c as well. You should also modify gen_rtx to use the special function. */ -extern rtx gen_rtx_CONST_DOUBLE PARAMS ((enum machine_mode, - HOST_WIDE_INT, HOST_WIDE_INT)); extern rtx gen_rtx_CONST_INT PARAMS ((enum machine_mode, HOST_WIDE_INT)); +extern rtx gen_rtx_CONST_VECTOR PARAMS ((enum machine_mode, rtvec)); extern rtx gen_raw_REG PARAMS ((enum machine_mode, int)); -extern rtx gen_rtx_REG PARAMS ((enum machine_mode, int)); +extern rtx gen_rtx_REG PARAMS ((enum machine_mode, unsigned)); extern rtx gen_rtx_SUBREG PARAMS ((enum machine_mode, rtx, int)); extern rtx gen_rtx_MEM PARAMS ((enum machine_mode, rtx)); @@ -1676,7 +1860,7 @@ extern rtx gen_lowpart_SUBREG PARAMS ((enum machine_mode, rtx)); #define VIRTUAL_OUTGOING_ARGS_REGNUM ((FIRST_VIRTUAL_REGISTER) + 3) /* This points to the Canonical Frame Address of the function. This - should corrospond to the CFA produced by INCOMING_FRAME_SP_OFFSET, + should correspond to the CFA produced by INCOMING_FRAME_SP_OFFSET, but is calculated relative to the arg pointer for simplicity; the frame pointer nor stack pointer are necessarily fixed relative to the CFA until after reload. */ @@ -1697,12 +1881,11 @@ extern rtx gen_lowpart_SUBREG PARAMS ((enum machine_mode, rtx)); && (REGNUM) <= LAST_VIRTUAL_REGISTER)) /* REGNUM never really appearing in the INSN stream. */ -#define INVALID_REGNUM (~(unsigned int)0) +#define INVALID_REGNUM (~(unsigned int) 0) extern rtx find_next_ref PARAMS ((rtx, rtx)); extern rtx output_constant_def PARAMS ((tree, int)); -extern rtx immed_real_const PARAMS ((tree)); /* Define a default value for STORE_FLAG_VALUE. */ @@ -1760,7 +1943,7 @@ struct cse_basic_block_data; extern int rtx_cost PARAMS ((rtx, enum rtx_code)); extern int address_cost PARAMS ((rtx, enum machine_mode)); -extern void delete_trivially_dead_insns PARAMS ((rtx, int, int)); +extern int delete_trivially_dead_insns PARAMS ((rtx, int)); #ifdef BUFSIZ extern int cse_main PARAMS ((rtx, int, int, FILE *)); #endif @@ -1785,17 +1968,16 @@ extern int invert_jump_1 PARAMS ((rtx, rtx)); extern int invert_jump PARAMS ((rtx, rtx, int)); extern int rtx_renumbered_equal_p PARAMS ((rtx, rtx)); extern int true_regnum PARAMS ((rtx)); +extern unsigned int reg_or_subregno PARAMS ((rtx)); extern int redirect_jump_1 PARAMS ((rtx, rtx)); extern int redirect_jump PARAMS ((rtx, rtx, int)); extern void rebuild_jump_labels PARAMS ((rtx)); -extern void thread_jumps PARAMS ((rtx, int, int)); -extern int rtx_equal_for_thread_p PARAMS ((rtx, rtx, rtx)); extern enum rtx_code reversed_comparison_code PARAMS ((rtx, rtx)); extern enum rtx_code reversed_comparison_code_parts PARAMS ((enum rtx_code, rtx, rtx, rtx)); extern void delete_for_peephole PARAMS ((rtx, rtx)); extern int condjump_in_parallel_p PARAMS ((rtx)); -extern void never_reached_warning PARAMS ((rtx)); +extern void never_reached_warning PARAMS ((rtx, rtx)); extern void purge_line_number_notes PARAMS ((rtx)); extern void copy_loop_headers PARAMS ((rtx)); @@ -1812,7 +1994,6 @@ extern void reorder_insns_nobb PARAMS ((rtx, rtx, rtx)); extern int get_max_uid PARAMS ((void)); extern int in_sequence_p PARAMS ((void)); extern void force_next_line_note PARAMS ((void)); -extern void clear_emit_caches PARAMS ((void)); extern void init_emit PARAMS ((void)); extern void init_emit_once PARAMS ((int)); extern void push_topmost_sequence PARAMS ((void)); @@ -1823,6 +2004,7 @@ extern void set_new_first_and_last_insn PARAMS ((rtx, rtx)); extern void set_new_first_and_last_label_num PARAMS ((int, int)); extern void set_new_last_label_num PARAMS ((int)); extern void unshare_all_rtl_again PARAMS ((rtx)); +extern void set_first_insn PARAMS ((rtx)); extern void set_last_insn PARAMS ((rtx)); extern void link_cc0_insns PARAMS ((rtx)); extern void add_insn PARAMS ((rtx)); @@ -1842,6 +2024,8 @@ extern void renumber_insns PARAMS ((FILE *)); extern void remove_unnecessary_notes PARAMS ((void)); extern rtx delete_insn PARAMS ((rtx)); extern void delete_insn_chain PARAMS ((rtx, rtx)); +extern rtx delete_insn_and_edges PARAMS ((rtx)); +extern void delete_insn_chain_and_edges PARAMS ((rtx, rtx)); /* In combine.c */ extern int combine_instructions PARAMS ((rtx, unsigned int)); @@ -1906,6 +2090,7 @@ extern void move_by_pieces PARAMS ((rtx, rtx, /* In flow.c */ extern void recompute_reg_usage PARAMS ((rtx, int)); extern int initialize_uninitialized_subregs PARAMS ((void)); +extern void delete_dead_jumptables PARAMS ((void)); #ifdef BUFSIZ extern void print_rtl_with_bb PARAMS ((FILE *, rtx)); extern void dump_flow_info PARAMS ((FILE *)); @@ -1922,6 +2107,7 @@ extern rtx expand_mult_highpart PARAMS ((enum machine_mode, rtx, /* In gcse.c */ #ifdef BUFSIZ extern int gcse_main PARAMS ((rtx, FILE *)); +extern int bypass_jumps PARAMS ((FILE *)); #endif /* In global.c */ @@ -1931,6 +2117,7 @@ extern int global_alloc PARAMS ((FILE *)); extern void dump_global_regs PARAMS ((FILE *)); #endif #ifdef HARD_CONST +/* Yes, this ifdef is silly, but HARD_REG_SET is not always defined. */ extern void retry_global_alloc PARAMS ((int, HARD_REG_SET)); #endif extern void build_insn_chain PARAMS ((rtx)); @@ -1940,6 +2127,7 @@ extern int reg_classes_intersect_p PARAMS ((enum reg_class, enum reg_class)); extern int reg_class_subset_p PARAMS ((enum reg_class, enum reg_class)); extern void globalize_reg PARAMS ((int)); extern void init_regs PARAMS ((void)); +extern void init_fake_stack_mems PARAMS ((void)); extern void init_reg_sets PARAMS ((void)); extern void regset_release_memory PARAMS ((void)); extern void regclass_init PARAMS ((void)); @@ -1947,8 +2135,16 @@ extern void regclass PARAMS ((rtx, int, FILE *)); extern void reg_scan PARAMS ((rtx, unsigned int, int)); extern void reg_scan_update PARAMS ((rtx, rtx, unsigned int)); extern void fix_register PARAMS ((const char *, int, int)); +#ifdef HARD_CONST +extern void cannot_change_mode_set_regs PARAMS ((HARD_REG_SET *, + enum machine_mode, + unsigned int)); +#endif +extern bool invalid_mode_change_p PARAMS ((unsigned int, + enum reg_class, + enum machine_mode)); -extern void delete_null_pointer_checks PARAMS ((rtx)); +extern int delete_null_pointer_checks PARAMS ((rtx)); /* In regmove.c */ #ifdef BUFSIZ @@ -1972,7 +2168,7 @@ extern int function_invariant_p PARAMS ((rtx)); extern void init_branch_prob PARAMS ((const char *)); extern void branch_prob PARAMS ((void)); extern void end_branch_prob PARAMS ((void)); -extern void output_func_start_profiler PARAMS ((void)); +extern void create_profiler PARAMS ((void)); /* In reg-stack.c */ #ifdef BUFSIZ @@ -2077,6 +2273,7 @@ extern void init_alias_once PARAMS ((void)); extern void init_alias_analysis PARAMS ((void)); extern void end_alias_analysis PARAMS ((void)); extern rtx addr_side_effect_eval PARAMS ((rtx, int, int)); +extern bool memory_modified_in_insn_p PARAMS ((rtx, rtx)); /* In sibcall.c */ typedef enum { @@ -2093,10 +2290,11 @@ extern int stack_regs_mentioned PARAMS ((rtx insn)); #endif /* In toplev.c */ -extern rtx stack_limit_rtx; +extern GTY(()) rtx stack_limit_rtx; /* In regrename.c */ extern void regrename_optimize PARAMS ((void)); +extern void copyprop_hardreg_forward PARAMS ((void)); /* In ifcvt.c */ extern void if_convert PARAMS ((int)); @@ -2104,4 +2302,40 @@ extern void if_convert PARAMS ((int)); /* In predict.c */ extern void invert_br_probabilities PARAMS ((rtx)); extern bool expensive_function_p PARAMS ((int)); +/* In tracer.c */ +extern void tracer PARAMS ((void)); + +/* In calls.c */ + +/* Nonzero if this is a call to a `const' function. */ +#define ECF_CONST 1 +/* Nonzero if this is a call to a `volatile' function. */ +#define ECF_NORETURN 2 +/* Nonzero if this is a call to malloc or a related function. */ +#define ECF_MALLOC 4 +/* Nonzero if it is plausible that this is a call to alloca. */ +#define ECF_MAY_BE_ALLOCA 8 +/* Nonzero if this is a call to a function that won't throw an exception. */ +#define ECF_NOTHROW 16 +/* Nonzero if this is a call to setjmp or a related function. */ +#define ECF_RETURNS_TWICE 32 +/* Nonzero if this is a call to `longjmp'. */ +#define ECF_LONGJMP 64 +/* Nonzero if this is a syscall that makes a new process in the image of + the current one. */ +#define ECF_FORK_OR_EXEC 128 +#define ECF_SIBCALL 256 +/* Nonzero if this is a call to "pure" function (like const function, + but may read memory. */ +#define ECF_PURE 512 +/* Nonzero if this is a call to a function that returns with the stack + pointer depressed. */ +#define ECF_SP_DEPRESSED 1024 +/* Nonzero if this call is known to always return. */ +#define ECF_ALWAYS_RETURN 2048 +/* Create libcall block around the call. */ +#define ECF_LIBCALL_BLOCK 4096 + +extern int flags_from_decl_or_type PARAMS ((tree)); + #endif /* ! GCC_RTL_H */