Dumping pointers differently
authorGötz Lindenmaier <goetz@ipd.info.uni-karlsruhe.de>
Wed, 12 Jun 2002 09:43:08 +0000 (09:43 +0000)
committerGötz Lindenmaier <goetz@ipd.info.uni-karlsruhe.de>
Wed, 12 Jun 2002 09:43:08 +0000 (09:43 +0000)
[r404]

ir/tv/tv.c

index 1c206be..73f6515 100644 (file)
@@ -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)");