Commit d2fcfcbc authored by Götz Lindenmaier's avatar Götz Lindenmaier
Browse files

comments

[r6297]
parent 29e42f5d
......@@ -43,13 +43,11 @@ static void make_entity_to_description(type_or_ent *tore, void *env) {
entity *ent = (entity *)tore;
if ((is_Method_type(get_entity_type(ent))) &&
(get_entity_peculiarity(ent) != peculiarity_description) &&
(get_entity_visibility(ent) != visibility_external_allocated) ) {
(get_entity_peculiarity(ent) != peculiarity_description) &&
(get_entity_visibility(ent) != visibility_external_allocated) ) {
entity *impl = get_SymConst_entity(get_atomic_ent_value(ent));
if (get_entity_link(impl) != env) {
set_entity_peculiarity(ent, peculiarity_description);
//set_atomic_ent_value(ent, new_r_Const(get_const_code_irg(), get_irg_start_block(get_const_code_irg()),
// mode_P, get_tarval_null(mode_P)));
set_entity_peculiarity(ent, peculiarity_description);
}
}
}
......
......@@ -52,41 +52,41 @@ turn_into_tuple (ir_node *node, int arity)
void
exchange (ir_node *old, ir_node *nw)
{
/*
* If new outs are on, we can skip the id node creation and reroute
* the edges from the old node to the new directly.
*/
if (edges_activated(current_ir_graph)) {
edges_reroute(old, nw, current_ir_graph);
}
/*
* If new outs are on, we can skip the id node creation and reroute
* the edges from the old node to the new directly.
*/
if (edges_activated(current_ir_graph)) {
edges_reroute(old, nw, current_ir_graph);
}
else {
/* Else, do it the old-fashioned way. */
ir_graph *irg = get_irn_irg (old);
ir_node *block;
ir_graph *irg = get_irn_irg (old);
ir_node *block;
assert(old != nw);
assert (irg);
assert(get_irn_op(old)->opar != oparity_dynamic);
assert(old != nw);
assert (irg);
assert(get_irn_op(old)->opar != oparity_dynamic);
hook_turn_into_id(old);
hook_turn_into_id(old);
block = old->in[0];
if (!block) {
block = is_Block(nw) ? nw : get_nodes_block(nw);
block = old->in[0];
if (!block) {
block = is_Block(nw) ? nw : get_nodes_block(nw);
if (!block) {
DDMN(old);
DDMN(nw);
assert(0 && "cannot find legal block for id");
}
}
if (!block) {
DDMN(old);
DDMN(nw);
assert(0 && "cannot find legal block for id");
}
}
old->op = op_Id;
old->in = NEW_ARR_D (ir_node *, irg->obst, 2);
old->in[0] = block;
old->in[1] = nw;
}
old->op = op_Id;
old->in = NEW_ARR_D (ir_node *, irg->obst, 2);
old->in[0] = block;
old->in[1] = nw;
}
}
/*--------------------------------------------------------------------*/
......
......@@ -445,8 +445,9 @@ typedef enum {
Type_or_id_p is entity *. */
} symconst_kind;
/** SymConst attributes
This union contains the symbolic information represented by the node */
/** SymConst attribute.
*
* This union contains the symbolic information represented by the node. */
union symconst_symbol {
type *type_p;
ident *ident_p;
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment