* @file
* @brief Removal of unreachable methods.
* @author Matthias Braun
- * @version $Id$
*/
#include "config.h"
if (entity->initializer != NULL) {
visit_initializer(entity->initializer);
- } else if (entity_has_compound_ent_values(entity)) {
- size_t i;
- size_t n_members = get_compound_ent_n_values(entity);
- for (i = 0; i < n_members; ++i) {
- ir_node *node = get_compound_ent_value(entity, i);
- start_visit_node(node);
- }
}
irg = get_entity_irg(entity);
for (i = 0; i < n_entities; ++i) {
ir_entity *entity = get_compound_member(segment, i);
- if (get_entity_visibility(entity) != ir_visibility_default
- && !(get_entity_linkage(entity) & IR_LINKAGE_HIDDEN_USER))
+ if (get_entity_visibility(entity) != ir_visibility_external
+ && !(get_entity_linkage(entity) & IR_LINKAGE_HIDDEN_USER)
+ && !(get_entity_linkage(entity) & IR_LINKAGE_NO_CODEGEN))
continue;
visit_entity(entity);
}
/* remove graphs of non-visited functions
- * (we have to count backwards so we can safely call remove_irp_irg
- * while iterating) */
+ * (we have to count backwards, because freeing the graph moves the last
+ * graph in the list to the free position) */
for (i = get_irp_n_irgs(); i > 0;) {
ir_graph *irg = get_irp_irg(--i);
ir_entity *entity = get_irg_entity(irg);
continue;
DB((dbg, LEVEL_1, " freeing method %+F\n", entity));
- remove_irp_irg(irg);
+ free_ir_graph(irg);
}
/* we can now remove all non-visited (global) entities */