aboutsummaryrefslogtreecommitdiff
path: root/interpreter/print.c
diff options
context:
space:
mode:
authorCamil Staps2016-09-24 14:49:06 +0200
committerCamil Staps2016-09-24 14:49:06 +0200
commit534079449fa91617f3d1497b24c3de92f810e183 (patch)
treeaf332573b8a5fa6e519438799208800857fc1e92 /interpreter/print.c
parentcleanup (diff)
Colour internal nodes gray in dot output
Diffstat (limited to 'interpreter/print.c')
-rw-r--r--interpreter/print.c10
1 files changed, 5 insertions, 5 deletions
diff --git a/interpreter/print.c b/interpreter/print.c
index d2c03ae..2fb6e4b 100644
--- a/interpreter/print.c
+++ b/interpreter/print.c
@@ -196,13 +196,13 @@ void print_node_to_file(struct node* node, FILE* f, struct visited_nodes *visite
case NODE_TUPLE:
case NODE_APP:
if (node->kind == NODE_LIST)
- fprintf(f, "%" PRIuPTR " [label=\"%p: List (%d)\", penwidth=%d];\n",
+ fprintf(f, "%" PRIuPTR " [label=\"%p: List (%d)\", color=gray, penwidth=%d];\n",
(uintptr_t) node, node, node->used_count, node->used_count);
else if (node->kind == NODE_TUPLE)
- fprintf(f, "%" PRIuPTR " [label=\"%p: Tuple (%d)\", penwidth=%d];\n",
+ fprintf(f, "%" PRIuPTR " [label=\"%p: Tuple (%d)\", color=gray, penwidth=%d];\n",
(uintptr_t) node, node, node->used_count, node->used_count);
else if (node->kind == NODE_APP)
- fprintf(f, "%" PRIuPTR " [label=\"%p: App (%d)\", penwidth=%d];\n",
+ fprintf(f, "%" PRIuPTR " [label=\"%p: App (%d)\", color=gray, penwidth=%d];\n",
(uintptr_t) node, node, node->used_count, node->used_count);
if (node->var1) {
@@ -216,10 +216,10 @@ void print_node_to_file(struct node* node, FILE* f, struct visited_nodes *visite
break;
case NODE_REDIRECT:
- fprintf(f, "%" PRIuPTR " [label=\"%p: Redirection (%d)\", penwidth=%d];\n",
+ fprintf(f, "%" PRIuPTR " [label=\"%p: Redirection (%d)\", color=gray, penwidth=%d];\n",
(uintptr_t) node, node, node->used_count, node->used_count);
print_node_to_file((struct node*) node->var1, f, visited);
- fprintf(f, "%" PRIuPTR " -> %" PRIuPTR " [label=\"l\", penwidth=%d];\n",
+ fprintf(f, "%" PRIuPTR " -> %" PRIuPTR " [penwidth=%d];\n",
(uintptr_t) node, (uintptr_t) node->var1, node->used_count);
break;
}