From: Götz Lindenmaier <goetz@ipd.info.uni-karlsruhe.de>
Date: Wed, 12 Jun 2002 09:43:08 +0000 (+0000)
Subject: Dumping pointers differently
X-Git-Url: http://nsz.repo.hu/git/?a=commitdiff_plain;h=80fadd53d5cf0feddf63f34d6306e45f8d5de717;p=libfirm

Dumping pointers differently

[r404]
---

diff --git a/ir/tv/tv.c b/ir/tv/tv.c
index 1c206be81..73f6515b5 100644
--- a/ir/tv/tv.c
+++ b/ir/tv/tv.c
@@ -1718,7 +1718,10 @@ tarval_print (XP_PAR1, const xprintf_info *info ATTRIBUTE((unused)), XP_PARN)
     if (val->u.p.xname) {
       printed = XPR (val->u.p.xname);
     } else if (val->u.p.ent) {
-      printed = XPF1R ("(%I)", get_entity_ld_ident(val->u.p.ent));
+      if (get_entity_peculiarity(val->u.p.ent) == existent)
+	printed = XPF1R ("&(%I)", get_entity_ld_ident(val->u.p.ent));
+      else
+	printed = XPSR ("(NULL)");
     } else {
       assert (val == tarval_p_void);
       printed = XPSR ("(void)");