contrib/gcc/c-typeck.c

2702 pointer_diff (tree op0, tree op1)
2708   tree orig_op1 = op1;
2732   if ((TREE_CODE (op1) == NOP_EXPR || TREE_CODE (op1) == CONVERT_EXPR)
2733       && (TYPE_PRECISION (TREE_TYPE (op1))
2734 	  == TYPE_PRECISION (TREE_TYPE (TREE_OPERAND (op1, 0)))))
2735     con1 = TREE_OPERAND (op1, 0);
2737     con1 = op1;
2758       op1 = lit1;
2768 			 convert (restype, op1), 0);
2769   /* This generates an error if op1 is pointer to incomplete type.  */
2774   op1 = c_size_in_bytes (target_type);
2777   return fold_build2 (EXACT_DIV_EXPR, restype, op0, convert (restype, op1));
3071 	  tree op0 = fold_convert (argtype, fold_offsetof (arg, val)), op1;
3073 	  op1 = fold_convert (argtype, TREE_OPERAND (val, 0));
3074 	  return fold_build2 (PLUS_EXPR, argtype, op0, op1);
3254 build_conditional_expr (tree ifexp, tree op1, tree op2)
3261   tree orig_op1 = op1, orig_op2 = op2;
3265   if (TREE_CODE (TREE_TYPE (op1)) != VOID_TYPE)
3266     op1 = default_conversion (op1);
3271       || TREE_CODE (TREE_TYPE (op1)) == ERROR_MARK
3275   type1 = TREE_TYPE (op1);
3288   /* Quickly detect the usual case where op1 and op2 have the same type
3327 			&& tree_expr_nonnegative_warnv_p (op1, &ovf))
3388 	  op1 = null_pointer_node;
3407 			  TREE_READONLY (op1) || TREE_READONLY (op2),
3408 			  TREE_THIS_VOLATILE (op1) || TREE_THIS_VOLATILE (op2));
3410   if (result_type != TREE_TYPE (op1))
3411     op1 = convert_and_check (result_type, op1);
3415   return fold_build3 (COND_EXPR, result_type, ifexp, op1, op2);
7038 		tree op1 = TREE_OPERAND (inner, 1);
7040 		while (!POINTER_TYPE_P (TREE_TYPE (op1))
7041 		       && (TREE_CODE (op1) == NOP_EXPR
7042 			   || TREE_CODE (op1) == NON_LVALUE_EXPR
7043 			   || TREE_CODE (op1) == CONVERT_EXPR))
7044 		  op1 = TREE_OPERAND (op1, 0);
7046 		if (POINTER_TYPE_P (TREE_TYPE (op1)))
7797   tree op0, op1;
7848       op1 = default_conversion (orig_op1);
7853       op1 = orig_op1;
7857   type1 = TREE_TYPE (op1);
7866   STRIP_TYPE_NOPS (op1);
7888 	return pointer_int_sum (PLUS_EXPR, op0, op1);
7890 	return pointer_int_sum (PLUS_EXPR, op1, op0);
7900 	return pointer_diff (op0, op1);
7903 	return pointer_int_sum (MINUS_EXPR, op0, op1);
7919       if (skip_evaluation == 0 && integer_zerop (op1))
7932 	    tcode1 = TREE_CODE (TREE_TYPE (TREE_TYPE (op1)));
7943 		       || (TREE_CODE (op1) == INTEGER_CST
7944 			   && !integer_all_onesp (op1)));
7960       if (skip_evaluation == 0 && integer_zerop (op1))
7970 		     || (TREE_CODE (op1) == INTEGER_CST
7971 			 && !integer_all_onesp (op1)));
7991 	  op1 = c_common_truthvalue_conversion (op1);
8003 	  if (TREE_CODE (op1) == INTEGER_CST && skip_evaluation == 0)
8005 	      if (tree_int_cst_sgn (op1) < 0)
8009 		  if (!integer_zerop (op1))
8012 		  if (compare_tree_int (op1, TYPE_PRECISION (type0)) >= 0)
8021 	  if (TYPE_MAIN_VARIANT (TREE_TYPE (op1)) != integer_type_node)
8022 	    op1 = convert (integer_type_node, op1);
8023 	  /* Avoid converting op1 to result_type later.  */
8031 	  if (TREE_CODE (op1) == INTEGER_CST && skip_evaluation == 0)
8033 	      if (tree_int_cst_sgn (op1) < 0)
8036 	      else if (compare_tree_int (op1, TYPE_PRECISION (type0)) >= 0)
8044 	  if (TYPE_MAIN_VARIANT (TREE_TYPE (op1)) != integer_type_node)
8045 	    op1 = convert (integer_type_node, op1);
8046 	  /* Avoid converting op1 to result_type later.  */
8110 	  if (TREE_CODE (op1) == ADDR_EXPR
8111 	      && DECL_P (TREE_OPERAND (op1, 0))
8112 	      && (TREE_CODE (TREE_OPERAND (op1, 0)) == PARM_DECL
8113 		  || TREE_CODE (TREE_OPERAND (op1, 0)) == LABEL_DECL
8114 		  || !DECL_WEAK (TREE_OPERAND (op1, 0))))
8116 		     TREE_OPERAND (op1, 0));
8243 	  op1 = convert (result_type, op1);
8246 	  arg1 = get_narrower (op1, &unsigned1);
8260 	  if ((TYPE_PRECISION (TREE_TYPE (op1))
8262 	      && TREE_TYPE (op1) != final_type)
8263 	    unsigned1 = TYPE_UNSIGNED (TREE_TYPE (op1));
8323 	      && compare_tree_int (op1, TYPE_PRECISION (TREE_TYPE (arg0))) < 0
8347 	  tree xop0 = op0, xop1 = op1, xresult_type = result_type;
8355 	  op0 = xop0, op1 = xop1;
8365 	      tree primop1 = get_narrower (op1, &unsignedp1);
8489       binary_op_error (code, TREE_TYPE (op0), TREE_TYPE (op1));
8497       if (TREE_TYPE (op1) != result_type)
8498 	op1 = convert_and_check (result_type, op1);
8502       if (TREE_CODE (op0) == ERROR_MARK || TREE_CODE (op1) == ERROR_MARK)
8513 								    op0, op1)
8515 							op0, op1);