#include "pmap.h"
#include "array_t.h"
#include "iropt_dbg.h"
+#include "error.h"
/** Walker environment. */
typedef struct _walker_env {
(void) ctx;
if (mode_is_signed(get_irn_mode(op))) {
- op = new_rd_Conv(dbg, current_ir_graph, block, op, mode_Iu);
+ ir_mode *mode = get_irn_mode(op);
+ mode = find_unsigned_mode(mode);
+ if (mode == NULL) {
+ panic("Cannot find unsigned mode for %M", mode);
+ }
+ op = new_rd_Conv(dbg, current_ir_graph, block, op, mode);
}
irn = new_rd_Alloc(dbg, current_ir_graph, block, mem, op, firm_unknown_type, stack_alloc);
if (tarval_is_null(tv)) {
/* pow(x, 0.0) = 1.0 */
ir_mode *mode = get_tarval_mode(tv);
- irn = new_Const(mode, get_mode_one(mode));
+ irn = new_Const(get_mode_one(mode));
} else if (tarval_is_one(tv)) {
/* pow(x, 1.0) = x */
irn = left;
ir_mode *mode = get_irn_mode(left);
ir_node *quot;
- irn = new_Const(mode, get_mode_one(mode));
+ irn = new_Const(get_mode_one(mode));
quot = new_rd_Quot(dbg, current_ir_graph, block, mem, irn, left, mode, op_pin_state_pinned);
mem = new_r_Proj(current_ir_graph, block, quot, mode_M, pn_Quot_M);
irn = new_r_Proj(current_ir_graph, block, quot, mode, pn_Quot_res);
if (is_Const(val) && is_Const_null(val)) {
/* exp(0.0) = 1.0 */
- ir_node *block = get_nodes_block(call);
ir_mode *mode = get_irn_mode(val);
- ir_node *irn = new_Const(mode, get_mode_one(mode));
+ ir_node *irn = new_Const(get_mode_one(mode));
ir_node *mem = get_Call_mem(call);
DBG_OPT_ALGSIM0(call, irn, FS_OPT_RTS_EXP);
replace_call(irn, call, mem, NULL, NULL);
if (is_Const(val) && is_Const_one(val)) {
/* acos(1.0) = 0.0 */
- ir_node *block = get_nodes_block(call);
ir_mode *mode = get_irn_mode(val);
- ir_node *irn = new_Const(mode, get_mode_null(mode));
+ ir_node *irn = new_Const(get_mode_null(mode));
ir_node *mem = get_Call_mem(call);
DBG_OPT_ALGSIM0(call, irn, reason);
replace_call(irn, call, mem, NULL, NULL);
if (is_Const(val) && is_Const_null(val)) {
/* f(0.0) = 1.0 */
- ir_node *block = get_nodes_block(call);
ir_mode *mode = get_irn_mode(val);
- ir_node *irn = new_Const(mode, get_mode_one(mode));
+ ir_node *irn = new_Const(get_mode_one(mode));
ir_node *mem = get_Call_mem(call);
DBG_OPT_ALGSIM0(call, irn, reason);
replace_call(irn, call, mem, NULL, NULL);
mode = get_type_mode(tp);
/* FIXME: This is too restrict, as the type char might be more the 8bits */
- if (!mode_is_int(mode) || get_mode_size_bits(mode) != get_mode_size_bits(mode_Bs))
+ if (!mode_is_int(mode) || get_mode_size_bits(mode) != 8)
return NULL;
n = get_compound_ent_n_values(ent);
mode = get_type_mode(tp);
/* FIXME: This is too restrict, as the type char might be more the 8bits */
- if (!mode_is_int(mode) || get_mode_size_bits(mode) != get_mode_size_bits(mode_Bs))
+ if (!mode_is_int(mode) || get_mode_size_bits(mode) != 8)
return NULL;
tp = get_entity_type(right);
mode = get_type_mode(tp);
/* FIXME: This is too restrict, as the type char might be more the 8bits */
- if (!mode_is_int(mode) || get_mode_size_bits(mode) != get_mode_size_bits(mode_Bs))
+ if (!mode_is_int(mode) || get_mode_size_bits(mode) != 8)
return NULL;
n = get_compound_ent_n_values(left);
mode = get_type_mode(tp);
/* FIXME: This is too restrict, as the type char might be more the 8bits */
- if (!mode_is_int(mode) || get_mode_size_bits(mode) != get_mode_size_bits(mode_Bs))
+ if (!mode_is_int(mode) || get_mode_size_bits(mode) != 8)
return 0;
n = get_compound_ent_n_values(ent);
/* a strcmp(s, s) ==> 0 */
ir_node *mem = get_Call_mem(call);
ir_mode *mode = get_type_mode(res_tp);
- ir_node *block = get_nodes_block(call);
- irn = new_Const(mode, get_mode_null(mode));
+ irn = new_Const(get_mode_null(mode));
DBG_OPT_ALGSIM0(call, irn, FS_OPT_RTS_STRCMP);
replace_call(irn, call, mem, NULL, NULL);
return 1;
mode = get_type_mode(char_tp);
/* replace the strcmp by (*x) */
- irn = new_rd_Load(dbg, current_ir_graph, block, mem, v, mode);
+ irn = new_rd_Load(dbg, current_ir_graph, block, mem, v, mode, 0);
mem = new_r_Proj(current_ir_graph, block, irn, mode_M, pn_Load_M);
exc = new_r_Proj(current_ir_graph, block, irn, mode_X, pn_Load_X_except);
reg = new_r_Proj(current_ir_graph, block, irn, mode_X, pn_Load_X_regular);
ir_type *call_tp = get_entity_type(ent);
ir_type *res_tp = get_method_res_type(call_tp, 0);
ir_mode *mode = get_type_mode(res_tp);
- ir_node *block = get_nodes_block(call);
- irn = new_Const(mode, get_mode_null(mode));
+ irn = new_Const(get_mode_null(mode));
DBG_OPT_ALGSIM0(call, irn, FS_OPT_RTS_STRNCMP);
replace_call(irn, call, mem, NULL, NULL);
return 1;