From: Götz Lindenmaier <goetz@ipd.info.uni-karlsruhe.de>
Date: Tue, 31 Aug 2004 14:27:12 +0000 (+0000)
Subject: missing test for extenal visibility added
X-Git-Url: http://nsz.repo.hu/git/?a=commitdiff_plain;h=bcb649ca6c867c116ebfb4aad2a4dbe6e0bf80b8;p=libfirm

missing test for extenal visibility added

[r3800]
---

diff --git a/ir/ir/ircgopt.c b/ir/ir/ircgopt.c
index 340590ff1..9d262002d 100644
--- a/ir/ir/ircgopt.c
+++ b/ir/ir/ircgopt.c
@@ -89,7 +89,7 @@ void gc_irgs(int n_keep, entity ** keep_arr) {
         get_irg_loopinfo_state(irg) == loopinfo_ip_inconsistent) {
       free_loop_information(irg);
     }
-    if (get_entity_link(ent) != MARK) {
+    if ((get_entity_visibility(ent) == visibility_local) && (get_entity_link(ent) != MARK)) {
       remove_irp_irg(irg);
       set_entity_peculiarity(ent, peculiarity_description);
       if (get_opt_dead_method_elimination_verbose()) {