X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=ir%2Ftr%2Ftype_finalization.c;h=e9dac9d0e2f9ed558435b1282af411a12ad4de42;hb=dcff73b2cc34378750e2cc1979a4b120e19767a9;hp=182ff15a198746bf9ef2b778e202acc330c50fcb;hpb=a1e9069afa4fa1e16e2d176bcd7905d6a1ed4677;p=libfirm diff --git a/ir/tr/type_finalization.c b/ir/tr/type_finalization.c index 182ff15a1..e9dac9d0e 100644 --- a/ir/tr/type_finalization.c +++ b/ir/tr/type_finalization.c @@ -22,7 +22,6 @@ * @brief Calculate finalization of classes and entities by * inspecting the class hierarchy. * @author Michael Beck - * @version $Id$ */ #include "config.h" @@ -36,7 +35,7 @@ DEBUG_ONLY(static firm_dbg_module_t *dbg;) static void do_finalization(type_or_ent tore, void *env) { - ir_type *glob_tp = env; + ir_type *glob_tp = (ir_type*)env; if (is_type(tore.typ)) { ir_type *cls = tore.typ; @@ -76,14 +75,8 @@ static void do_finalization(type_or_ent tore, void *env) get_compound_name(owner), get_entity_name(ent))); } } -} /* do_finalization */ +} -/** - * If we have the closed world assumption, we can calculate the - * finalization of classes and entities by inspecting the class hierarchy. - * After this is done, all classes and entities that are not overridden - * anymore have the final property set. - */ void types_calc_finalization(void) { if (! get_opt_closed_world()) @@ -91,6 +84,6 @@ void types_calc_finalization(void) FIRM_DBG_REGISTER(dbg, "firm.tr.finalization"); - /* types must be visited before it's entities */ + /* types must be visited before their entities */ type_walk(do_finalization, NULL, get_glob_type()); }