contrib/gcc/tree.h

914 #define STRIP_NOPS(EXP)						\
915   while ((TREE_CODE (EXP) == NOP_EXPR				\
916 	  || TREE_CODE (EXP) == CONVERT_EXPR			\
917 	  || TREE_CODE (EXP) == NON_LVALUE_EXPR)		\
918 	 && TREE_OPERAND (EXP, 0) != error_mark_node		\
919 	 && (TYPE_MODE (TREE_TYPE (EXP))			\
920 	     == TYPE_MODE (TREE_TYPE (TREE_OPERAND (EXP, 0)))))	\
921     (EXP) = TREE_OPERAND (EXP, 0)
925 #define STRIP_SIGN_NOPS(EXP) \
926   while ((TREE_CODE (EXP) == NOP_EXPR				\
927 	  || TREE_CODE (EXP) == CONVERT_EXPR			\
928 	  || TREE_CODE (EXP) == NON_LVALUE_EXPR)		\
929 	 && TREE_OPERAND (EXP, 0) != error_mark_node		\
930 	 && (TYPE_MODE (TREE_TYPE (EXP))			\
931 	     == TYPE_MODE (TREE_TYPE (TREE_OPERAND (EXP, 0))))	\
932 	 && (TYPE_UNSIGNED (TREE_TYPE (EXP))			\
933 	     == TYPE_UNSIGNED (TREE_TYPE (TREE_OPERAND (EXP, 0))))) \
934     (EXP) = TREE_OPERAND (EXP, 0)
938 #define STRIP_TYPE_NOPS(EXP) \
939   while ((TREE_CODE (EXP) == NOP_EXPR				\
940 	  || TREE_CODE (EXP) == CONVERT_EXPR			\
941 	  || TREE_CODE (EXP) == NON_LVALUE_EXPR)		\
942 	 && TREE_OPERAND (EXP, 0) != error_mark_node		\
943 	 && (TREE_TYPE (EXP)					\
944 	     == TREE_TYPE (TREE_OPERAND (EXP, 0))))		\
945     (EXP) = TREE_OPERAND (EXP, 0)
950 #define STRIP_USELESS_TYPE_CONVERSION(EXP)				\
951       while (tree_ssa_useless_type_conversion (EXP))			\
952 	EXP = TREE_OPERAND (EXP, 0)
2570 #define DECL_FILE_SCOPE_P(EXP) 					\
2571   (! DECL_CONTEXT (EXP)						\
2572    || TREE_CODE (DECL_CONTEXT (EXP)) == TRANSLATION_UNIT_DECL)
4115 /* save_expr (EXP) returns an expression equivalent to EXP
4117    and only evaluate EXP once.  */
4130 /* Return 1 if EXP contains a PLACEHOLDER_EXPR; i.e., if it represents a size
4141 #define CONTAINS_PLACEHOLDER_P(EXP) \
4142   ((EXP) != 0 && ! TREE_CONSTANT (EXP) && contains_placeholder_p (EXP))
4150 /* Given a tree EXP, a FIELD_DECL F, and a replacement value R,
4152    PLACEHOLDER_EXPR replaced by R.   Note that we assume here that EXP
4160 #define SUBSTITUTE_IN_EXPR(EXP, F, R) \
4161   ((EXP) == 0 || TREE_CONSTANT (EXP) ? (EXP) : substitute_in_expr (EXP, F, R))
4163 /* Similar, but look for a PLACEHOLDER_EXPR in EXP and find a replacement
4171 #define SUBSTITUTE_PLACEHOLDER_IN_EXPR(EXP, OBJ) \
4172   ((EXP) == 0 || TREE_CONSTANT (EXP) ? (EXP)	\
4173    : substitute_placeholder_in_expr (EXP, OBJ))
4175 /* variable_size (EXP) is like save_expr (EXP) except that it
4183 /* stabilize_reference (EXP) returns a reference equivalent to EXP
4195 /* Return EXP, stripped of any conversions to wider types
4197    is the same as if EXP were converted to FOR_TYPE.
4198    If FOR_TYPE is 0, it signifies EXP's type.  */
4209 /* Given an expression EXP that may be a COMPONENT_REF or an ARRAY_REF,
4217 /* Given an expression EXP that may be a COMPONENT_REF or an ARRAY_REF,
4218    look for whether EXP or any nested component-refs within EXP is marked
4228    of EXP, an ARRAY_REF.  */
4233    EXP, an ARRAY_REF.  */
4238    EXP, an ARRAY_REF.  */
4243    by EXP.  This does not include any offset in DECL_FIELD_BIT_OFFSET.  */