From: Michael Beck <beck@ipd.info.uni-karlsruhe.de>
Date: Wed, 1 Aug 2007 13:56:47 +0000 (+0000)
Subject: dump the new base type attribute
X-Git-Url: http://nsz.repo.hu/git/?a=commitdiff_plain;h=1224623d4c2c211767705c7fea0d3855cd9cd19e;p=libfirm

dump the new base type attribute

[r15411]
---

diff --git a/ir/ir/irdumptxt.c b/ir/ir/irdumptxt.c
index 01df13064..75b5a71d9 100644
--- a/ir/ir/irdumptxt.c
+++ b/ir/ir/irdumptxt.c
@@ -1163,6 +1163,14 @@ void dump_type_to_file(FILE *F, ir_type *tp, dump_verbosity verbosity) {
 		break;
 
 	case tpo_primitive:
+		if (verbosity & dump_verbosity_typeattrs) {
+			ir_type *base_tp = get_primitive_base_type(tp);
+			if (base_tp != NULL)
+				fprintf(F, "\n  base type: %s (%ld)", get_type_name(tp), get_type_nr(tp));
+			fprintf(F, "\n");
+		}
+		break;
+
 	case tpo_id:
 	case tpo_none:
 	case tpo_unknown: