+static ir_node *create_sub(const binary_expression_t *expression)
+{
+ dbg_info *dbgi = get_dbg_info(&expression->expression.source_position);
+ ir_node *left = expression_to_firm(expression->left);
+ ir_node *right = expression_to_firm(expression->right);
+ type_t *type = expression->expression.datatype;
+ ir_mode *mode = get_ir_mode(type);
+
+ expression_t *expr_left = expression->left;
+ expression_t *expr_right = expression->right;
+ type_t *type_left = skip_typeref(expr_left->datatype);
+ type_t *type_right = skip_typeref(expr_right->datatype);
+
+ if((is_type_arithmetic(type_left) && is_type_arithmetic(type_right))
+ || (type_left->type == TYPE_POINTER
+ && type_right->type == TYPE_POINTER)) {
+ return new_d_Sub(dbgi, left, right, mode);
+ }
+
+ assert(type_right->type == TYPE_POINTER);
+ ir_node *pointer = left;
+ ir_node *integer = right;
+ pointer_type_t *pointer_type = (pointer_type_t*) type_right;
+
+ type_t *points_to = pointer_type->points_to;
+ unsigned elem_size = get_type_size(points_to);
+
+ assert(elem_size >= 1);
+ if(elem_size > 1) {
+ ir_node *cnst = new_Const_long(mode_Iu, elem_size);
+ ir_node *mul = new_d_Mul(dbgi, integer, cnst, mode_Iu);
+ integer = mul;
+ }
+
+ ir_node *res = new_d_Sub(dbgi, pointer, integer, mode);
+
+ return res;
+}
+
+static ir_node *create_divmod(const binary_expression_t *expression)
+{
+ dbg_info *dbgi = get_dbg_info(&expression->expression.source_position);
+ ir_node *left = expression_to_firm(expression->left);
+ ir_node *right = expression_to_firm(expression->right);
+ ir_node *pin = new_Pin(new_NoMem());
+ type_t *type = expression->expression.datatype;
+ ir_mode *mode = get_ir_mode(type);
+ ir_node *op;
+ ir_node *res;
+
+ if(expression->type == BINEXPR_DIV) {
+ if(mode_is_float(mode)) {
+ op = new_d_Quot(dbgi, pin, left, right, mode, op_pin_state_floats);
+ res = new_d_Proj(dbgi, op, mode, pn_Quot_res);
+ } else {
+ op = new_d_Div(dbgi, pin, left, right, mode, op_pin_state_floats);
+ res = new_d_Proj(dbgi, op, mode, pn_Div_res);
+ }
+ } else {
+ assert(expression->type == BINEXPR_MOD);
+ assert(!mode_is_float(mode));
+ op = new_d_Mod(dbgi, pin, left, right, mode, op_pin_state_floats);
+ res = new_d_Proj(dbgi, op, mode, pn_Mod_res);
+ }
+
+ return res;
+}
+
+
+