*/
#include "config.h"
+#include "opt_polymorphy.h"
#include "iroptimize.h"
#include "irprog_t.h"
#include "entity_t.h"
*
* The default implementation hecks for Alloc nodes only.
*/
-ir_type *default_firm_get_Alloc(ir_node *n)
+static ir_type *default_firm_get_Alloc(ir_node *n)
{
n = skip_Proj(n);
if (is_Alloc(n)) {
/* skip Cast and Confirm nodes */
for (;;) {
- ir_opcode code = get_irn_opcode(ptr);
+ unsigned code = get_irn_opcode(ptr);
switch (code) {
case iro_Cast:
if (get_irp_phase_state() == phase_building) return node;
- if (!(get_opt_optimize() && get_opt_dyn_meth_dispatch()))
+ if (!get_opt_dyn_meth_dispatch())
return node;
if (!is_Method_type(get_entity_type(ent)))
/* We could remove the Call depending on this Sel. */
new_node = node;
} else {
- ir_node *rem_block = get_cur_block();
- set_cur_block(get_nodes_block(node));
- new_node = copy_const_value(get_irn_dbg_info(node), get_atomic_ent_value(ent));
- set_cur_block(rem_block);
+ new_node = copy_const_value(get_irn_dbg_info(node), get_atomic_ent_value(ent), get_nodes_block(node));
DBG_OPT_POLY(node, new_node);
}
return new_node;
if (dyn_tp != firm_unknown_type) {
ir_entity *called_ent;
- ir_node *rem_block;
/* We know which method will be called, no dispatch necessary. */
called_ent = resolve_ent_polymorphy(dyn_tp, ent);
- rem_block = get_cur_block();
- set_cur_block(get_nodes_block(node));
- new_node = copy_const_value(get_irn_dbg_info(node), get_atomic_ent_value(called_ent));
- set_cur_block(rem_block);
+ new_node = copy_const_value(get_irn_dbg_info(node), get_atomic_ent_value(called_ent), get_nodes_block(node));
DBG_OPT_POLY(node, new_node);
return new_node;
ir_entity *ent;
ir_type *dyn_tp;
- if (!(get_opt_optimize() && get_opt_dyn_meth_dispatch()))
+ if (!get_opt_dyn_meth_dispatch())
return load;
field_ptr = get_Load_ptr(load);