X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=ir%2Fana%2Fanalyze_irg_args.c;h=1a6082c2194b49bf211742e4368c43543d274314;hb=793165ad171bd938143e0d466efafebde94b348a;hp=82a04062cdd9a2a2d97edec01740e747ca436511;hpb=85f517eca982e6a4e1d1848eb67634ae33b70de9;p=libfirm diff --git a/ir/ana/analyze_irg_args.c b/ir/ana/analyze_irg_args.c index 82a04062c..1a6082c21 100644 --- a/ir/ana/analyze_irg_args.c +++ b/ir/ana/analyze_irg_args.c @@ -21,7 +21,6 @@ * @file * @brief read/write analyze of graph argument, which have mode reference. * @author Beyhan Veliev - * @version $Id$ */ #include "config.h" @@ -80,8 +79,8 @@ static ptr_access_kind analyze_arg(ir_node *arg, ptr_access_kind bits) } else { ir_entity *meth_ent; - if (is_Global(ptr)) { - meth_ent = get_Global_entity(ptr); + if (is_SymConst_addr_ent(ptr)) { + meth_ent = get_SymConst_entity(ptr); for (p = get_Call_n_params(succ) - 1; p >= 0; --p) { if (get_Call_param(succ, p) == arg) { @@ -99,7 +98,7 @@ static ptr_access_kind analyze_arg(ir_node *arg, ptr_access_kind bits) meth_ent = get_Call_callee(succ, c); /* unknown_entity is used to signal that we don't know what is called */ - if (meth_ent == unknown_entity) { + if (is_unknown_entity(meth_ent)) { bits |= ptr_access_all; break; } @@ -235,31 +234,8 @@ static void analyze_ent_args(ir_entity *ent) /* copy the temporary info */ memcpy(ent->attr.mtd_attr.param_access, rw_info, nparams * sizeof(ent->attr.mtd_attr.param_access[0])); - -#if 0 - printf("\n%s:\n", get_entity_name(ent)); - for (i = 0; i < nparams; ++i) { - if (is_Pointer_type(get_method_param_type(mtp, i))) - if (ent->attr.mtd_attr.param_access[i] != ptr_access_none) { - printf(" Pointer Arg %d access: ", i); - if (ent->attr.mtd_attr.param_access[i] & ptr_access_read) - printf("READ "); - if (ent->attr.mtd_attr.param_access[i] & ptr_access_write) - printf("WRITE "); - if (ent->attr.mtd_attr.param_access[i] & ptr_access_store) - printf("STORE "); - printf("\n"); - } - } -#endif } -/** - * Analyze how pointer arguments of a given - * ir graph are accessed. - * - * @param irg The ir graph to analyze. - */ void analyze_irg_args(ir_graph *irg) { ir_entity *ent; @@ -275,10 +251,6 @@ void analyze_irg_args(ir_graph *irg) analyze_ent_args(ent); } -/* - * Compute for a method with pointer parameter(s) - * if they will be read or written. - */ ptr_access_kind get_method_param_access(ir_entity *ent, size_t pos) { #ifndef NDEBUG @@ -460,19 +432,6 @@ static void analyze_method_params_weight(ir_entity *ent) } } -/* - * Returns for a method the 'weight' that every parameter - * has on optimization possibility. Higher values allows - * higher optimization with procedure cloning. - * - * The values are calculation on demand only. - * - * @param ent the entity to analyze - * @param pos the argument number - * - * @return the parameter weight or null_weight if pos is greater - * than the number of arguments. - */ unsigned get_method_param_weight(ir_entity *ent, size_t pos) { if (ent->attr.mtd_attr.param_weight) { @@ -490,12 +449,6 @@ unsigned get_method_param_weight(ir_entity *ent, size_t pos) return null_weight; } -/** - * Analyze argument's weight of a given - * ir graph. - * - * @param irg The ir graph to analyze. - */ void analyze_irg_args_weight(ir_graph *irg) { ir_entity *entity = get_irg_entity(irg);