+ /* now the allocs */
+ alloc_info_t *ainfo = ginfo->allocs;
+ if (ainfo) {
+ fprintf (dot, "\t/* now the allocs */\n");
+ } else {
+ fprintf (dot, "\t/* no allocs */\n");
+ }
+
+ while (NULL != ainfo) {
+ ir_node *alloc = ainfo->alloc;
+ const char *name = get_type_name (ainfo->tp);
+ const char *color = "red1";
+
+ /* if (0 == ginfo->allocs_seen) { */
+ _allocs ++;
+ fprintf (dot, "\talloc_0x%08x_%i [label=\"%s\", color=\"%s\"]\n",
+ alloc, graph_no, name, color);
+ /* } */
+
+ fprintf (dot, "\tgraph_%i -> alloc_0x%08x_%i\n", graph_no, alloc, graph_no);
+
+ ainfo = ainfo->prev;
+ }
+
+ if (0 == ginfo->allocs_seen) {
+ ginfo->allocs_seen = 1;
+ }
+